I need to retrieve the Expected Receipt Date and Outstanding Quantity of the first 6 existing purchase order lines of a item and pass the values to the appropiate variables in a Dataport.
Value := 0;
PurchLine.SETRANGE(Type,PurchLine.Type::Item);
PurchLine.SETRANGE("No.",MyItemNo);
FOR i := 1 TO 6 DO BEGIN
IF PurchLine.NEXT = 0 THEN BEGIN
Value := Value + PurchLine.Amount;
END;
END;
CLEAR(MyDataport);
MyDataport.SetValue(Value);
MyDataport.RUNMODAL;
Comments
repeat 6 times and get the Values what u want
-Mohana
http://mohana-dynamicsnav.blogspot.in/
https://www.facebook.com/MohanaDynamicsNav
Thanks
Try this
Hope this helps
Albert