10. Januar 2008 12:40
CLEAR(SalesLine);
CLEAR(Total);
SalesLine.SETRANGE(SalesLine."Document Type", SalesLine."Document Type"::Order);
SalesLine.SETRANGE(SalesLine."Document No.", "No.");
IF SalesLine.FINDFIRST THEN REPEAT
Total += SalesLine."Unit Price";
UNTIL SalesLine.NEXT = 0;
10. Januar 2008 12:52
10. Januar 2008 12:52
IF SalesLine.FINDFIRST THEN REPEAT
10. Januar 2008 14:43