9. Dezember 2010 15:30
9. Dezember 2010 17:32
CASE DocumentType OF
      DocumentType::Invoice:
        BEGIN
          SalesInvLine.INIT;
          SalesInvLine."Document No." := SalesInvHeader."No.";
          SalesInvLine."Line No." := LineNo;
          SalesInvLine."Sell-to Customer No." := SalesInvHeader."Sell-to Customer No.";
          SalesInvLine.Type := SalesInvLine.Type::"G/L Account";
          SalesInvLine."No." := PrepmtInvBuffer."G/L Account No.";
          SalesInvLine."Shortcut Dimension 1 Code" := PrepmtInvBuffer."Global Dimension 1 Code";
          SalesInvLine."Shortcut Dimension 2 Code" := PrepmtInvBuffer."Global Dimension 2 Code";
          ////<----------------------------------
          SalesInvLine.Description := 
           COPYSTR(STRSUBSTNO('Vorauszahlung %1 %2', "Document Type", "No."), 1, MAXSTRLEN(SalesInvLine.Description))
          ////<----------------------------------