1.给类InventTransferUpdate添加构造方法:
static InventTransferUpd construct(InventTransferUpdateType _InventTransferUpdateType)
{
;
switch(_InventTransferUpdateType)
{
case InventTransferUpdateType::PickingList:
{
if (InventParameters::logisticsRegistrationEnabled())
return InventTransferUpdPick_Journal::construct();
return InventTransferUpdPick_Pick::construct();
break;
}
case InventTransferUpdateType::Shipment:
return InventTransferUpdShip::construct();
break;
case InventTransferUpdateType::Receive:
return InventTransferUpdReceive::construct();
break;
default:
break;
}
}
{
;
switch(_InventTransferUpdateType)
{
case InventTransferUpdateType::PickingList:
{
if (InventParameters::logisticsRegistrationEnabled())
return InventTransferUpdPick_Journal::construct();
return InventTransferUpdPick_Pick::construct();
break;
}
case InventTransferUpdateType::Shipment:
return InventTransferUpdShip::construct();
break;
case InventTransferUpdateType::Receive:
return InventTransferUpdReceive::construct();
break;
default:
break;
}
}
2.给类InventTransferUpdate添加updateShip和updateReceive方法:
发货:
void updateShip(InventTransferId _inventTransferId, //InventTransfer Order Number
InventTransferShipUpdateQty _inventTransferShipUpdateQty, //Ship Qty the value is Enum:InventTransferShipUpdateQty
InventTransferEditLines _editLines = NoYes::No,
InventTransferAutoReceiveQty _autoReceiveQty = NoYes::No,
NoYes _printTransferPickingList = NoYes::No,//print pick list
NoYes _printTransferReceipt = NoYes::No,//print transfer receipt
NoYes _printTransferShip = NoYes::No,//print transfer ship
TransDate _transDate = SystemDateGet())
{
InventTransferParmTable localInventTransferParmTable;
;
localInventTransferParmTable.skipTTSCheck(true);
localInventTransferParmTable.TransferId = _inventTransferId;
localInventTransferParmTable.AutoReceiveQty = _autoReceiveQty;
localInventTransferParmTable.ShipUpdateQty = _inventTransferShipUpdateQty;
localInventTransferParmTable.EditLines = _editLines;
localInventTransferParmTable.TransDate = _transDate;
localInventTransferParmTable.PrintTransferPickingList = _printTransferPickingList;
localInventTransferParmTable.PrintTransferReceipt = _printTransferReceipt;
localInventTransferParmTable.PrintTransferShipment = _printTransferShip;
localInventTransferParmTable.ParmBuffer::initParmId();
localInventTransferParmTable.write();
this.parmParmBuffer(localInventTransferParmTable);
this.run();
}
InventTransferShipUpdateQty _inventTransferShipUpdateQty, //Ship Qty the value is Enum:InventTransferShipUpdateQty
InventTransferEditLines _editLines = NoYes::No,
InventTransferAutoReceiveQty _autoReceiveQty = NoYes::No,
NoYes _printTransferPickingList = NoYes::No,//print pick list
NoYes _printTransferReceipt = NoYes::No,//print transfer receipt
NoYes _printTransferShip = NoYes::No,//print transfer ship
TransDate _transDate = SystemDateGet())
{
InventTransferParmTable localInventTransferParmTable;
;
localInventTransferParmTable.skipTTSCheck(true);
localInventTransferParmTable.TransferId = _inventTransferId;
localInventTransferParmTable.AutoReceiveQty = _autoReceiveQty;
localInventTransferParmTable.ShipUpdateQty = _inventTransferShipUpdateQty;
localInventTransferParmTable.EditLines = _editLines;
localInventTransferParmTable.TransDate = _transDate;
localInventTransferParmTable.PrintTransferPickingList = _printTransferPickingList;
localInventTransferParmTable.PrintTransferReceipt = _printTransferReceipt;
localInventTransferParmTable.PrintTransferShipment = _printTransferShip;
localInventTransferParmTable.ParmBuffer::initParmId();
localInventTransferParmTable.write();
this.parmParmBuffer(localInventTransferParmTable);
this.run();
}
收货:
Code
3.调用示例:
发货:
InventTransferUpd inventTransferUpd = InventTransferUpd::construct(InventTransferUpdateType::Shipment);
inventTransferUpd.update('00031_080',InventTransferShipUpdateQty::PickedQty);
收货:inventTransferUpd.update('00031_080',InventTransferShipUpdateQty::PickedQty);
Code