Index: AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml
===================================================================
diff -u -r45101 -r45170
--- AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 45101)
+++ AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 45170)
@@ -24,8 +24,18 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ReceptieService">
+<Type>APPS.AKP.Receptie.impl.ReceptieService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="LegacyPartijAPI">
+<Type>DOM.PARTIJ.LegacyPartijAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>DateTimeAPI:TECH.DateTime.DateTimeAPI,ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler</FormalSpec>
+<FormalSpec>DateTimeAPI:TECH.DateTime.DateTimeAPI,ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,LegacyPartijAPI:DOM.PARTIJ.LegacyPartijAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -35,6 +45,8 @@
 	 Set ..ToeleveringAPI = $$$Inject(ToeleveringAPI,##class(DOM.DomeinContext).Instance().GeefToeleveringAPI())
 	 Set ..ProductLookup = $$$Inject(ProductLookup,##class(AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New())
 	 Set ..ToeleveringArray = ##class(%ArrayOfDataTypes).%New()
+	 Set ..ReceptieService = $$$Inject(ReceptieService,##class(APPS.AKP.Receptie.impl.ReceptieService).%New())
+	 Set ..LegacyPartijAPI = $$$Inject(LegacyPartijAPI,##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI())
 	 Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -64,9 +76,11 @@
 			
 			Do ..VoegToeToeleveringProductLijn(Toelevering ,JournalEntryLine)
 			Do ..ToeleveringAPI.Bewaar(Toelevering)
-		}
-		
+		}		
 	}
+
+	Do ..MaakRecepties()
+	
 	quit ##class(AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery).%New()
 ]]></Implementation>
 </Method>
@@ -108,6 +122,31 @@
 	Do ToeleveringLijn.ZetUrgentiecode("")
 ]]></Implementation>
 </Method>
+
+<Method name="MaakRecepties">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set AangemaakteRecepties = ##class(%ListOfDataTypes).%New()
+	Set ToeleveringIterator = ##class(TECH.ListIterator).%New(..ToeleveringArray)
+	While ToeleveringIterator.HasNext(){
+		Do AangemaakteRecepties.Insert(..MaakReceptieVoorToelevering(ToeleveringIterator.Next()))
+	}
+]]></Implementation>
+</Method>
+
+<Method name="MaakReceptieVoorToelevering">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProductLijnIterator as TECH.ListIterator = Toelevering.GeefProductLijnIterator()
+	Set Productlijnen = ##class(%ListOfObjects).%New()
+	while ProductLijnIterator.HasNext() {
+		do Productlijnen.Insert(ProductLijnIterator.Next())
+	}
+	#Dim LeverancierNummer as %String = ..LegacyPartijAPI.GeefLeverancierNummerVoorPartijID(Toelevering.GeefLeverancierID())
+	Quit ..ReceptieService.MaakReceptieVoorToelevering(LeverancierNummer,Toelevering.GeefID(),Productlijnen,..DateTimeAPI.CurrentHorolog(),Toelevering.GeefBestelBevestigingNr())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml
===================================================================
diff -u -r45101 -r45170
--- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 45101)
+++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 45170)
@@ -7,29 +7,50 @@
 <Implementation><![CDATA[
     Set DateTimeAPIMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
     Do DateTimeAPIMock.VerwachtMethodCall("CurrentDate").DanReturn(64524)
+    Do DateTimeAPIMock.VerwachtMethodCall("CurrentHorolog",0).DanReturn(64524.57298)
 
-    #dim ToeleveringMock as DOM.AKP.Toelevering = ..GeefToelevering("L||1234")
+	Set LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefLeverancierNummerVoorPartijID","L||1234").DanReturn("1234")
+	
+	Set ProductLijnen = ##class(%ListOfObjects).%New()
+	Do ProductLijnen.Insert(..GeefProductToeleveringLijn())
+    #dim ToeleveringMock as DOM.AKP.Toelevering = ..GeefToelevering("L||1234",ProductLijnen)
     #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
     Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||1234","").DanReturn(ToeleveringMock)
     Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock).DanDoeNiks()
     
     Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer","L||1234").DanReturn("4321")
+ 
+ 	Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Set ListMatcher = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(ProductLijnen)
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","1234","1",ListMatcher ,64524.57298,"BestelBevestigingNr").DanReturn("RcpNummer")
     
-    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock)
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,LegacyPartijAPIMock)
     #dim response As AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery = Converter.Convert(..GeefJournal(),"MessageID")
     
     Do DateTimeAPIMock.Verifieer()  
     Do ToeleveringAPIMock.Verifieer()
     Do ProductLookupMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+    Do LegacyPartijAPIMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test 2 lijnen zelfde leverancier">
 <Implementation><![CDATA[
     Set DateTimeAPIMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
     Do DateTimeAPIMock.VerwachtMethodCall("CurrentDate").DanReturn(64524)
-    #dim ToeleveringMock as DOM.AKP.Toelevering = ..GeefToelevering("L||1234")
+    Do DateTimeAPIMock.VerwachtMethodCall("CurrentHorolog",0).DanReturn(64524.57298)
+
+	Set LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefLeverancierNummerVoorPartijID","L||1234").DanReturn("1234")
+
+	Set ProductLijnen = ##class(%ListOfObjects).%New()
+	Do ProductLijnen.Insert(..GeefProductToeleveringLijn())
+	Do ProductLijnen.Insert(..GeefProductToeleveringLijn())
+    #dim ToeleveringMock as DOM.AKP.Toelevering = ..GeefToelevering("L||1234",ProductLijnen)
+
     #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
     Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||1234","").DanReturn(ToeleveringMock).ExactAantalKeer(1)
     Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock).DanDoeNiks().ExactAantalKeer(2)
@@ -38,22 +59,40 @@
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer","L||1234").DanReturn("4321")
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer2","L||1234").DanReturn("8765")
     
-    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock)
+   	Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Set ListMatcher = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(ProductLijnen)
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","1234","1",ListMatcher ,64524.57298,"BestelBevestigingNr").DanReturn("RcpNummer")
+
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,LegacyPartijAPIMock)
     #dim response As AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery = Converter.Convert(..GeefJournal2LijnenZelfdeLeverancier(),"MessageID")
     
     Do DateTimeAPIMock.Verifieer()  
     Do ToeleveringAPIMock.Verifieer()
     Do ProductLookupMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+	Do LegacyPartijAPIMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test 2 lijnen verschillende leverancier">
 <Implementation><![CDATA[
     Set DateTimeAPIMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
     Do DateTimeAPIMock.VerwachtMethodCall("CurrentDate").DanReturn(64524)
-    #dim ToeleveringMock1 as DOM.AKP.Toelevering = ..GeefToelevering("L||1234")
-    #dim ToeleveringMock2 as DOM.AKP.Toelevering = ..GeefToelevering("L||5678")
+    Do DateTimeAPIMock.VerwachtMethodCall("CurrentHorolog",0).DanReturn(64524.57298)
+
+   	Set LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefLeverancierNummerVoorPartijID","L||1234").DanReturn("1234")
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefLeverancierNummerVoorPartijID","L||5678").DanReturn("5678")
+
+	Set ProductLijnen1 = ##class(%ListOfObjects).%New()
+	Do ProductLijnen1.Insert(..GeefProductToeleveringLijn())
+    #dim ToeleveringMock1 as DOM.AKP.Toelevering = ..GeefToelevering("L||1234",ProductLijnen1)
+
+	Set ProductLijnen2 = ##class(%ListOfObjects).%New()
+	Do ProductLijnen2.Insert(..GeefProductToeleveringLijn())
+    #dim ToeleveringMock2 as DOM.AKP.Toelevering = ..GeefToelevering("L||5678",ProductLijnen2)
     #dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+    
     Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||1234","").DanReturn(ToeleveringMock1).ExactAantalKeer(1)
     Do ToeleveringAPIMock.VerwachtMethodCall("MaakNieuwToelevering","L||5678","").DanReturn(ToeleveringMock2).ExactAantalKeer(1)
     Do ToeleveringAPIMock.VerwachtMethodCall("Bewaar",ToeleveringMock1).DanDoeNiks().ExactAantalKeer(1)
@@ -62,13 +101,21 @@
     Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer","L||1234").DanReturn("4321")
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer2","L||5678").DanReturn("8765")
-    
-    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock)
+        
+  	Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Set ListMatcher1 = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(ProductLijnen1)
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","1234","1",ListMatcher1 ,64524.57298,"BestelBevestigingNr").DanReturn("RcpNummer")
+ 	Set ListMatcher2 = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(ProductLijnen2)
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","5678","1",ListMatcher2 ,64524.57298,"BestelBevestigingNr").DanReturn("RcpNummer")
+
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,LegacyPartijAPIMock)
     #dim response As AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery = Converter.Convert(..GeefJournal2LijnenVerschillendeLeverancier(),"MessageID")
     
     Do DateTimeAPIMock.Verifieer()  
     Do ToeleveringAPIMock.Verifieer()
     Do ProductLookupMock.Verifieer()
+    do ReceptieServiceMock.Verifieer()
+	Do LegacyPartijAPIMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -81,7 +128,11 @@
 <Implementation><![CDATA[
     Set DateTimeAPIMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
     Do DateTimeAPIMock.VerwachtMethodCall("CurrentDate").DanReturn(64524)
-    
+    Do DateTimeAPIMock.VerwachtMethodCall("CurrentHorolog",0).DanReturn(64524.57298)
+
+	Set LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefLeverancierNummerVoorPartijID","L||1234").DanReturn("1234")
+
     Set ToeleveringLijnMock = ##class(vhTest.Mock.DOM.AKP.ProductToeleveringLijn).%New()
     Do ToeleveringLijnMock.VerwachtMethodCall("ZetAantal",25).DanDoeNiks()
     Do ToeleveringLijnMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
@@ -94,13 +145,20 @@
     Do ToeleveringLijnMock.VerwachtMethodCall("ZetUrgentiecode","").DanDoeNiks()    
 
     Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+    Do ToeleveringMock.IndienMethodCall("GeefID").DanReturn(1)
+    Do ToeleveringMock.IndienMethodCall("GeefReferentie").DanReturn("Referentie")
+    Do ToeleveringMock.IndienMethodCall("GeefBestelBevestigingNr").DanReturn("BestelBevestigingNr")
     do ToeleveringMock.VerwachtMethodCall("ZetAanmaakDatum",64524).DanDoeNiks()
     do ToeleveringMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
     do ToeleveringMock.VerwachtMethodCall("ZetReferentie","JournalId").DanDoeNiks()
     do ToeleveringMock.VerwachtMethodCall("ZetBestelBevestigingNr","JournalId").DanDoeNiks()
     Do ToeleveringMock.VerwachtMethodCall("GeefReferentie").DanReturn("Referentie")
     Do ToeleveringMock.VerwachtMethodCall("GeefLeverancierID").DanReturn("L||1234")
     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||1234","").DanReturn(ToeleveringMock)
@@ -109,29 +167,47 @@
     Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New()
     Do ProductLookupMock.VerwachtMethodCall("GeefProductNummerVoorLeverancierID","Identnummer","L||1234").DanReturn("4321")
     
-    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock)
+    Set ReceptieServiceMock = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
+ 	Set ListMatcher = ##class(Tools.Mock.ArgumentMatchers.ListMatcher).%New(ProductLijnen)
+ 	Do ReceptieServiceMock.VerwachtMethodCall("MaakReceptieVoorToelevering","1234","1",ListMatcher,64524.57298,"BestelBevestigingNr").DanReturn("RcpNummer")
+
+    Set Converter = ##class(AXimpl.Dynamics.InventoryIn.Converter.InventoryInConverter).%New(DateTimeAPIMock,ToeleveringAPIMock,ProductLookupMock,ReceptieServiceMock,LegacyPartijAPIMock)
     #dim response As AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery = Converter.Convert(..GeefJournal(),"MessageID")
     
     Do DateTimeAPIMock.Verifieer()  
     Do ToeleveringAPIMock.Verifieer()
     Do ProductLookupMock.Verifieer()
     Do ToeleveringMock.Verifieer()
     Do ToeleveringLijnMock.Verifieer()
+    Do ReceptieServiceMock.Verifieer()
+    Do LegacyPartijAPIMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefToelevering">
-<FormalSpec>LeverancierID:%String</FormalSpec>
+<FormalSpec>LeverancierID:%String,ProductLijnen:%ListOfObjects</FormalSpec>
+<Private>1</Private>
 <ReturnType>vhTest.Mock.DOM.AKP.Toelevering</ReturnType>
 <Implementation><![CDATA[
     Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
     do ToeleveringMock.IndienMethodCall("ZetAanmaakDatum",$$$ElkeWaarde).DanDoeNiks()
     do ToeleveringMock.IndienMethodCall("ZetMunt",$$$ElkeWaarde).DanDoeNiks()
     do ToeleveringMock.IndienMethodCall("ZetReferentie",$$$ElkeWaarde).DanDoeNiks()
     do ToeleveringMock.IndienMethodCall("ZetBestelBevestigingNr",$$$ElkeWaarde).DanDoeNiks()
+    Do ToeleveringMock.IndienMethodCall("GeefID").DanReturn(1)
     Do ToeleveringMock.IndienMethodCall("GeefReferentie").DanReturn("Referentie")
-    Do ToeleveringMock.IndienMethodCall("GeefLeverancierID").DanReturn(LeverancierID)
-    
+    Do ToeleveringMock.IndienMethodCall("GeefBestelBevestigingNr").DanReturn("BestelBevestigingNr")
+    Do ToeleveringMock.IndienMethodCall("GeefLeverancierID").DanReturn(LeverancierID)        
+    Do ToeleveringMock.IndienMethodCall("MaakNieuweProductLijn",$$$ElkeWaarde).DanReturn(..GeefProductToeleveringLijn())
+    Do ToeleveringMock.IndienMethodCall("GeefProductLijnIterator").DanReturn(##class(TECH.ListIterator).%New(ProductLijnen))
+    Quit ToeleveringMock
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductToeleveringLijn">
+<Private>1</Private>
+<ReturnType>DOM.AKP.ProductToeleveringLijn</ReturnType>
+<Implementation><![CDATA[
     Set ToeleveringLijnMock = ##class(vhTest.Mock.DOM.AKP.ProductToeleveringLijn).%New()
     Do ToeleveringLijnMock.IndienMethodCall("ZetAantal",$$$ElkeWaarde).DanDoeNiks()
     Do ToeleveringLijnMock.IndienMethodCall("ZetMunt",$$$ElkeWaarde).DanDoeNiks()
@@ -143,8 +219,7 @@
     Do ToeleveringLijnMock.IndienMethodCall("ZetLeveringsWeekVoorziene",$$$ElkeWaarde).DanDoeNiks()
     Do ToeleveringLijnMock.IndienMethodCall("ZetUrgentiecode",$$$ElkeWaarde).DanDoeNiks()
     
-    Do ToeleveringMock.IndienMethodCall("MaakNieuweProductLijn",$$$ElkeWaarde).DanReturn(ToeleveringLijnMock)
-    Quit ToeleveringMock
+    Quit ToeleveringLijnMock
 ]]></Implementation>
 </Method>
 
Index: vhTest/Mock/APPS/AKP/Receptie/impl/ReceptieService.cls.xml
===================================================================
diff -u -r36524 -r45170
--- vhTest/Mock/APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 36524)
+++ vhTest/Mock/APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 45170)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService">
 <Description>
 Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
-Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
-Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.AKP.Receptie.impl.ReceptieService,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
@@ -25,7 +24,7 @@
 
 <Method name="GeefVervLijnNummerVanProductLijn">
 <FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,indextlunr:%Integer</FormalSpec>
-<ReturnType>%Library.Integer</ReturnType>
+<ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVervLijnNummerVanProductLijn",ReceptieNummer,ToeleveringNummer,indextlunr)
 ]]></Implementation>
 </Method>
@@ -37,9 +36,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakReceptieVoorToelevering">
+<FormalSpec>LeverancierNummer:%String,ToeleveringNummer:%String,ProductToeleveringLijnen:%ListOfObjects,OntvangstTijdstip:%String,Referentie:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakReceptieVoorToelevering",LeverancierNummer,ToeleveringNummer,ProductToeleveringLijnen,OntvangstTijdstip,Referentie)
+]]></Implementation>
+</Method>
+
 <Method name="UpdateReceptie">
-<FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,FaktuurNummerVan:%String,VervLijnNummerVan:%Integer,FaktuurNummerNaar:%String,VervLijnNummerNaar:%Integer</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("UpdateReceptie",ReceptieNummer,ToeleveringNummer,FaktuurNummerVan,VervLijnNummerVan,FaktuurNummerNaar,VervLijnNummerNaar)
+<FormalSpec>ReceptieNummer:%String,ToeleveringInfo:%String,FaktuurNummerVan:%String,VervLijnNummerVan:%Integer,FaktuurNummerNaar:%String,VervLijnNummerNaar:%Integer</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("UpdateReceptie",ReceptieNummer,ToeleveringInfo,FaktuurNummerVan,VervLijnNummerVan,FaktuurNummerNaar,VervLijnNummerNaar)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Fake/APPS/AKP/Receptie/impl/ReceptieService.cls.xml
===================================================================
diff -u -r36524 -r45170
--- vhTest/Fake/APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 36524)
+++ vhTest/Fake/APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 45170)
@@ -1,6 +1,9 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhTest.Fake.APPS.AKP.Receptie.impl.ReceptieService">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.AKP.Receptie.impl.ReceptieService</Super>
 
@@ -14,6 +17,47 @@
 <MultiDimensional>1</MultiDimensional>
 </Property>
 
+<Method name="GeefFaktuurNummerVanProductLijn">
+<FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,indextlunr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefFaktuurNummerVanProductSubLijn">
+<FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,indextlunr:%Integer,subnr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVervLijnNummerVanProductLijn">
+<FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,indextlunr:%Integer</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVervLijnNummerVanProductSubLijn">
+<FormalSpec>ReceptieNummer:%String,ToeleveringNummer:%String,indextlunr:%Integer,subnr:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakReceptieVoorToelevering">
+<FormalSpec>LeverancierID:%String,ToeleveringID:%String,ProductToeleveringLijnen:%ListOfObjects,OntvangstTijdstip:%String,Referentie:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="UpdateReceptie">
+<FormalSpec>ReceptieNummer:%String,ToeleveringInfo:%String,FaktuurNummerVan:%String,VervLijnNummerVan:%Integer,FaktuurNummerNaar:%String,VervLijnNummerNaar:%Integer</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="Setup">
 <FormalSpec>MultiDim:%String</FormalSpec>
 <Implementation><![CDATA[
Index: APPS/AKP/Receptie/impl/ReceptieService.cls.xml
===================================================================
diff -u -r37273 -r45170
--- APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 37273)
+++ APPS/AKP/Receptie/impl/ReceptieService.cls.xml	(.../ReceptieService.cls.xml)	(revision 45170)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.AKP.Receptie.impl.ReceptieService">
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.Mockable</Super>
 
 <Parameter name="Global">
 <Type>%String</Type>
@@ -74,6 +74,29 @@
 <Implementation><![CDATA[	quit $Piece(@..#Global("D",ReceptieNummer,"D",ToeleveringNummer,indextlunr,subnr),"\",11)
 ]]></Implementation>
 </Method>
+
+<Method name="MaakReceptieVoorToelevering">
+<FormalSpec>LeverancierNummer:%String,ToeleveringNummer:%String,ProductToeleveringLijnen:%ListOfObjects,OntvangstTijdstip:%String,Referentie:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Do ##class(vhLib.OldSchool).InitVars()
+	Kill ^||MarkRef
+
+	Set ProductLijnIterator = ##class(TECH.ListIterator).%New(ProductToeleveringLijnen)	
+	While ProductLijnIterator.HasNext(){
+		#dim ProductToeleveringLijn as DOM.AKP.ProductToeleveringLijn = ProductLijnIterator.Next()
+		set ^||MarkRef(ToeleveringNummer,ProductToeleveringLijn.GeefUniekLijnNummer())=ProductToeleveringLijn.GeefAantal()_"\"
+	}	
+	#Dim ReceptieNummer = $$NEXTID^EWRCP()
+	Do ##class(Tools.Wlip).%New(207).String("Lev " _ LeverancierNummer)
+	do BLDRCP^EWRCPS2(LeverancierNummer,ToeleveringNummer,"^||MarkRef",ReceptieNummer,OntvangstTijdstip ,Referentie,Referentie)
+	
+	Kill ^||MarkRef
+	
+	Do ##class(Tools.Wlip).%New(207).String("Receptie : "_ReceptieNummer)
+	Quit ReceptieNummer
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml
===================================================================
diff -u -r44933 -r45170
--- vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 44933)
+++ vhTest/Fake/AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 45170)
@@ -13,6 +13,17 @@
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
+
+<Method name="MaakReceptieVoorToelevering">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="MaakRecepties">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
 </Class>