Index: AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml
===================================================================
diff -u -r35615 -r35733
--- AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml	(.../SalesInvoiceConverter.cls.xml)	(revision 35615)
+++ AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml	(.../SalesInvoiceConverter.cls.xml)	(revision 35733)
@@ -125,6 +125,8 @@
 	
 	set Transaction.ADUCorrectedTaxAmount = ..Formatter.FormatNumber( Factuur.GeefTotaalBTW() / ..TotaalGoederenInclusiefPort * BoekingBedrag ,2)
 	set Transaction.CashDiscAmount = ..Formatter.FormatNumber( -1 * ( Factuur.GeefTotaalKortingKontant() / ..TotaalGoederenInclusiefPort * BoekingBedrag ) ,2)
+	
+	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.CashDiscAmount = Transaction.CashDiscAmount * -1
 		
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Factuur()) Transaction.AmountCurCredit = ..Formatter.FormatNumber(BoekingBedrag + Transaction.ADUCorrectedTaxAmount ,2)	
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.AmountCurDebit = ..Formatter.FormatNumber(-1 * (BoekingBedrag - Transaction.ADUCorrectedTaxAmount) ,2)
@@ -151,9 +153,11 @@
 	set Transaction.PaymMode = $$$If(Factuur.GeefKlant().GeefBetalingwijze()=##class(DOM.VKP.enu.Betalingwijze).Incasso(),"SEPA-DD","OVER")
 	
 	set Transaction.CashDiscAmount = ..Formatter.FormatNumber(Factuur.GeefTotaalKortingKontant(),2)
+	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.CashDiscAmount = Transaction.CashDiscAmount * -1
 			
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Factuur()) Transaction.AmountCurDebit = ..Formatter.FormatNumber(Factuur.GeefTotaalTeBetalen(),2)
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.AmountCurCredit = ..Formatter.FormatNumber(Factuur.GeefTotaalTeBetalen(),2)
+	
 		
 	set Transaction.LedgerDimension.GetAt(1).Account = ..Formatter.FormatAccountNumber(Factuur.GeefKlantNr())
 	set Transaction.LedgerDimension.GetAt(1).DisplayValue = ..Formatter.FormatAccountNumber(Factuur.GeefKlantNr())_" - "_Factuur.GeefKlant().GeefNaam()