Heute 15:05
trigger OnClosePage()
var
SkipWriteToDatabase: Boolean;
begin
SkipWriteToDatabase := false;
OnBeforeClosePage(Rec, SkipWriteToDatabase, CurrentRunMode, CurrentSourceType, SourceTrackingSpecification, SourceQuantityArray, TotalTrackingSpecification);
if UpdateUndefinedQty() and not SkipWriteToDatabase then
WriteToDatabase();
if CurrentRunMode = CurrentRunMode::"Drop Shipment" then
case CurrentSourceType of
Database::"Sales Line":
SynchronizeLinkedSources(StrSubstNo(Text015, Text016));
Database::"Purchase Line":
SynchronizeLinkedSources(StrSubstNo(Text015, Text017));
end;
....