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))
////<----------------------------------