Index: AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml
===================================================================
diff -u -r45745 -r45800
--- AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 45745)
+++ AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 45800)
@@ -101,12 +101,22 @@
 <Private>1</Private>
 <ReturnType>DOM.AKP.Toelevering</ReturnType>
 <Implementation><![CDATA[
-	#dim LeverancierID as %String = ##class(AXimpl.AxToAdminUtils).ConvertSupplierID(JournalEntryLine.CustVendAccount)
+	#dim LeverancierID as %String = ""
+	if JournalEntryLine.InventTransType = "Sales" {
+		Set LeverancierID = "L||6051"
+	} else {
+		Set LeverancierID = ##class(AXimpl.AxToAdminUtils).ConvertSupplierID(JournalEntryLine.CustVendAccount)
+	}
 	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.MaakNieuwToelevering(LeverancierID)
 
 	Do Toelevering.ZetAanmaakDatum(..DateTimeAPI.CurrentDate() )
 	Do Toelevering.ZetMunt("EUR")
-	Do Toelevering.ZetReferentie(JournalEntry.JournalId)
+	If JournalEntryLine.InventTransType = "Sales" {
+		Do Toelevering.ZetReferentie(JournalEntry.JournalId_ " Terugname klant "_ JournalEntryLine.CustVendAccount)
+	} else {
+		Do Toelevering.ZetReferentie(JournalEntry.JournalId)
+	}
+	
 	Do Toelevering.ZetBestelBevestigingNr(JournalEntry.JournalId)
 	
 	Quit Toelevering
@@ -117,9 +127,9 @@
 <FormalSpec>Toelevering:DOM.AKP.Toelevering,JournalEntryLine:AXif.Dynamics.InventoryIn.MessageParts.AxdEntityJournalTrans</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim ProductNr as %String = ..ProductLookup.GeefProductIdVoorLeverancierId(JournalEntryLine.ItemId,Toelevering.GeefLeverancierID())	
+	#dim ProductId as %String = ..ProductLookup.GeefProductIdVoorLeverancierId(JournalEntryLine.ItemId,Toelevering.GeefLeverancierID())		
 	#dim Aantal as %Decimal = JournalEntryLine.Qty
-	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.MaakNieuweProductLijn(ProductNr)
+	#dim ToeleveringLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.MaakNieuweProductLijn(ProductId)
 	Do ToeleveringLijn.ZetAantal(JournalEntryLine.Qty)
 	Do ToeleveringLijn.ZetMunt("EUR")
 	Do ToeleveringLijn.ZetEenheidsPrijs(0)
Index: vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestConversievoorterugname/JournaalTerugname.xml
===================================================================
diff -u
--- vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestConversievoorterugname/JournaalTerugname.xml	(revision 0)
+++ vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestConversievoorterugname/JournaalTerugname.xml	(revision 45800)
@@ -0,0 +1,12 @@
+<ADUMsgWMSJournalOut xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/ADUMsgWMSJournalOut">
+    <JournalTable class="entity">
+        <JournalId>00000018</JournalId>
+        <JournalTrans class="entity">
+            <CustVendAccount>03042</CustVendAccount>
+            <InventTransType>Sales</InventTransType>
+            <ItemId>Identnummer</ItemId>
+            <JournalLineNum>1.0000000000</JournalLineNum>
+            <Qty>500.00</Qty>
+        </JournalTrans>
+    </JournalTable>
+</ADUMsgWMSJournalOut>
Index: vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/Testonwaarschijnlijketerugnamevan2klantenwordt1toeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml
===================================================================
diff -u
--- vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/Testonwaarschijnlijketerugnamevan2klantenwordt1toeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml	(revision 0)
+++ vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/Testonwaarschijnlijketerugnamevan2klantenwordt1toeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml	(revision 45800)
@@ -0,0 +1,19 @@
+<ADUMsgWMSJournalOut xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/ADUMsgWMSJournalOut">
+    <JournalTable class="entity">
+        <JournalId>00000018</JournalId>
+        <JournalTrans class="entity">
+            <CustVendAccount>03042</CustVendAccount>
+            <InventTransType>Sales</InventTransType>
+            <ItemId>Identnummer</ItemId>
+            <JournalLineNum>1.0000000000</JournalLineNum>
+            <Qty>500.00</Qty>
+        </JournalTrans>
+        <JournalTrans class="entity">
+            <CustVendAccount>03042</CustVendAccount>
+            <InventTransType>Sales</InventTransType>
+            <ItemId>Identnummer2</ItemId>
+            <JournalLineNum>1.0000000000</JournalLineNum>
+            <Qty>500.00</Qty>
+        </JournalTrans>
+    </JournalTable>
+</ADUMsgWMSJournalOut>
Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/TestTerugname.cls.xml	(revision 45800)
@@ -0,0 +1,156 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter.TestTerugname">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Do ##super()
+	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+]]></Implementation>
+</Method>
+
+<Method name="Test terugname wordt een toelevering en receptie voor Leverancier Vanhoecke aangemaakt">
+<Implementation><![CDATA[
+	Set ProductLijnen = ##class(%ListOfObjects).%New()
+	Do ProductLijnen.Insert( ##class(vhTest.Utils.DOM.AKP.ProductToeleveringLijn).GeefProductToeleveringLijn())
+    #dim ToeleveringMock as DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding("L||6051",ProductLijnen)
+    Do ToeleveringMock.VerwachtMethodCall("MaakNieuweProductLijn",4321).DanReturn(ProductLijnen.GetAt(1))
+
+    #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+    Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||6051","").DanReturn(ToeleveringMock)
+    Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock).DanDoeNiks()
+
+    Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
+    Do ProductLookupMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||6051").DanReturn("4321")
+
+ 	Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","L||6051","1", ..Matches.List(ProductLijnen) ,$$$CurrentTimeStamp ,"BestelBevestigingNr").DanReturn("RcpNummer")
+
+ 	Set RequestInventoryOut = ##class(AXimpl.Request).%New("Inventory/Update", "4321")
+	Set Antwoord = ##class(AXif.Dynamics.Inventory.MessageParts).%New()
+	Set InventoryOutConverter = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New()
+	Do InventoryOutConverter.VerwachtMethodCall("Convert",..Matches.DataTransferObject(RequestInventoryOut),"MessageID").DanReturn(Antwoord)
+
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter)
+    #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID")
+    
+    Do $$$AssertEquals(Response,Antwoord)
+    Do ToeleveringAPIMock.Verifieer()
+    Do ToeleveringMock.Verifieer()
+    Do ProductLookupMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+    Do InventoryOutConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test onwaarschijnlijke terugname van 2 klanten wordt 1 toelevering en receptie voor Leverancier Vanhoecke aangemaakt">
+<Implementation><![CDATA[
+	Set ProductLijnen = ##class(%ListOfObjects).%New()
+	Do ProductLijnen.Insert(##class(vhTest.Utils.DOM.AKP.ProductToeleveringLijn).GeefProductToeleveringLijn())
+	Do ProductLijnen.Insert(##class(vhTest.Utils.DOM.AKP.ProductToeleveringLijn).GeefProductToeleveringLijn())
+    #dim ToeleveringMock as DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding("L||6051",ProductLijnen)
+    
+    #dim ProductLijnStub as DOM.AKP.ProductToeleveringLijn = ##class(vhTest.Utils.DOM.AKP.ProductToeleveringLijn).GeefProductToeleveringLijn()
+    Do ToeleveringMock.VerwachtMethodCall("MaakNieuweProductLijn",4321).DanReturn(ProductLijnStub).ExactAantalKeer(1)
+    Do ToeleveringMock.VerwachtMethodCall("MaakNieuweProductLijn",8765).DanReturn(ProductLijnStub).ExactAantalKeer(1)
+    
+    #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+    Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||6051","").DanReturn(ToeleveringMock).ExactAantalKeer(1)
+    Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock).DanDoeNiks().ExactAantalKeer(2)
+	
+	
+    Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
+    Do ProductLookupMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||6051").DanReturn("4321")
+    Do ProductLookupMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","Identnummer2","L||6051").DanReturn("8765")
+
+ 	Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","L||6051","1", ..Matches.List(ProductLijnen) ,$$$CurrentTimeStamp ,"BestelBevestigingNr").DanReturn("RcpNummer")
+
+ 	Set RequestInventoryOut = ##class(AXimpl.Request).%New("Inventory/Update", "4321,8765")
+	Set Antwoord = ##class(AXif.Dynamics.Inventory.MessageParts).%New()
+	Set InventoryOutConverter = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New()
+	Do InventoryOutConverter.VerwachtMethodCall("Convert",..Matches.DataTransferObject(RequestInventoryOut),"MessageID").DanReturn(Antwoord)
+
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverter)
+    #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID")
+    
+    Do $$$AssertEquals(Response,Antwoord)
+    Do ToeleveringAPIMock.Verifieer()
+    Do ToeleveringMock.Verifieer()
+    Do ProductLookupMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+    Do InventoryOutConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test Conversie voor terugname">
+<Implementation><![CDATA[
+    Set ToeleveringLijnMock = ##class(vhTest.Mock.DOM.AKP.ProductToeleveringLijn).%New()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetAantal",500).DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetEenheidsPrijs",0).DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetNettoprijs",0).DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetBestelBevestigingNr","Referentie-1").DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetTotaalBedrag",0).DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetGrootteOrde","E").DanDoeNiks()
+    ;Do ToeleveringLijnMock.VerwachtMethodCall("ZetLeveringsWeekVoorziene","").DanDoeNiks()
+    Do ToeleveringLijnMock.VerwachtMethodCall("ZetUrgentiecode","").DanDoeNiks()    
+
+    Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+    Do ToeleveringMock.IndienMethodCall("GeefID").DanReturn(1)
+    Do ToeleveringMock.IndienMethodCall("GeefBestelBevestigingNr").DanReturn("BestelBevestigingNr")
+    do ToeleveringMock.VerwachtMethodCall("ZetAanmaakDatum",$$$CurrentDate).DanDoeNiks()
+    do ToeleveringMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
+    do ToeleveringMock.VerwachtMethodCall("ZetReferentie","00000018 Terugname klant 03042").DanDoeNiks()
+    do ToeleveringMock.VerwachtMethodCall("ZetBestelBevestigingNr","00000018").DanDoeNiks()
+    Do ToeleveringMock.VerwachtMethodCall("GeefReferentie").DanReturn("Referentie")
+    Do ToeleveringMock.VerwachtMethodCall("GeefLeverancierID").DanReturn("L||6051")
+    Do ToeleveringMock.IndienMethodCall("MaakNieuweProductLijn","4321").DanReturn(ToeleveringLijnMock)
+
+	Set ProductLijnen = ##class(%ListOfObjects).%New()
+	Do ProductLijnen.Insert(ToeleveringLijnMock)
+    Do ToeleveringMock.VerwachtMethodCall("GeefProductLijnIterator").DanReturn(##class(TECH.ListIterator).%New(ProductLijnen))
+    
+    #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+    Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||6051","").DanReturn(ToeleveringMock)
+    Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock).DanDoeNiks()
+    
+    Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
+    Do ProductLookupMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||6051").DanReturn("4321")
+    
+    Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","L||6051","1",..Matches.List(ProductLijnen),$$$CurrentTimeStamp,"BestelBevestigingNr").DanReturn("RcpNummer")
+ 	
+ 	Set RequestInventoryOut = ##class(AXimpl.Request).%New("Inventory/Update", "4321")
+	Set Antwoord = ##class(AXif.Dynamics.Inventory.MessageParts).%New()
+	Set InventoryOutConverterStub = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New()
+	Do InventoryOutConverterStub.IndienMethodCall("Convert",..Matches.DataTransferObject(RequestInventoryOut),"MessageID").DanReturn(Antwoord)
+ 	
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,InventoryOutConverterStub)
+    #dim Response As AXif.Dynamics.Inventory.MessageParts = Converter.Convert(..GeefJournal(),"MessageID")
+    
+    Do $$$AssertEquals(Response,Antwoord)    
+    Do ToeleveringLijnMock.Verifieer()
+    Do ToeleveringMock.Verifieer()
+    Do ToeleveringAPIMock.Verifieer()
+    Do ProductLookupMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefJournal">
+<Private>1</Private>
+<ReturnType>AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut</ReturnType>
+<Implementation><![CDATA[
+    #dim XmlCorrelater As TECH.XMLCorrelater = ##class(TECH.XMLCorrelater).%New()
+    #dim ClassName As %String = ##class(AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut).%ClassName(1)
+    #dim VolledigeBestandsnaam as %String = ##class(TECH.Files).AppendFile(..GeefBestandLocatie(),"JournaalTerugname.xml")
+    #dim Journal As AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut = XmlCorrelater.GeefObjectVanBestand(VolledigeBestandsnaam ,ClassName,"ADUMsgWMSJournalOut")
+    quit Journal
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestterugnamewordteentoeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml
===================================================================
diff -u
--- vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestterugnamewordteentoeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml	(revision 0)
+++ vhTestFiles/UnitTests/AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter/TestTerugname/TestterugnamewordteentoeleveringenreceptievoorLeverancierVanhoeckeaangemaakt/JournaalTerugname.xml	(revision 45800)
@@ -0,0 +1,12 @@
+<ADUMsgWMSJournalOut xmlns="http://schemas.microsoft.com/dynamics/2008/01/documents/ADUMsgWMSJournalOut">
+    <JournalTable class="entity">
+        <JournalId>00000018</JournalId>
+        <JournalTrans class="entity">
+            <CustVendAccount>03042</CustVendAccount>
+            <InventTransType>Sales</InventTransType>
+            <ItemId>Identnummer</ItemId>
+            <JournalLineNum>1.0000000000</JournalLineNum>
+            <Qty>500.00</Qty>
+        </JournalTrans>
+    </JournalTable>
+</ADUMsgWMSJournalOut>