Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r74472 -r74509
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 74472)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 74509)
@@ -50,15 +50,18 @@
 	
 	#dim ParentHalffabItemStub As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = ..GeefSamengesteldHalffabItem(..#RolnaamParentItem)
 	#dim HalffabItemStub1 As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem = ..GeefStandaardHalffabItem(..#RolnaamHFItem1, HFItemAantal1, ParentHalffabItemStub, ..GeefHalffab("DummyHF1", ..#HFProductId1))
-	#dim HalffabItemStub2 As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem = ..GeefStandaardHalffabItem(..#RolnaamHFItem2, HFItemAantal2, ParentHalffabItemStub, ..GeefHalffab("DummyHF2", ..#HFProductId2))
+	#dim HalffabItemStub2 As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem = ..GeefStandaardHalffabItem(..#RolnaamHFItem2, HFItemAantal2, ParentHalffabItemStub, ..GeefHalffab("DummyHF2", ..#HFProductId2))	
 	
 	#dim HalffabItemsIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(HalffabItemStub1, HalffabItemStub2)
 	
 	Set HalffabItemBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 	Do HalffabItemBoomMock.VerwachtMethodCall("GeefAlleHalffabItemsIterator").DanReturn(HalffabItemsIterator)
 	
+	Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+	Do BatchMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	
 	Set BatchServiceMock = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
-	Do BatchServiceMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch", 111111).DanReturn(BatchMock)
 	
 	Set ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
 	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(..LbxKenmerken)
@@ -69,9 +72,12 @@
 	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId1).DanReturn(..#HFIdentnummer1)
 	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId2).DanReturn(..#HFIdentnummer2)
 	
+	Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+	Do ToeleveringMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlant")
+	
 	Set ..UitvoeringInfo.BatchID = ..#BatchId
 	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock, BatchServiceMock)
-	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock, ..UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 5)
 	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem1", HFItemAantal1)
@@ -84,6 +90,8 @@
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
 	Do BatchServiceMock.Verifieer()
+	Do BatchMock.Verifieer()
+	Do ToeleveringMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -102,8 +110,11 @@
 	Set HalffabItemBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 	Do HalffabItemBoomMock.VerwachtMethodCall("GeefAlleHalffabItemsIterator").DanReturn(HalffabItemsIterator)
 	
+	Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+	Do BatchMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	
 	Set BatchServiceMock = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
-	Do BatchServiceMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch", 111111).DanReturn(BatchMock)
 	
 	Set ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
 	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(LbxKenmerken)
@@ -113,9 +124,12 @@
 	Do ProductApiMock.VerwachtMethodCall("GeefProduct", ..#DummyProductId).DanReturn(ProductMock)
 	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId2).DanReturn(..#HFIdentnummer2)
 	
+	Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+	Do ToeleveringMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlant")
+	
 	Set ..UitvoeringInfo.BatchID = ..#BatchId
 	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock, BatchServiceMock)
-	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock, ..UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 3)
 	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem2", HFItemAantal2)
@@ -126,6 +140,8 @@
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
 	Do BatchServiceMock.Verifieer()
+	Do BatchMock.Verifieer()
+	Do ToeleveringMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -140,8 +156,11 @@
 	Set HalffabItemBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 	Do HalffabItemBoomMock.VerwachtMethodCall("GeefAlleHalffabItemsIterator").DanReturn(HalffabItemsIterator)
 	
+	Set BatchMock = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
+	Do BatchMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	
 	Set BatchServiceMock = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
-	Do BatchServiceMock.VerwachtMethodCall("GeefLijn").DanReturn(1)
+	Do BatchServiceMock.VerwachtMethodCall("GeefBatch", 111111).DanReturn(BatchMock)
 	
 	Set ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
 	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(..LbxKenmerken)
@@ -151,9 +170,12 @@
 	Do ProductApiMock.VerwachtMethodCall("GeefProduct", ..#DummyProductId).DanReturn(ProductMock)
 	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId1).ExactAantalKeer(0)
 	
+	Set ToeleveringMock = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+	Do ToeleveringMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlant")
+	
 	Set ..UitvoeringInfo.BatchID = ..#BatchId
 	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock, BatchServiceMock)
-	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringMock, ..UitvoeringInfo)
 	
 	Do $$$AssertEquals(Resultaat.Size, 1)
 	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-BackSteelIsFastMover", "false")
@@ -162,6 +184,8 @@
 	Do ProductMock.Verifieer()
 	Do ProductApiMock.Verifieer()
 	Do BatchServiceMock.Verifieer()
+	Do BatchMock.Verifieer()
+	Do ToeleveringMock.Verifieer()
 ]]></Implementation>
 </Method>