รหัสศูนย์ต้นทุนจะสะท้อนถึงในรายการบัญชีแยกประเภททั่วไปที่ลงรายการบัญชีเมื่อคุณลงรายการบัญชีใบแจ้งหนี้ โดยไม่มีการกำหนดศูนย์ต้นทุนใน Microsoft Dynamics NAV 2013 รุ่นภาษาฟินแลนด์

...OrigGenJnlLine@1070006 : Record 81;
        NoOfAutoAccounts@1070003 : Decimal;
        TotalAmount@1070002 : Decimal;
        AccLine@1070001 : Integer;
        GLEntryAutoAccExist@1070000 : Boolean;
      BEGIN
        // NTR Start
        GLSetup.GET;
...

...OrigGenJnlLine@1070006 : Record 81;
        NoOfAutoAccounts@1070003 : Decimal;
        TotalAmount@1070002 : Decimal;
        AccLine@1070001 : Integer;

// Add the following line.
       DimensionSetIDArr@1070004 : ARRAY [10] OF Integer;
// End of the added line.

        GLEntryAutoAccExist@1070000 : Boolean;
      BEGIN
        // NTR Start
        GLSetup.GET;
...

...END ELSE
                  GenJnlLine.VALIDATE(
                    Amount,ROUND("VAT Base Amount" * AutoAccLine."Allocation %" / 100,GLSetup."Amount Rounding Precision"));
                GenJnlLine.VALIDATE("Auto. Acc. Group",'');
                GenJnlLine."Dimension Set ID" := "Dimension Set ID";

// Delete the following lines.
               GenJnlLine."Shortcut Dimension 1 Code" := "Shortcut Dimension 1 Code";
               GenJnlLine."Shortcut Dimension 2 Code" := "Shortcut Dimension 2 Code";
// End of the deleted lines.

                AccLine := AccLine + 1;
                TotalAmount := TotalAmount + GenJnlLine.Amount;
                IF (AccLine = NoOfAutoAccounts) AND (TotalAmount <> 0) THEN
...

...END ELSE
                  GenJnlLine.VALIDATE(
                    Amount,ROUND("VAT Base Amount" * AutoAccLine."Allocation %" / 100,GLSetup."Amount Rounding Precision"));
                GenJnlLine.VALIDATE("Auto. Acc. Group",'');
                GenJnlLine."Dimension Set ID" := "Dimension Set ID";

// Add the following lines.
               IF AutoAccLine."Dimension Set ID" <> 0 THEN
                 IF GenJnlLine."Dimension Set ID" = 0 THEN BEGIN
                   GenJnlLine."Dimension Set ID" := AutoAccLine."Dimension Set ID";
                   GenJnlLine."Shortcut Dimension 1 Code" := AutoAccLine."Shortcut Dimension 1 Code";
                   GenJnlLine."Shortcut Dimension 2 Code" := AutoAccLine."Shortcut Dimension 2 Code";
                 END ELSE BEGIN
                   DimensionSetIDArr[1] := GenJnlLine."Dimension Set ID";
                   DimensionSetIDArr[2] := AutoAccLine."Dimension Set ID";
                   GenJnlLine."Dimension Set ID" :=
                     DimMgt.GetCombinedDimensionSetID(
                       DimensionSetIDArr,GenJnlLine."Shortcut Dimension 1 Code",GenJnlLine."Shortcut Dimension 2 Code");
                 END
               ELSE BEGIN
                 GenJnlLine."Shortcut Dimension 1 Code" := "Shortcut Dimension 1 Code";
                 GenJnlLine."Shortcut Dimension 2 Code" := "Shortcut Dimension 2 Code";
               END;
// End of the added lines.

                AccLine := AccLine + 1;
                TotalAmount := TotalAmount + GenJnlLine.Amount;
                IF (AccLine = NoOfAutoAccounts) AND (TotalAmount <> 0) THEN
                  GenJnlLine.VALIDATE(Amount,GenJnlLine.Amount - TotalAmount);
...