You’re offline. This is a read only version of the page.
I am trying a create duplicate trasnfers orders same info different TO.
I am using the below code when I run it saying no lines to post and fails. Please help
static void TransferOrdersXppImport(Args _args)
{
InventTransferTable inventTransferTable;
InventTransferLine inventTransferLine;
InventDim inventDim;
InventTransferTable inventTransferTable1;
InventTransferId inventTransferOrderId;
InventTransferLine inventTransferLine1;
InventTransferParmTable invTransParmTbl;
NumberSeq numberSeq;
InventTransferUpd invTranUpd;
//TransferId num;
while select * from inventTransferTable1
where inventTransferTable1.TransferId=="TO-000036" join inventTransferLine1
where inventTransferTable1.TransferId==inventTransferLine1.TransferId
{
try
{
//ttsbegin;
//Order header
inventTransferTable.clear();
inventTransferTable.initValue();
numberSeq = NumberSeq::newGetNum(Inventparameters::numRefTransferId());
inventTransferOrderId = numberSeq.num();
inventTransferTable.TransferId = inventTransferOrderId;
inventTransferTable.InventLocationIdFrom = inventTransferTable1.InventLocationIdFrom;
inventTransferTable.InventLocationIdTo =inventTransferTable1.InventLocationIdTo;
inventTransferTable.DlvModeId = inventTransferTable1.InventLocationIdTo;
inventTransferTable.InventLocationIdTransit = inventTransferTable1.InventLocationIdTo;
inventTransferTable.initFromAddress();
inventTransferTable.initToAddress();
inventTransferTable.ShipDate = inventTransferTable1.ShipDate;
inventTransferTable.ReceiveDate =inventTransferTable1.ShipDate;// inventTransferTable1.ReceiveDate;
if (inventTransferTable.validateWrite())
{
inventTransferTable.insert();
inventTransferLine.clear();
inventTransferLine.initFromInventTransferTable(inventTransferTable,
NoYes::Yes);
inventTransferLine.ItemId = inventTransferLine1.ItemId;
inventTransferLine.InventDimId = inventTransferLine1.InventDimId;
inventTransferLine.TransferId=inventTransferTable.TransferId;
inventTransferLine.QtyTransfer = inventTransferLine1.QtyTransfer;
inventTransferLine.initFromInventTableModule(InventTableModule::find(inventTransferLine.ItemId,ModuleInventPurchSales::Invent));
inventTransferLine.QtyRemainReceive = inventTransferLine1.QtyRemainReceive;
inventTransferLine.QtyRemainShip = inventTransferLine1.QtyRemainShip ;
inventTransferLine.ShipDate = inventTransferLine1.ShipDate;
inventTransferLine.ReceiveDate =inventTransferLine1.ShipDate;// todaytoday();//inventTransferLine1.ReceiveDate;
inventTransferLine.initFromInventTransferTable(inventTransferTable, false);
inventTransferLine.LineNum = inventTransferLine1.LineNum;
if (inventTransferLine.validateWrite())
{
inventTransferLine.insert();
}
else
throw error("Order line");
}
else
throw error("Order header");
//ttscommit;
invTransParmTbl.TransferId = inventTransferTable.TransferId;
invTransParmTbl.EditLines = true;
invTransParmTbl.ExplodeLines = NoYes::Yes;
invTransParmTbl.AutoReceiveQty = true;
invTransParmTbl.UpdateType = InventTransferUpdateType::Receive;
invTransParmTbl.PickUpdateQty = InventTransferPickUpdateQty::All;
invTransParmTbl.TransDate = systemDateGet();
invTranUpd = InventTransferUpdShip::newParmBuffer(invTransParmTbl);
invTranUpd.run();
//return invTranUpd;
info("Done!");
}
catch {
error("Error!");
return;
}
}
}
*This post is locked for comments
I have the same question (0)
Share
Report
All responses (
Answers (
4
