Index: vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/DummyBewerktHalffabItem.cls.xml =================================================================== diff -u -r71908 -r72028 --- vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/DummyBewerktHalffabItem.cls.xml (.../DummyBewerktHalffabItem.cls.xml) (revision 71908) +++ vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/DummyBewerktHalffabItem.cls.xml (.../DummyBewerktHalffabItem.cls.xml) (revision 72028) @@ -8,21 +8,27 @@ 1 + +%Decimal +1 + + -Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext=##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New("","","",""),Rol:%String="TestRol",Halffab:DOM.PM.Maatwerk.Calc.HF.Halffab=##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.HF.Halffab).%New(),IsBewerkbaar:%Boolean +Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext=##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New("","","",""),Rol:%String="TestRol",Halffab:DOM.PM.Maatwerk.Calc.HF.Halffab=##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.HF.Halffab).%New(),IsBewerkbaar:%Boolean,BewerkteDimensie 1 1 %Status BewerkingDimensie:DOM.PM.enu.BewerkingDimensie TECH.String - Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml =================================================================== diff -u -r72020 -r72028 --- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml (.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml) (revision 72020) +++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml (.../AlgemeneKenmerkenOptiesGeneratorLbx.cls.xml) (revision 72028) @@ -57,27 +57,62 @@ -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String 1 %ListOfObjects "_ "Y") + + Set:(..IsBewerkingNodigVoorRug(RugItemY)) RugBreedteY = RugItemY.GeefBewerkteDimensie(LengteDimensie) + Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugybreedte", RugBreedteY)) + + If $$$Not(IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Enkel()) { + #dim RugBreedteM As %Decimal = "" + #dim RugItemM As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Rug()_"->"_ "M") + + Set:(..IsBewerkingNodigVoorRug(RugItemM)) RugBreedteM = RugItemM.GeefBewerkteDimensie(LengteDimensie) + Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugmbreedte", RugBreedteM)) + } + } Else { + #dim RugBreedte As %String = "" + #dim RugItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..RugUtils.GeefRugX(HalffabItemsBoom) + + Set:(..IsBewerkingNodigVoorRug(RugItem)) RugBreedte = RugItem.GeefBewerkteDimensie(LengteDimensie) + Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugbreedte", RugBreedte)) + } } - Do LijstOptiesVoorRugBreedte.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugbreedte", RugBreedte)) - Quit LijstOptiesVoorRugBreedte ]]> + +"_ SubRol) + Set:(..IsBewerkingNodigVoorRug(RugItemX)) RugBreedteX = RugItemX.GeefBewerkteDimensie(LengteDimensie) + + Quit RugBreedte +}*/ +]]> + + IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String 1 Index: vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml =================================================================== diff -u -r72015 -r72028 --- vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml (.../Test.cls.xml) (revision 72015) +++ vhUnitTest/APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorLbx/GenereerOptiesVoorLade/Test.cls.xml (.../Test.cls.xml) (revision 72028) @@ -23,13 +23,13 @@ ]]> - + - + - + + +Y").DanReturn(..GeefDummyBewerktHalffabItem($$$True, 3.14159265359)) + + #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..LbxKenmerken, DummyLadeCode, HalffabItemBoomMock) + #dim ProductApiMock As vhTest.Mock.DOM.PM.ProductAPI = ..GeefProductApiMock(ProductMock) + + Set LadeUitsparingData = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingData).%New() + Set LadeUitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Enkel() + Set ..LbxKenmerken.UitsparingData = LadeUitsparingData + + Set IngegevenKenmerkenTypeApiMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New() + Do IngegevenKenmerkenTypeApiMock.VerwachtMethodCall("IsSmalleLade", ..LbxKenmerken).DanReturn($$$False) + Do IngegevenKenmerkenTypeApiMock.VerwachtMethodCall("IsSifonlade", ..LbxKenmerken).DanReturn($$$True) + + Set Generator = ##class(APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGeneratorLbx).%New(ProductApiMock, ..AfbeeldingServiceMock, IngegevenKenmerkenTypeApiMock) + #dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo) + + Do $$$AssertEquals(Resultaat.Size, 11) + Do ..AssertOptie(Resultaat.GetAt(7), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Rugxbreedte", 1) + Do ..AssertOptie(Resultaat.GetAt(8), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Rugybreedte", 3.1416) + + Do HalffabItemBoomMock.Verifieer() + Do ProductMock.Verifieer() + Do ProductApiMock.Verifieer() + Do IngegevenKenmerkenTypeApiMock.Verifieer() +]]> + + + +Y").DanReturn(..GeefDummyBewerktHalffabItem($$$True, 3.14159265359)) + Do HalffabItemBoomMock.VerwachtMethodCall("GeefHalffabItem", "Rug->M").DanReturn(..GeefDummyBewerktHalffabItem($$$True, 2.71828)) + + #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..LbxKenmerken, DummyLadeCode, HalffabItemBoomMock) + #dim ProductApiMock As vhTest.Mock.DOM.PM.ProductAPI = ..GeefProductApiMock(ProductMock) + + Set LadeUitsparingData = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingData).%New() + Set LadeUitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Dubbel() + Set ..LbxKenmerken.UitsparingData = LadeUitsparingData + + Set IngegevenKenmerkenTypeApiMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI).%New() + Do IngegevenKenmerkenTypeApiMock.VerwachtMethodCall("IsSmalleLade", ..LbxKenmerken).DanReturn($$$False) + Do IngegevenKenmerkenTypeApiMock.VerwachtMethodCall("IsSifonlade", ..LbxKenmerken).DanReturn($$$True) + + Set Generator = ##class(APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGeneratorLbx).%New(ProductApiMock, ..AfbeeldingServiceMock, IngegevenKenmerkenTypeApiMock) + #dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(, ..UitvoeringInfo) + + Do $$$AssertEquals(Resultaat.Size, 12) + Do ..AssertOptie(Resultaat.GetAt(7), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Rugxbreedte", 1) + Do ..AssertOptie(Resultaat.GetAt(8), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Rugybreedte", 3.1416) + Do ..AssertOptie(Resultaat.GetAt(9), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Rugmbreedte", 2.7183) + + Do HalffabItemBoomMock.Verifieer() + Do ProductMock.Verifieer() + Do ProductApiMock.Verifieer() + Do IngegevenKenmerkenTypeApiMock.Verifieer() +]]> + + IsBodemBewerkbaar:%Boolean,IsRugBewerkbaar:%Boolean vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom @@ -115,21 +183,21 @@ -IsBewerkbaar:%Boolean +IsBewerkbaar:%Boolean,BewerkteDimensie:%Decimal=1 1 -vhUnitTest.DOM.PM.Maatwerk.LadeInfo.impl.Plaat.ZijkantGewichtBepaler.DummyBewerktHalffabItem -vhTest.Dummy.DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem + -LadeCode:%String,HalffabItemBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom +LbxKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,LadeCode:%String,HalffabItemBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom 1 vhTest.Mock.DOM.PM.MaatwerkProduct