Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/Inbound/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml
===================================================================
diff -u -r34910 -r34937
--- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/Inbound/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml	(.../PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml)	(revision 34910)
+++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/Inbound/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml	(.../PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml)	(revision 34937)
@@ -13,10 +13,11 @@
           <Name>Van Hoecke aankoopfacturen interface</Name>
           <LedgerJournalTrans class="entity">
             <AccountType>Vend</AccountType>
-            <AmountCurDebit>105.53</AmountCurDebit>
-            <CashDiscAmount>3.17</CashDiscAmount>
+            <AmountCurCredit>105.53</AmountCurCredit>
+            <CashDiscAmount>-3.17</CashDiscAmount>
             <CashDiscCode>10EOM3%</CashDiscCode>
             <Company>VHBE</Company>
+            <DateCashDisc>2016-05-04</DateCashDisc>
             <Due>2016-05-21</Due>
             <Invoice>848153</Invoice>
             <LedgerDimension>
Index: AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml
===================================================================
diff -u -r34910 -r34937
--- AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34910)
+++ AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34937)
@@ -73,9 +73,8 @@
 <Implementation><![CDATA[
 	#dim Transaction As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTrans = ..MakeTransaction(Factuur,BoekingIndex+1)
 	set Transaction.AccountType = "Ledger"
+	set Transaction.AmountCurDebit = ..Formatter.FormatNumber(Boeking.Bedrag,2)
 
-	set Transaction.AmountCurCredit = ..Formatter.FormatNumber(Boeking.Bedrag,2)
-
 	#dim BoekhoudRekeningId As %String = ##class(AX.common.impl.ConvertAdminToAX).ConvertLedgerCount(Boeking.BoekhoudRekeningId)
 	
 	set LedgerDimension = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalDimension).%New()
@@ -99,10 +98,10 @@
 	set Transaction.TaxGroup = "BIC"
 	set Transaction.TaxItemGroup = "G3"
 	
-	set Transaction.CashDiscAmount = ..Formatter.FormatNumber(Factuur.KortingKontant,2)
-
-	set Transaction.AmountCurDebit = ..Formatter.FormatNumber(Factuur.Totaal,2)
+	set Transaction.CashDiscAmount = -1*..Formatter.FormatNumber(Factuur.KortingKontant,2)
 	
+	set Transaction.AmountCurCredit = ..Formatter.FormatNumber(Factuur.Totaal,2)
+	
 	#dim Leverancier As DOM.AKP.Leverancier = ..AankoopAPI.GeefLeverancier(Factuur.LeverancierID)
 			
 	set LedgerDimension = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalDimension).%New()
@@ -134,7 +133,7 @@
 	#dim Leverancier As DOM.AKP.Leverancier = ..AankoopAPI.GeefLeverancier(Factuur.LeverancierID)
 	
 	set:(Factuur.KortingKontant>0) Transaction.CashDiscCode = ..Formatter.FormatCashDiscount(Leverancier.GeefKortingKontant(),Leverancier.GeefTermijnKortingKontant())
-	//set:(Factuur.KortingKontant>0) Transaction.DateCashDisc = 
+	set:(Factuur.KortingKontant>0) Transaction.DateCashDisc = Factuur.Datum + 3
 	
 	set Transaction.LineNum = ..Formatter.FormatNumber(ItemIndex,10)