Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500  - VHBE - 20160501_091500.xml
===================================================================
diff -u -r34713 -r34719
--- 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 34713)
+++ 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 34719)
@@ -20,6 +20,7 @@
             <CurrencyCode>EUR</CurrencyCode>
             <DocumentNum>F300.500</DocumentNum>
             <Due>1846-07-09</Due>
+            <Invoice>F300500</Invoice>
             <s01:LedgerDimension xmlns="http://schemas.microsoft.com/dynamics/2008/01/sharedtypes" xmlns:s01="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
               <DisplayValue>01313 - HEREMANS KEUKENS</DisplayValue>
               <Account>01313</Account>
@@ -39,6 +40,7 @@
             <CurrencyCode>EUR</CurrencyCode>
             <DocumentNum>F300.500</DocumentNum>
             <Due>1846-07-09</Due>
+            <Invoice>F300500</Invoice>
             <s01:LedgerDimension xmlns="http://schemas.microsoft.com/dynamics/2008/01/sharedtypes" xmlns:s01="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
               <DisplayValue>703100-</DisplayValue>
               <Account>703100</Account>
Index: vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml
===================================================================
diff -u -r34717 -r34719
--- vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 34717)
+++ vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 34719)
@@ -58,6 +58,30 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Een factuur met twee boekingslijnen bevat drie transacties één voor de klant en twee voor de grootberekening">
+<Implementation><![CDATA[
+	set Boekingen = ##class(DOM.VKP.Factuur.dto.BoekhoudBoekingList).%New()
+	do Boekingen.Insert(##class(DOM.VKP.Factuur.dto.BoekhoudBoeking).%New(50,700000))
+	do Boekingen.Insert(##class(DOM.VKP.Factuur.dto.BoekhoudBoeking).%New(50,700100))
+	
+	#dim VerkoopFactuur As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardFactuur()
+	do VerkoopFactuur.IndienMethodCall("GeefBoekhoudBoekingen").DanReturn(Boekingen)
+	
+	#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(,,OrderApiStub)
+	#dim GeneralJournal As AXaif.LedgerGeneralJournal.AxdLedgerGeneralJournal = Converter.Convert(VerkoopFactuur.GeefID())
+	#dim JournalTable As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable = GeneralJournal.LedgerJournalTable.GetAt(1)
+	
+	if $$$AssertEquals(JournalTable.LedgerJournalTrans.Count(),3) {
+		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).AccountType,"Cust")	
+		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).AccountType,"Ledger")	
+		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(3).AccountType,"Ledger")
+	}
+]]></Implementation>
+</Method>
+
 <Method name="Test: Een creditnota geeft een omgekeerde werking">
 <Implementation><![CDATA[
 	#dim Creditnota As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardCreditnota()
@@ -91,27 +115,22 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Een factuur met twee boekingslijnen bevat drie transacties één voor de klant en twee voor de grootberekening">
+<Method name="Test: Een creditnota heeft een andere prefix - maar wordt wel geboekt in zelfde dagboek (voucher) als de facturen">
 <Implementation><![CDATA[
-	set Boekingen = ##class(DOM.VKP.Factuur.dto.BoekhoudBoekingList).%New()
-	do Boekingen.Insert(##class(DOM.VKP.Factuur.dto.BoekhoudBoeking).%New(50,700000))
-	do Boekingen.Insert(##class(DOM.VKP.Factuur.dto.BoekhoudBoeking).%New(50,700100))
-	
-	#dim VerkoopFactuur As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardFactuur()
-	do VerkoopFactuur.IndienMethodCall("GeefBoekhoudBoekingen").DanReturn(Boekingen)
-	
+	#dim Creditnota As DOM.VKP.Factuur = ##class(vhTest.Utils.DOM.VKP.Factuur).StandaardCreditnota()
+
 	#dim OrderApiStub As vhTest.Mock.DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
-	do OrderApiStub.IndienMethodCall("GeefFactuur",VerkoopFactuur.GeefID()).DanReturn(VerkoopFactuur)
+	do OrderApiStub.IndienMethodCall("GeefFactuur",Creditnota.GeefID()).DanReturn(Creditnota)
 	
 	set Converter = ##class(AX.Uitgaand.VKP.VerkoopFactuur.impl.AifConverter).%New(,,OrderApiStub)
-	#dim GeneralJournal As AXaif.LedgerGeneralJournal.AxdLedgerGeneralJournal = Converter.Convert(VerkoopFactuur.GeefID())
+
+	set Converter = ##class(AX.Uitgaand.VKP.VerkoopFactuur.impl.AifConverter).%New(,,OrderApiStub)
+	#dim GeneralJournal As AXaif.LedgerGeneralJournal.AxdLedgerGeneralJournal = Converter.Convert(Creditnota.GeefID())
 	#dim JournalTable As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable = GeneralJournal.LedgerJournalTable.GetAt(1)
 	
-	if $$$AssertEquals(JournalTable.LedgerJournalTrans.Count(),3) {
-		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).AccountType,"Cust")	
-		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).AccountType,"Ledger")	
-		do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(3).AccountType,"Ledger")
-	}
+	do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).Voucher,"F654321")
+	do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).Invoice,"CN654321")	
+	do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).DocumentNum,"CN654.321")
 ]]></Implementation>
 </Method>
 
Index: AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml
===================================================================
diff -u -r34717 -r34719
--- AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34717)
+++ AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34719)
@@ -130,8 +130,10 @@
 	 
 	set Transaction.Txt = Factuur.GeefKlant().GeefNaam()
 	
-	set Transaction.DocumentNum = "F"_$extract(Factuur.GeefID(),1,3)_"."_$extract(Factuur.GeefID(),4,6)
-	set Transaction.Invoice = "F"_Factuur.GeefID()
+	#dim DocumentPrefix As %String = $$$If(Factuur.GeefFactuurCode()="F","F","CN")
+	
+	set Transaction.DocumentNum = DocumentPrefix_$extract(Factuur.GeefID(),1,3)_"."_$extract(Factuur.GeefID(),4,6)
+	set Transaction.Invoice = DocumentPrefix_Factuur.GeefID()
 	set Transaction.Voucher = "F"_Factuur.GeefID()
 	
 	quit Transaction
Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml
===================================================================
diff -u
--- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml	(revision 0)
+++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689  - VHBE - 20160501_091500.xml	(revision 34719)
@@ -0,0 +1,59 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Envelope xmlns="http://schemas.microsoft.com/dynamics/2011/01/documents/Message">
+  <Header>
+    <MessageId>{12345678-ABCD-EFGH-1234-1234567890AB}</MessageId>
+    <Company>VHBE</Company>
+    <Action>http://schemas.microsoft.com/dynamics/2008/01/services/GeneralJournalService/create</Action>
+  </Header>
+  <Body>
+    <MessageParts>
+      <LedgerGeneralJournal xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
+        <LedgerJournalTable class="entity">
+          <JournalName>VHBE-VF</JournalName>
+          <Name>Van Hoecke verkoopfacturen interface</Name>
+          <LedgerJournalTrans class="entity">
+            <AccountType>Cust</AccountType>
+            <AmountCurDebit>1,220.23</AmountCurDebit>
+            <CashDiscAmount>20.24</CashDiscAmount>
+            <CashDiscCode>08D2%</CashDiscCode>
+            <Company>prbe</Company>
+            <CurrencyCode>EUR</CurrencyCode>
+            <DocumentNum>F586.689</DocumentNum>
+            <Due>1846-07-09</Due>
+            <Invoice>F586689</Invoice>
+            <s01:LedgerDimension xmlns="http://schemas.microsoft.com/dynamics/2008/01/sharedtypes" xmlns:s01="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
+              <DisplayValue><![CDATA[09283 - L & P INTERIEURPRODUKTIE]]></DisplayValue>
+              <Account>09283</Account>
+            </s01:LedgerDimension>
+            <LineNum>1.0000000000</LineNum>
+            <OffsetAccountType>Ledger</OffsetAccountType>
+            <OffsetCompany>prbe</OffsetCompany>
+            <TransDate>1846-07-09</TransDate>
+            <Txt><![CDATA[L & P INTERIEURPRODUKTIE]]></Txt>
+            <Voucher>F586689</Voucher>
+          </LedgerJournalTrans>
+          <LedgerJournalTrans class="entity">
+            <AccountType>Ledger</AccountType>
+            <AmountCurCredit>1,011.97</AmountCurCredit>
+            <CashDiscCode>08D2%</CashDiscCode>
+            <Company>prbe</Company>
+            <CurrencyCode>EUR</CurrencyCode>
+            <DocumentNum>F586.689</DocumentNum>
+            <Due>1846-07-09</Due>
+            <Invoice>F586689</Invoice>
+            <s01:LedgerDimension xmlns="http://schemas.microsoft.com/dynamics/2008/01/sharedtypes" xmlns:s01="http://schemas.microsoft.com/dynamics/2008/01/documents/LedgerGeneralJournal">
+              <DisplayValue>703000-</DisplayValue>
+              <Account>703000</Account>
+            </s01:LedgerDimension>
+            <LineNum>2.0000000000</LineNum>
+            <OffsetAccountType>Ledger</OffsetAccountType>
+            <OffsetCompany>prbe</OffsetCompany>
+            <TransDate>1846-07-09</TransDate>
+            <Txt><![CDATA[L & P INTERIEURPRODUKTIE]]></Txt>
+            <Voucher>F586689</Voucher>
+          </LedgerJournalTrans>
+        </LedgerJournalTable>
+      </LedgerGeneralJournal>
+    </MessageParts>
+  </Body>
+</Envelope>
Index: vhUnitTest/AX/Uitgaand/common/impl/AifGenerator/Generate/Test.cls.xml
===================================================================
diff -u -r34713 -r34719
--- vhUnitTest/AX/Uitgaand/common/impl/AifGenerator/Generate/Test.cls.xml	(.../Test.cls.xml)	(revision 34713)
+++ vhUnitTest/AX/Uitgaand/common/impl/AifGenerator/Generate/Test.cls.xml	(.../Test.cls.xml)	(revision 34719)
@@ -44,6 +44,24 @@
 	Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Verkoopcreditnota - export">
+<Implementation><![CDATA[
+	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer("01.05.2016")
+	
+	#dim VerkoopFactuurId As %String = "586689"
+	
+	do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AX_AIF",..GeefBestandLocatie()_"\AIF",..#Applicatie)
+	
+	set MessageManager = ##class(vhTest.Mock.AX.Uitgaand.common.impl.MessageManager).%New()
+	do MessageManager.IndienMethodCall("GenerateID").DanReturn("{12345678-ABCD-EFGH-1234-1234567890AB}")
+
+	set Generator = ##class(AX.Uitgaand.common.impl.AifGenerator).%New(MessageManager)
+	do Generator.Generate("SalesInvoice/Create",VerkoopFactuurId)
+	
+	Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
+]]></Implementation>
+</Method>
 </Class>