5. April 2022 11:15
5. April 2022 12:43
LOCAL [EventSubscriber] OnBeforeReleaseSalesDoc(VAR SalesHeader : Record "Sales Header")
// Abbruch wenn Datensatz kein Verkaufsauftrag ist
IF NOT (SalesHeader."Document Type" IN [SalesHeader."Document Type"::Order]) THEN
EXIT;
// Abbruch wenn Datensatz temporär ist
IF SalesHeader.ISTEMPORARY THEN
exit;
// Abbruch wenn externe Belegnummer leer ist
IF SalesHeader."External Document No." = '' THEN
EXIT;
// Suche nach Datensatz mit gleicher Externer Belegnummer
SalesHeaderRedundant.SETRANGE("Document Type",SalesHeader."Document Type");
SalesHeaderRedundant.SETFILTER('<>%1',SalesHeader."No.");
SalesHeaderRedundant.SETRANGE("External Document No.",SalesHeader."External Document No.");
IF SalesHeaderRedundant.FINDFIRST THEN
ERROR('Verkaufsauftrag %1 hat bereits die externe Belegnummer %2',SalesHeaderRedundant."No.",SalesHeaderRedundant."External Document No.");
6. April 2022 08:45