1. Juli 2015 09:59
1. Juli 2015 10:10
1. Juli 2015 10:40
1. Juli 2015 12:32
1. Juli 2015 12:59
27. Juli 2015 18:01
27. Juli 2015 20:55
Muss da noch ein Calcfields gesetzt werden
29. Juli 2015 18:23
ItemLedgerEntry.RESET;
ItemLedgerEntry.SETRANGE("Item No.",ItemNo);
ItemLedgerEntry.SETRANGE("Entry Type",ItemLedgerEntry."Entry Type"::Sale);
IF ItemLedgerEntry.FINDSET THEN
EXIT(ItemLedgerEntry.COUNT)
ELSE
EXIT(0);
ItemLedgerEntry.RESET;
ItemLedgerEntry.SETCURRENTKEY("Item No.","Entry Type","Variant Code","Drop Shipment","Location Code","Posting Date");
ItemLedgerEntry.SETRANGE("Item No.",ItemNo);
ItemLedgerEntry.SETRANGE("Entry Type",ItemLedgerEntry."Entry Type"::Sale);
ItemLedgerEntry.CALCSUMS(Quantity);
EXIT(ItemLedgerEntry.Quantity);
TotalNoOfSales := GetNoOfSalesItemLedgerEntries(Item."No."); // Gl. Var. TotalNoOfSales | Decimal
TotalNoOfQty := GetNoOfQtyItemLedgerEntries(Item."No."); // Gl. Var. TotalNoQty | Decimal