Generated entries in the GL Book Entry table (12144) are incorrect when you reverse a transaction for purchase entries in the Italian version of Microsoft Dynamics NAV 2009

Installation information

Code changes

1. Change the code of Keys in the G/L Entry table (17) as follows:
   Existing code

   ...
   { ;G/L Account No.,Business Unit Code,Global Dimension 1 Code,Global Dimension 2 Code,Close Income Statement Dim. ID,Posting Date,Bal. Account No.;
   SumIndexFields=Amount,Debit Amount,Credit Amount,Additional-Currency Amount,Add.-Currency Debit Amount,Add.-Currency Credit Amount }
   
   // Delete the following line.
   { ;Transaction No.,G/L Account No.,Document No.,Positive,Source Type,Source No.;
   
   SumIndexFields=Amount,Debit Amount,Credit Amount,Additional-Currency Amount }
   { ;Close Income Statement Dim. ID }
   ...
   

   Replacement code

   ...
   { ;G/L Account No.,Business Unit Code,Global Dimension 1 Code,Global Dimension 2 Code,Close Income Statement Dim. ID,Posting Date,Bal. Account No.;
   SumIndexFields=Amount,Debit Amount,Credit Amount,Additional-Currency Amount,Add.-Currency Debit Amount,Add.-Currency Credit Amount }
   
   // Add the following line.
   { ;Transaction No.,G/L Account No.,Document Type,Document No.,Positive,Source Type,Source No.;
   
   SumIndexFields=Amount,Debit Amount,Credit Amount,Additional-Currency Amount }
   { ;Close Income Statement Dim. ID }
   ...
   

2. Change the code of Fields in the GL Book Entry table (12144) as follows:
   Existing code 1

   ...
   CalcFormula=Sum("G/L Entry".Amount WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

   Replacement code 1

   ...
   CalcFormula=Sum("G/L Entry".Amount WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   
   // Add the following line.
   Document Type=FIELD(Document Type),
   
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

   Existing code 2

   ...
   CalcFormula=Sum("G/L Entry"."Debit Amount" WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

   Replacement code 2

   ...
   CalcFormula=Sum("G/L Entry"."Debit Amount" WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   
   // Add the following line.
   Document Type=FIELD(Document Type),
   
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

   Existing code 3

   ...
   CalcFormula=Sum("G/L Entry"."Credit Amount" WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

   Replacement code 3

   ...
   CalcFormula=Sum("G/L Entry"."Credit Amount" WHERE (Transaction No.=FIELD(Transaction No.),
   G/L Account No.=FIELD(G/L Account No.),
   
   // Add the following line.
   Document Type=FIELD(Document Type),
   
   Document No.=FIELD(Document No.),
   Positive=FIELD(Positive),
   ...
   

3. Change the code in the InsertGLBookEntry function in the Gen. Jnl.-Post Line codeunit (12) as follows:
   Existing code

   ...
   GLBookEntry.SETRANGE("Source Type",NewGLEntry."Source Type");
   GLBookEntry.SETRANGE("Source No.",NewGLEntry."Source No.");
   IF NOT GLBookEntry.FIND('-') THEN BEGIN
   GLBookEntry.INIT;
   ...
   

   Replacement code

   ...
   GLBookEntry.SETRANGE("Source Type",NewGLEntry."Source Type");
   GLBookEntry.SETRANGE("Source No.",NewGLEntry."Source No.");
   
   // Add the following line.
   GLBookEntry.SETRANGE("Document Type",NewGLEntry."Document Type");
   
   IF NOT GLBookEntry.FIND('-') THEN BEGIN
   GLBookEntry.INIT;
   ...
   

Prerequisites

• The Italian version of Microsoft Dynamics NAV 2009 R2
• The Italian version of Microsoft Dynamics NAV 2009 Service Pack 1

Removal information