Index: vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml
===================================================================
diff -u -r34774 -r34817
--- vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 34774)
+++ vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 34817)
@@ -20,26 +20,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Journal name afhankelijk van de firma">
-<Implementation><![CDATA[
-	set FirmaBepaler = ##class(vhTest.Mock.AX.common.impl.FirmaBepaler).%New()
-	do FirmaBepaler.IndienMethodCall("GeefInitialen").DanReturn("HLX")
-	do FirmaBepaler.IndienMethodCall("GeefNaam").DanReturn("Halux")
-	
-	#dim VerkoopFactuur As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardFactuur()
-	
-	#dim OrderApiStub As vhTest.Mock.DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
-	do OrderApiStub.IndienMethodCall("GeefFactuur",VerkoopFactuur.GeefID()).DanReturn(VerkoopFactuur)
-	
-	set Converter = ##class(AX.Uitgaand.VKP.VerkoopFactuur.impl.AifConverter).%New(FirmaBepaler,,OrderApiStub)
-	#dim GeneralJournal As AXaif.LedgerGeneralJournal.AxdLedgerGeneralJournal = Converter.Convert(VerkoopFactuur.GeefID())
-
-	#dim JournalTable As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable = GeneralJournal.LedgerJournalTable.GetAt(1)
-	do $$$AssertEquals(JournalTable.JournalName,"HLX-VF")
-	do $$$AssertEquals(JournalTable.Name,"Halux verkoopfacturen interface")
-]]></Implementation>
-</Method>
-
 <Method name="Test: Een factuur met één boekingslijn bevat twee transacties één voor de klant en een voor de grootberekening">
 <Implementation><![CDATA[
 	#dim VerkoopFactuur As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardFactuur()
@@ -155,7 +135,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	do $$$AssertEquals(JournalTable.class,"entity")
-	do $$$AssertEquals(JournalTable.JournalName,"VHBE-VF")
+	do $$$AssertEquals(JournalTable.JournalName,"VH-VF")
 	do $$$AssertEquals(JournalTable.Name,"Van Hoecke verkoopfacturen interface")
 ]]></Implementation>
 </Method>
Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml
===================================================================
diff -u -r34786 -r34817
--- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml	(.../SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml)	(revision 34786)
+++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml	(.../SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml)	(revision 34817)
@@ -9,7 +9,7 @@
     <MessageParts>
       <LedgerGeneralJournal xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
         <LedgerJournalTable class="entity">
-          <JournalName>VHBE-VF</JournalName>
+          <JournalName>VH-VF</JournalName>
           <Name>Van Hoecke verkoopfacturen interface</Name>
           <LedgerJournalTrans class="entity">
             <AccountType>Cust</AccountType>
@@ -18,7 +18,7 @@
             <CashDiscCode>08D2%</CashDiscCode>
             <Company>VHBE</Company>
             <CurrencyCode>EUR</CurrencyCode>
-            <DateCashDisc>2016-05-22</DateCashDisc>
+            <DateCashDisc>2016-05-21</DateCashDisc>
             <DocumentNum>F300.500</DocumentNum>
             <Due>2016-06-13</Due>
             <Invoice>F300500</Invoice>
@@ -44,7 +44,7 @@
             <CashDiscCode>08D2%</CashDiscCode>
             <Company>VHBE</Company>
             <CurrencyCode>EUR</CurrencyCode>
-            <DateCashDisc>2016-05-22</DateCashDisc>
+            <DateCashDisc>2016-05-21</DateCashDisc>
             <DocumentNum>F300.500</DocumentNum>
             <Due>2016-06-13</Due>
             <Invoice>F300500</Invoice>
Index: AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml
===================================================================
diff -u -r34786 -r34817
--- AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34786)
+++ AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34817)
@@ -64,7 +64,7 @@
 <Implementation><![CDATA[
 	set Table = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable).%New()
 	set Table.class = "entity"
-	set Table.JournalName = ..FirmaBepaler.GeefInitialen()_"-VF"
+	set Table.JournalName = "VH-VF"
 	set Table.Name = ..FirmaBepaler.GeefNaam()_" verkoopfacturen interface"
 	
 	do Table.LedgerJournalTrans.Insert(..GetCustTransaction(Factuur))
@@ -95,9 +95,12 @@
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Factuur()) Transaction.AmountCurCredit = ..Formatter.FormatNumber(Boeking.Bedrag+Transaction.ADUCorrectedTaxAmount,2)	
 	set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.AmountCurDebit = ..Formatter.FormatNumber(Boeking.Bedrag+Transaction.ADUCorrectedTaxAmount,2)	
 
-	set Transaction.LedgerDimension.Account = Boeking.BoekhoudRekeningId
-	set Transaction.LedgerDimension.DisplayValue = Boeking.BoekhoudRekeningId_"-"
+
+	#dim BoekhoudRekeningId As %String = Boeking.BoekhoudRekeningId
 	
+	set Transaction.LedgerDimension.Account = BoekhoudRekeningId
+	set Transaction.LedgerDimension.DisplayValue = BoekhoudRekeningId _ "-"
+	
 	quit Transaction
 ]]></Implementation>
 </Method>
@@ -136,7 +139,13 @@
 <ReturnType>AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTrans</ReturnType>
 <Implementation><![CDATA[
 	set Transaction = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTrans).%New()
+
+	set Transaction.TransDate = Factuur.GeefFactuurDatum()
+	set Transaction.Due = Factuur.GeefVervalDatum()
 	
+	set:(Factuur.GeefTotaalKortingKontant()>0) Transaction.DateCashDisc = Factuur.GeefVervalDatumKortingContant()
+	set:(Factuur.GeefTotaalKortingKontant()>0) Transaction.CashDiscCode = ..GetCashDiscCode(Factuur)
+	
 	set Transaction.LedgerDimension = ##class(AXaif.Shared.AxdTypeMultiTypeAccount).%New()
 	set Transaction.OffsetAccountType = "Ledger"
 	set Transaction.OffsetCompany = ..FirmaBepaler.GeefInitialen()
@@ -147,13 +156,7 @@
 	set Transaction.TaxGroup = "BDOM"
 	set Transaction.TaxItemGroup = "G3"
 	
-	set:(Factuur.GeefTotaalKortingKontant()>0) Transaction.CashDiscCode = ..GetCashDiscCode(Factuur)
-	
 	set Transaction.LineNum = ..Formatter.FormatNumber(ItemIndex,10)
-	
-	set Transaction.TransDate = Factuur.GeefFactuurDatum()
-	set Transaction.Due = Factuur.GeefVervalDatum()
-	set Transaction.DateCashDisc = Factuur.GeefVervalDatumKortingContant()
 		 
 	set Transaction.Txt = Factuur.GeefKlant().GeefNaam()
 	
Index: DOM/VKP/impl/DataM/DataMFactProfAbstract.cls.xml
===================================================================
diff -u -r34786 -r34817
--- DOM/VKP/impl/DataM/DataMFactProfAbstract.cls.xml	(.../DataMFactProfAbstract.cls.xml)	(revision 34786)
+++ DOM/VKP/impl/DataM/DataMFactProfAbstract.cls.xml	(.../DataMFactProfAbstract.cls.xml)	(revision 34817)
@@ -58,7 +58,7 @@
 <ReturnType>%Date</ReturnType>
 <Implementation><![CDATA[
 	do ##class(vhLib.OldSchool).InitVars()
-	New R set R = $$EXTDATE^vhLib.DataTypes(..GeefFactuurDatum()+1,"DKP")_"\"_..GeefKlant().GeefKortingContantTermijn()
+	New R set R = $$EXTDATE^vhLib.DataTypes(..GeefFactuurDatum(),"DKP")_"\"_..GeefKlant().GeefKortingContantTermijn()
 	do ^cA104
 	quit $$INTDATE^vhLib.DataTypes(R)
 ]]></Implementation>
Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml
===================================================================
diff -u -r34786 -r34817
--- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml	(.../SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml)	(revision 34786)
+++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml	(.../SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml)	(revision 34817)
@@ -9,7 +9,7 @@
     <MessageParts>
       <LedgerGeneralJournal xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
         <LedgerJournalTable class="entity">
-          <JournalName>VHBE-VF</JournalName>
+          <JournalName>VH-VF</JournalName>
           <Name>Van Hoecke verkoopfacturen interface</Name>
           <LedgerJournalTrans class="entity">
             <AccountType>Cust</AccountType>
@@ -18,7 +18,7 @@
             <CashDiscCode>08D2%</CashDiscCode>
             <Company>VHBE</Company>
             <CurrencyCode>EUR</CurrencyCode>
-            <DateCashDisc>2016-03-31</DateCashDisc>
+            <DateCashDisc>2016-03-30</DateCashDisc>
             <DocumentNum>F586.689</DocumentNum>
             <Due>2016-04-22</Due>
             <Invoice>F586689</Invoice>
@@ -44,7 +44,7 @@
             <CashDiscCode>08D2%</CashDiscCode>
             <Company>VHBE</Company>
             <CurrencyCode>EUR</CurrencyCode>
-            <DateCashDisc>2016-03-31</DateCashDisc>
+            <DateCashDisc>2016-03-30</DateCashDisc>
             <DocumentNum>F586.689</DocumentNum>
             <Due>2016-04-22</Due>
             <Invoice>F586689</Invoice>