Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml	(revision 71845)
@@ -0,0 +1,191 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGeneratorLbx.GenereerOptiesVoorLade.Test">
+<Super>vhUnitTest.APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.OptieGenerator.BaseLbx</Super>
+
+<Parameter name="RolnaamParentItem">
+<Type>%String</Type>
+<Default>Dummy Parent Item</Default>
+</Parameter>
+
+<Parameter name="RolnaamHFItem1">
+<Type>%String</Type>
+<Default>Dummy HF Item1</Default>
+</Parameter>
+
+<Parameter name="RolnaamHFItem2">
+<Type>%String</Type>
+<Default>Dummy HF Item2</Default>
+</Parameter>
+
+<Parameter name="HFProductId1">
+<Type>%String</Type>
+<Default>150000</Default>
+</Parameter>
+
+<Parameter name="HFProductId2">
+<Type>%String</Type>
+<Default>150001</Default>
+</Parameter>
+
+<Parameter name="HFIdentnummer1">
+<Type>%String</Type>
+<Default>1.111.111.1</Default>
+</Parameter>
+
+<Parameter name="HFIdentnummer2">
+<Type>%String</Type>
+<Default>2.222.222.2</Default>
+</Parameter>
+
+<Method name="Test: Standaardgedrag rolnamen van het halffabitem wordt in een opties geplaatst">
+<Implementation><![CDATA[
+	#dim HFItemAantal1 As %Integer = 2
+	#dim HFItemAantal2 As %Integer = 3
+	
+	#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 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 ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(..LbxKenmerken)
+	Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom").DanReturn(HalffabItemBoomMock)
+	
+	Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiMock.VerwachtMethodCall("GeefProduct", ..#DummyProductId).DanReturn(ProductMock)
+	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId1).DanReturn(..#HFIdentnummer1)
+	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId2).DanReturn(..#HFIdentnummer2)
+	
+	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	
+	Do $$$AssertEquals(Resultaat.Size, 4)
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem1", HFItemAantal1)
+	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-INPUT[01]|QTY|ROL", ..#HFIdentnummer1 _ "|" _ HFItemAantal1 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem1")
+	Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem2", HFItemAantal2)
+	Do ..AssertOptie(Resultaat.GetAt(4), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-INPUT[02]|QTY|ROL", ..#HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem2")
+	
+	Do HalffabItemBoomMock.Verifieer()
+	Do ProductMock.Verifieer()
+	Do ProductApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: De samengestelde halffabitems worden niet in een optie geplaatst">
+<Implementation><![CDATA[
+	#dim HFItemAantal2 As %Integer = 3
+	
+	#dim LbxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefLbxKenmerken()
+	
+	#dim ParentHalffabItemStub As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = ..GeefSamengesteldHalffabItem(..#RolnaamParentItem)
+	#dim HalffabItemStub1 As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = ..GeefSamengesteldHalffabItem(..#RolnaamHFItem1)
+	#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 ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(LbxKenmerken)
+	Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom").DanReturn(HalffabItemBoomMock)
+	
+	Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiMock.VerwachtMethodCall("GeefProduct", ..#DummyProductId).DanReturn(ProductMock)
+	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId2).DanReturn(..#HFIdentnummer2)
+	
+	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	
+	Do $$$AssertEquals(Resultaat.Size, 2)
+	Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-ROL-"_ "Dummyparentitem" _ "." _ "dummyhfitem2", HFItemAantal2)
+	Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-INPUT[01]|QTY|ROL", ..#HFIdentnummer2 _ "|" _ HFItemAantal2 _ "|" _ "Dummyparentitem" _ "." _ "dummyhfitem2")
+	
+	Do HalffabItemBoomMock.Verifieer()
+	Do ProductMock.Verifieer()
+	Do ProductApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Halffabitems met aantal gelijk aan 0, worden niet in een optie geplaatst">
+<Implementation><![CDATA[
+	#dim HFItemAantal1 As %Integer = 0
+	
+	#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 HalffabItemsIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(HalffabItemStub1)
+	
+	Set HalffabItemBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Do HalffabItemBoomMock.VerwachtMethodCall("GeefAlleHalffabItemsIterator").DanReturn(HalffabItemsIterator)
+	
+	Set ProductMock = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+	Do ProductMock.VerwachtMethodCall("GeefIngegevenKenmerken").DanReturn(..LbxKenmerken)
+	Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom").DanReturn(HalffabItemBoomMock)
+	
+	Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiMock.VerwachtMethodCall("GeefProduct", ..#DummyProductId).DanReturn(ProductMock)
+	Do ProductApiMock.VerwachtMethodCall("GeefIdentNummerVoorProductId", ..#HFProductId1).ExactAantalKeer(0)
+	
+	Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.RollenEnStuklijstOptiesGenerator).%New(ProductApiMock)
+	#dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo)
+	
+	Do $$$AssertEquals(Resultaat.Size, 0)
+	
+	Do HalffabItemBoomMock.Verifieer()
+	Do ProductMock.Verifieer()
+	Do ProductApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffab">
+<FormalSpec>HalffabNaam:%String,ProductId:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.Halffab</ReturnType>
+<Implementation><![CDATA[
+	Set HalffabMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.Halffab).%New(HalffabNaam)
+	Do HalffabMock.IndienMethodCall("GeefProductID").DanReturn(ProductId)
+	
+	Quit HalffabMock
+]]></Implementation>
+</Method>
+
+<Method name="GeefStandaardHalffabItem">
+<FormalSpec>Rolnaam:%String,Aantal:%Integer=1,ParentItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem="",Halffab:DOM.PM.Maatwerk.Calc.HF.Halffab=""</FormalSpec>
+<ReturnType>vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem</ReturnType>
+<Implementation><![CDATA[
+	Set HalffabItemMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New()
+	Do HalffabItemMock.IndienMethodCall("GeefRol").DanReturn(Rolnaam)
+	Do HalffabItemMock.IndienMethodCall("GeefAantal").DanReturn(Aantal) 
+	
+	If ($IsObject(ParentItem)) {
+		Set HalffabItemMock.ParentItem = ParentItem
+	}
+	
+	If ($IsObject(Halffab)) {
+		Do HalffabItemMock.IndienMethodCall("GeefHalffab").DanReturn(Halffab)
+	}
+	
+	Quit HalffabItemMock
+]]></Implementation>
+</Method>
+
+<Method name="GeefSamengesteldHalffabItem">
+<FormalSpec>Rolnaam:%String,Aantal:%Integer=1</FormalSpec>
+<ReturnType>vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem</ReturnType>
+<Implementation><![CDATA[
+	Set HalffabItemMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New()
+	Do HalffabItemMock.IndienMethodCall("GeefRol").DanReturn(Rolnaam)
+	Do HalffabItemMock.IndienMethodCall("GeefAantal").DanReturn(Aantal)
+	
+	Quit HalffabItemMock
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
FishEye: Tag 71845 refers to a dead (removed) revision in file `vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?