Index: AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml
===================================================================
diff -u -r35614 -r35615
--- AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml	(.../SalesInvoiceConverter.cls.xml)	(revision 35614)
+++ AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml	(.../SalesInvoiceConverter.cls.xml)	(revision 35615)
@@ -251,20 +251,20 @@
 <Method name="CorrigeerAfrondingsVerschil">
 <FormalSpec><![CDATA[&Table:AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable]]></FormalSpec>
 <Implementation><![CDATA[
-	#dim SomLedgerMVH as %Decimal = 0
-	#dim TotaalLedgerJournalTrans as %Decimal = 0
+	#dim TotalLedger as %Decimal = 0
+	#dim TotalCustomer as %Decimal = 0
 	#dim LedgerJournalTableIterator as TECH.Iterator
 	
 	Set LedgerJournalTableIterator = ##class(TECH.ListIterator).%New(Table.LedgerJournalTrans)
 	While LedgerJournalTableIterator.HasNext() {
 		#dim LedgerJournalTrans As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTrans = LedgerJournalTableIterator.Next()
-		Set:LedgerJournalTrans.AccountType="Cust" TotaalLedgerJournalTrans = LedgerJournalTrans.AmountCurCredit + LedgerJournalTrans.AmountCurDebit
-		Set:LedgerJournalTrans.AccountType="Ledger" SomLedgerMVH = SomLedgerMVH + LedgerJournalTrans.AmountCurCredit + LedgerJournalTrans.AmountCurDebit
+		Set:LedgerJournalTrans.AccountType="Cust" TotalCustomer = LedgerJournalTrans.AmountCurCredit + LedgerJournalTrans.AmountCurDebit
+		Set:LedgerJournalTrans.AccountType="Ledger" TotalLedger = TotalLedger + LedgerJournalTrans.AmountCurCredit + LedgerJournalTrans.AmountCurDebit
 	}
 	
-	If SomLedgerMVH '= TotaalLedgerJournalTrans {
-		Set:LedgerJournalTrans.AmountCurCredit'="" LedgerJournalTrans.AmountCurCredit = LedgerJournalTrans.AmountCurCredit - (SomLedgerMVH - TotaalLedgerJournalTrans)
-		Set:LedgerJournalTrans.AmountCurDebit'="" LedgerJournalTrans.AmountCurDebit = LedgerJournalTrans.AmountCurDebit - (SomLedgerMVH - TotaalLedgerJournalTrans)		
+	If $$$Not(TotalLedger = TotalCustomer) {
+		Set:LedgerJournalTrans.AmountCurCredit'="" LedgerJournalTrans.AmountCurCredit = LedgerJournalTrans.AmountCurCredit - (TotalLedger - TotalCustomer)
+		Set:LedgerJournalTrans.AmountCurDebit'="" LedgerJournalTrans.AmountCurDebit = LedgerJournalTrans.AmountCurDebit - (TotalLedger - TotalCustomer)		
 	}
 ]]></Implementation>
 </Method>