Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml
===================================================================
diff -u -r68374 -r69249
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68374)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 69249)
@@ -92,7 +92,7 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetEenDnaCode(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
@@ -104,7 +104,7 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetDrieDnaCodes(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
@@ -116,7 +116,7 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetTienDnaCodes(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml
===================================================================
diff -u -r68388 -r69249
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68388)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 69249)
@@ -11,23 +11,17 @@
 <Default>200</Default>
 </Parameter>
 
-<Property name="ProductImplMock1">
-<Type>DOM.PM.Product</Type>
-<Private>1</Private>
-</Property>
+<Parameter name="OrderId">
+<Default>123</Default>
+</Parameter>
 
-<Property name="ProductImplMock2">
-<Type>DOM.PM.Product</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="Device">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="ProductAPIStub">
-<Type>DOM.PM.ProductAPI</Type>
+<Property name="OrderAPIStub">
+<Type>DOM.VKP.OrderAPI</Type>
 <Private>1</Private>
 </Property>
 
@@ -50,7 +44,7 @@
 <Implementation><![CDATA[
 	Do ##super()
 	
-	Set ..ProductAPIStub = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Set ..OrderAPIStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
 	Set ..ToeleveringServiceStub = ##class(vhTest.Mock.DOM.AKP.impl.ToeleveringService).%New()
 ]]></Implementation>
 </Method>
@@ -70,35 +64,35 @@
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 1
 	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
-	Do ..ZetProductMocksVoorAantal(Aantal, ..GeefLadeCodeLijst(), ..GeefLijnReferentieLijst())
+	Do ..ZetOrderStubVoorAantal(Aantal, ..GeefLijnReferentieLijst())
 	
-	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(, ..ToeleveringServiceStub, ..OrderAPIStub)
 	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
 	
 	Do ..AssertEtiketIteratorMetEenDnaCode(EtiketIterator)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: DnaCodeIterator met 2 DnaCodes met hetzelfde ProductNummer en LijnReferentie meegegeven geeft 1 etiket met aantal 2">
+<Method name="Test: DnaCodeIterator met 2 DnaCodes met dezelfde OrderlijnId en LijnReferentie meegegeven geeft 1 etiket met aantal 2">
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 2
 	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalIdentiekeDnaCodes(Aantal)
-	Do ..ZetProductMocksVoorAantal(Aantal, ..GeefLadeCodeLijst(), ..GeefLijnReferentieLijst())
+	Do ..ZetOrderStubVoorAantal(Aantal, ..GeefLijnReferentieLijst())
 	
-	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(, ..ToeleveringServiceStub, ..OrderAPIStub)
 	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
 	
 	Do ..AssertEtiketIteratorMetTweeDezelfdeDnaCodes(EtiketIterator)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: DnaCodeIterator met 2 DnaCodes met ander ProductNummer of LijnReferentie meegegeven geeft 2 etiketten">
+<Method name="Test: DnaCodeIterator met 2 DnaCodes met ander OrderlijnId of LijnReferentie meegegeven geeft 2 etiketten">
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 2
 	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
-	Do ..ZetProductMocksVoorAantal(Aantal, ..GeefLadeCodeLijst(), ..GeefLijnReferentieLijst())
+	Do ..ZetOrderStubVoorAantal(Aantal, ..GeefLijnReferentieLijst())
 	
-	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(, ..ToeleveringServiceStub, ..OrderAPIStub)
 	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
 	
 	Do ..AssertEtiketIteratorMetTweeUniekeDnaCodes(EtiketIterator)
@@ -109,9 +103,9 @@
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 10
 	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
-	Do ..ZetProductMocksVoorAantal(Aantal, ..GeefLadeCodeLijst(), ..GeefLijnReferentieLijst())
+	Do ..ZetOrderStubVoorAantal(Aantal, ..GeefLijnReferentieLijst())
 	
-	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(, ..ToeleveringServiceStub, ..OrderAPIStub)
 	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
 	
 	Do ..AssertEtiketIteratorMetTienDnaCodes(EtiketIterator)
@@ -179,7 +173,8 @@
 <Implementation><![CDATA[
 	#dim DnaCode As DOM.Halux.AAP.DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
 	Set DnaCode.LadeCode = "ABCD"
-	Set DnaCode.ProductNummer = 1
+	Set DnaCode.OrderId = ..#OrderId
+	Set DnaCode.OrderlijnId = 1
 	
 	Set DnaCodeLijst = ##class(%ListOfObjects).%New()
 	For i = 1:1:Aantal {
@@ -190,28 +185,26 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetProductMocksVoorAantal">
-<FormalSpec>Aantal:%Integer,LadeCodeLijst:%ListOfDataTypes,LijnReferentieLijst:%ListOfDataTypes</FormalSpec>
+<Method name="ZetOrderStubVoorAantal">
+<FormalSpec>Aantal:%Integer,LijnReferentieLijst:%ListOfDataTypes</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim LadeCodeIndex As %Integer = 0
 	#dim LijnReferentieIndex As %Integer = 0
-	#dim ProductNummer As %Integer
+	#dim OrderLijnId As %Integer
 	#dim ProductId As %Integer
 	
-	#dim ProductMock As DOM.PM.Product
-	For ProductNummer = 1:1:Aantal {
-		Set ProductId = ProductNummer * 100
-		Set LadeCodeIndex = (LadeCodeIndex # LadeCodeLijst.Count()) + 1
+	Set OrderStub = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	
+	For OrderLijnId = 1:1:Aantal {
 		Set LijnReferentieIndex = (LijnReferentieIndex # LijnReferentieLijst.Count()) + 1
 		
-		Set ProductMock = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductMock.IndienMethodCall("GeefID").DanReturn(ProductId)
-		Do ProductMock.IndienMethodCall("GeefLadeCode").DanReturn(LadeCodeLijst.GetAt(LadeCodeIndex))
+		Set OrderLijnStub = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
+		Do OrderLijnStub.IndienMethodCall("GeefProjectReferentie").DanReturn(LijnReferentieLijst.GetAt(LijnReferentieIndex))
 		
-		Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ProductNummer).DanReturn(ProductMock)
-		Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ProductId).DanReturn(LijnReferentieLijst.GetAt(LijnReferentieIndex))
+		Do OrderStub.IndienMethodCall("GeefOrderLijn", OrderLijnId).DanReturn(OrderLijnStub)
 	}
+	
+	Do ..OrderAPIStub.IndienMethodCall("GeefOrder", ..#OrderId).DanReturn(OrderStub)
 ]]></Implementation>
 </Method>
 
@@ -224,17 +217,18 @@
 	#dim LijnReferentieLijst As %ListOfDataTypes = ..GeefLijnReferentieLijst()
 	#dim LadeCodeIndex As %Integer = 0
 	#dim LijnReferentieIndex As %Integer = 0
-	#dim ProductNummer As %Integer
+	#dim OrderLijnId As %Integer
 	
 	#dim DnaCode As DOM.Halux.AAP.DnaCode
 	Set DnaCodeLijst = ##class(%ListOfObjects).%New()
-	For ProductNummer = 1:1:Aantal {
+	For OrderLijnId = 1:1:Aantal {
 		Set DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
 		
 		Set LadeCodeIndex = (LadeCodeIndex # LadeCodeLijst.Count()) + 1
 		Set LijnReferentieIndex = (LijnReferentieIndex # LijnReferentieLijst.Count()) + 1
 		Set DnaCode.LadeCode = LadeCodeLijst.GetAt(LadeCodeIndex)
-		Set DnaCode.ProductNummer = ProductNummer
+		Set DnaCode.OrderId = ..#OrderId
+		Set DnaCode.OrderlijnId = OrderLijnId
 		
 		Do DnaCodeLijst.Insert(DnaCode)
 	}