ich brauche noch ein Paar Augen die auf mein Code draufschaut denn ich finde den Fehler nicht
Bin in der Page 9326 - Freigegebene FA's
Eine neue FactBox soll erstellt werden. Darin sollen alle Abgänge in einer Periode angezeigt werden. Habe 12Monate als Richtwert erstmal genommen.
Neue FactBox erstellt Source die Itemtabelle und in der Page 9326 eingebunden. Das funktioniert. Wenn ich durch die Liste mit den Cursortasten navigiere ändert sich auch die Artikelnummer.
Nun habe ich eine Funktion in der FactBox angelegt.
Item_lRec - lokale Variable auf die Item Tabelle
ItemLedgerEntry_lRec - lokale Variable auf die Item Ledger Entry Tabelle
TotalAbgang - Decimal - globale Variable
Die Abgänge in der Artikelpostentabelle sind: Sale (Verkauf), Consumption (Verbrauch) und Negative Adjmt. (Abgang)
- Code: Alles auswählen
IF Item_lRec.GET("No.") THEN BEGIN
ItemLedgerEntry_lRec.RESET;
ItemLedgerEntry_lRec.SETCURRENTKEY("Item No.","Entry Type","Variant Code","Drop Shipment","Location Code","Posting Date");
ItemLedgerEntry_lRec.SETRANGE("Item No.",Item_lRec."No.");
ItemLedgerEntry_lRec.SETFILTER("Entry Type",'%1|%2|%3',ItemLedgerEntry_lRec."Entry Type"::Sale,
ItemLedgerEntry_lRec."Entry Type"::Consumption,
ItemLedgerEntry_lRec."Entry Type"::"Negative Adjmt.");
ItemLedgerEntry_lRec.SETRANGE("Posting Date",CALCDATE('-12M',WORKDATE),WORKDATE);
END;
IF ItemLedgerEntry_lRec.FINDSET THEN
REPEAT
TotalAbgang := ItemLedgerEntry_lRec.Quantity;
UNTIL
ItemLedgerEntry_lRec.NEXT = 0;
Beim kompilieren mit F11 kommt kein Syntaxfehler.
Leider bekomme ich keine Werte zurĂĽck. Bei meinem Testartikel wenn ich die Artikelpostentabelle aufrufe und die oben genannten Filter eingebe, habe ich einen Abgang von 26.600 StĂĽck
Habt ihr vielleicht eine Idee warum mein Code nicht funktioniert? Gibt es eventuell einen eleganteren bzw. einfacheren Lösungsansatz?
Herzlichen Dank fĂĽr eure Hilfe
Beste GrĂĽĂźe
ls