5. Dezember 2007 16:56
6. Dezember 2007 00:03
6. Dezember 2007 15:52
IF "Currency Code" = '' THEN BEGIN
GLSetup.TESTFIELD("LCY Code");
TotalText := STRSUBSTNO(Text000,GLSetup."LCY Code");
TotalInclVATText := STRSUBSTNO(Text001,GLSetup."LCY Code");
END ELSE BEGIN
TotalText := STRSUBSTNO(Text000,"Currency Code");
TotalInclVATText := STRSUBSTNO(Text001,"Currency Code");
END;
CurrReport.PAGENO := 1;
IF NOT CurrReport.PREVIEW THEN BEGIN
IF LogInteraction THEN
SegManagement.LogDocument(
8,"No.",0,0,DATABASE::Customer,"Customer No.",'','',"Posting Description",'');
IncrNoPrinted;
END;
6. Dezember 2007 17:32