![]() |
#7 |
Участник
|
X++: str findSerialNumbersFromWMS(SnQueryTableTmp _SnQ) { WMSRoute WMSRoute; SalesLine SalesLine; InventSerialNumbers InventSerialNumbers; ItemFreeTxt txt = ""; ; while select InventSerialNumbers exists join WMSRoute where (WMSRoute.WMSShippingId like InventSerialNumbers.DocId) && (WMSRoute.LineNum == InventSerialNumbers.DocLineNum) && (WMSRoute.ItemId == InventSerialNumbers.ItemId) exists join SalesLine where (SalesLine.RecId == WMSRoute.SalesLineRecId) && (SalesLine.ItemId == _SnQ.Itemid) && (SalesLine.SalesId == _SnQ.SalesId) { txt += ","+InventSerialNumbers.SerialId ;//+ " -> " + num2str(InventSerialNumbers.Qty,1,0,1,0) + "шт. "; } return txt; } |
|