Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ConfiguratorKenmerkenGetter.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ConfiguratorKenmerkenGetter.txt (.../WS.EC.ConfiguratorKenmerkenGetter.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ConfiguratorKenmerkenGetter.txt (.../WS.EC.ConfiguratorKenmerkenGetter.txt) (revision 74257) @@ -101,6 +101,7 @@ + Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml =================================================================== diff -u -r74215 -r74257 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74215) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74257) @@ -33,14 +33,19 @@ 1 + +DOM.PM.impl.ProductTypeAPIimpl + + -ProductApi:DOM.PM.ProductAPI="",DnaCodeService:APPS.Halux.AAP.DnaCodeService="",IngegevenKenmerkenSpaceStepHelper:DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenSpaceStepHelper="",Logger:vhLib.Logger="",HoutCertificaatService:DOM.PM.HoutCertificaatService="" +ProductApi:DOM.PM.ProductAPI="",DnaCodeService:APPS.Halux.AAP.DnaCodeService="",IngegevenKenmerkenSpaceStepHelper:DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenSpaceStepHelper="",Logger:vhLib.Logger="",HoutCertificaatService:DOM.PM.HoutCertificaatService="",ProductTypeAPI:DOM.PM.impl.ProductTypeAPIimpl="" 1 1 %Status 1 + + + +UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo,Product:DOM.PM.MaatwerkProduct +1 +%ListOfObjects + + + + +UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo,Product:DOM.PM.MaatwerkProduct +1 +%ListOfObjects + @@ -131,8 +292,7 @@ Set DnaCodes = ..DnaCodeService.GeefDnaCodesViaBatchIdEnSequentienummer(UitvoeringInfo.BatchID, UitvoeringInfo.SequentieNummer) If (AantalDnaCodes = 2) { - #dim Gevonden As %Boolean = $$$False - + #dim Gevonden As %Boolean = $$$False While ((DnaCodes.HasNext()) && $$$Not(Gevonden)) { #dim DnaCodeObject As DOM.Halux.AAP.DnaCode = DnaCodes.Next() Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.Vhisie4.Winkelkar.WinkelkarService.txt =================================================================== diff -u -r73667 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.Vhisie4.Winkelkar.WinkelkarService.txt (.../WS.Vhisie4.Winkelkar.WinkelkarService.txt) (revision 73667) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.Vhisie4.Winkelkar.WinkelkarService.txt (.../WS.Vhisie4.Winkelkar.WinkelkarService.txt) (revision 74257) @@ -474,6 +474,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt (.../WS.EC.ExterneVerkoopService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt (.../WS.EC.ExterneVerkoopService.txt) (revision 74257) @@ -368,6 +368,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.APPS.VKP.VerkoopService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.APPS.VKP.VerkoopService.txt (.../WS.APPS.VKP.VerkoopService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.APPS.VKP.VerkoopService.txt (.../WS.APPS.VKP.VerkoopService.txt) (revision 74257) @@ -91,6 +91,7 @@ + Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml =================================================================== diff -u -r74215 -r74257 --- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml (.../Test.cls.xml) (revision 74215) +++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml (.../Test.cls.xml) (revision 74257) @@ -84,15 +84,9 @@ #dim ToeleveringLijnStub As vhUnitTest.APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.ProductOptiesGenerator.GenereerOptiesVoorLade.ToeleveringLijnMock = ..GeefToeleveringlijnMock(..#DummyProductId, ..#DummyInventTransId, ..#DummyAxConfigId) #dim ToeleveringStub As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringStub(..#DummyToeleveringId, ToeleveringLijnStub) #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..#DummyProductId, ..#DummyKorttekst, ..#DummyLangtekst, ..#DummyDossierCode, ..#DummyFscClaim, ..LbxKenmerken) - Set HalffabItemsBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New() - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "TiponBlumotionSynchronisatieStang").DanReturn($$$True) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Zijstabilisering").DanReturn($$$True) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "InschuifElementVoor").DanReturn($$$True) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Opvullijst").DanReturn($$$True) - Do HalffabItemsBoomMock.VerwachtMethodCall("GeefHalffabItem", "TiponBlumotionSynchronisatieStang").DanReturn(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New("", "Dummy", "")) - Do HalffabItemsBoomMock.VerwachtMethodCall("GeefHalffabItem", "Zijstabilisering").DanReturn(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New("", "Dummy", "")) - Do HalffabItemsBoomMock.VerwachtMethodCall("GeefHalffabItem", "InschuifElementVoor").DanReturn(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New("", "Dummy", "")) - Do HalffabItemsBoomMock.VerwachtMethodCall("GeefHalffabItem", "Opvullijst").DanReturn(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New("", "Dummy", "")) + Set HalffabItemsBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New() + Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", $$$ElkeWaarde).DanReturn($$$True) + Do HalffabItemsBoomMock.VerwachtMethodCall("GeefHalffabItem", $$$ElkeWaarde).DanReturn(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%New("", "Dummy", "")) Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom", "").DanReturn(HalffabItemsBoomMock) Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New() @@ -108,7 +102,7 @@ Set Generator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.ProductOptiesGenerator).%New(ProductApiMock, DnaCodeServiceMock, IngegevenKenmerkenSpaceStepHelperMock, , HoutCertificaatServiceMock) #dim Resultaat As %ListOfObjects = Generator.GenereerOptiesVoorLade(ToeleveringStub, ..UitvoeringInfo) - Do $$$AssertEquals(Resultaat.Size, 13) + Do $$$AssertEquals(Resultaat.Size, 17) Do ..AssertOptie(Resultaat.GetAt(1), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-PIN", ..#DummyDnaCode) Do ..AssertOptie(Resultaat.GetAt(2), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-SHORTPIN", "ode") Do ..AssertOptie(Resultaat.GetAt(3), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-Inventtransid", ..#DummyInventTransId) @@ -121,7 +115,11 @@ Do ..AssertOptie(Resultaat.GetAt(10), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-TOBSynchroLinkageLength", "null") Do ..AssertOptie(Resultaat.GetAt(11), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-SideStabiliserLength", "null") Do ..AssertOptie(Resultaat.GetAt(12), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-DesignElementFrontLength", "null") - Do ..AssertOptie(Resultaat.GetAt(13), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-DistanceTrimLength", "null") + Do ..AssertOptie(Resultaat.GetAt(13), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-DistanceTrimLength", "null") + Do ..AssertOptie(Resultaat.GetAt(14), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-FrontPanelLength", "null") + Do ..AssertOptie(Resultaat.GetAt(15), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-GalleryFrontLength", "null") + Do ..AssertOptie(Resultaat.GetAt(16), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-CrossGalleryLength", "null") + Do ..AssertOptie(Resultaat.GetAt(17), "LADE 00" _ ..#SequentieNummerLade, "00" _ ..#SequentieNummerLade _ "-CrossGalleryLowerLength", "null") Do ProductMock.Verifieer() Do ProductApiMock.Verifieer() @@ -142,10 +140,7 @@ #dim ToeleveringStub As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringStub(..#DummyToeleveringId, ToeleveringLijnStub) #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..#DummyProductId, ..#DummyKorttekst, ..#DummyLangtekst, ..#DummyDossierCode, ..#DummyFscClaim, ..LbxKenmerken) Set HalffabItemsBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New() - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "TiponBlumotionSynchronisatieStang").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Zijstabilisering").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "InschuifElementVoor").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Opvullijst").DanReturn($$$False) + Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", $$$ElkeWaarde).DanReturn($$$False) Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom", "").DanReturn(HalffabItemsBoomMock) Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New() @@ -175,10 +170,7 @@ #dim ToeleveringStub As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringStub(..#DummyToeleveringId, ToeleveringLijnStub) #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..#DummyProductId, ..#DummyKorttekst, ..#DummyLangtekst, ..#DummyDossierCode, ..#DummyFscClaim, ..LbxKenmerken) Set HalffabItemsBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New() - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "TiponBlumotionSynchronisatieStang").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Zijstabilisering").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "InschuifElementVoor").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Opvullijst").DanReturn($$$False) + Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", $$$ElkeWaarde).DanReturn($$$False) Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom", "").DanReturn(HalffabItemsBoomMock) Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New() @@ -214,10 +206,7 @@ #dim ToeleveringStub As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringStub(..#DummyToeleveringId, ToeleveringLijnStub) #dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ..GeefProductMock(..#DummyProductId, ..#DummyKorttekst, ..#DummyLangtekst, ..#DummyDossierCode, ..#DummyFscClaim, ..LbxKenmerken) Set HalffabItemsBoomMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New() - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "TiponBlumotionSynchronisatieStang").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Zijstabilisering").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "InschuifElementVoor").DanReturn($$$False) - Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", "Opvullijst").DanReturn($$$False) + Do HalffabItemsBoomMock.VerwachtMethodCall("BevatRol", $$$ElkeWaarde).DanReturn($$$False) Do ProductMock.VerwachtMethodCall("GeefHalffabItemsBoom", "").DanReturn(HalffabItemsBoomMock) Set ProductApiMock = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New() Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.ExterneWinkelkarService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.ExterneWinkelkarService.txt (.../WS.EC.Winkelkar.ExterneWinkelkarService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.ExterneWinkelkarService.txt (.../WS.EC.Winkelkar.ExterneWinkelkarService.txt) (revision 74257) @@ -145,6 +145,7 @@ + Index: DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/AutoComplete.cls.xml =================================================================== diff -u -r61252 -r74257 --- DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 61252) +++ DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 74257) @@ -37,6 +37,13 @@ 1 + +%String +"MatZ" +1 +1 + + %String "MatZ1" Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.WebshopConfiguratorService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.WebshopConfiguratorService.txt (.../WS.EC.WebshopConfiguratorService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.WebshopConfiguratorService.txt (.../WS.EC.WebshopConfiguratorService.txt) (revision 74257) @@ -90,6 +90,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneConfiguratorService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneConfiguratorService.txt (.../WS.EC.InterneConfiguratorService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneConfiguratorService.txt (.../WS.EC.InterneConfiguratorService.txt) (revision 74257) @@ -90,6 +90,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.InterneWinkelkarService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.InterneWinkelkarService.txt (.../WS.EC.Winkelkar.InterneWinkelkarService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.InterneWinkelkarService.txt (.../WS.EC.Winkelkar.InterneWinkelkarService.txt) (revision 74257) @@ -145,6 +145,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.PM.Maatwerk.MaatwerkService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.PM.Maatwerk.MaatwerkService.txt (.../WS.PM.Maatwerk.MaatwerkService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.PM.Maatwerk.MaatwerkService.txt (.../WS.PM.Maatwerk.MaatwerkService.txt) (revision 74257) @@ -402,6 +402,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.SessieLozeExterneVerkoopService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.SessieLozeExterneVerkoopService.txt (.../WS.EC.SessieLozeExterneVerkoopService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.SessieLozeExterneVerkoopService.txt (.../WS.EC.SessieLozeExterneVerkoopService.txt) (revision 74257) @@ -276,6 +276,7 @@ + Index: DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType.cls.xml =================================================================== diff -u -r61252 -r74257 --- DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType.cls.xml (.../GekoppeldIKType.cls.xml) (revision 61252) +++ DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType.cls.xml (.../GekoppeldIKType.cls.xml) (revision 74257) @@ -4,11 +4,11 @@ TECH.Enumeration -;Mat;MatX;MatY;MatM;MatZ1;MatZ2;SpaceStep +;Mat;MatX;MatY;MatM;MatZ1;MatZ2;SpaceStep;MatZ -;Mat;MatX;MatY;MatM;MatZ1;MatZ2;SpaceStep +;Mat;MatX;MatY;MatM;MatZ1;MatZ2;SpaceStep;MatZ @@ -39,6 +39,13 @@ ]]> + +1 +DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType + + + 1 DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.WinkelkarService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.WinkelkarService.txt (.../WS.EC.Winkelkar.WinkelkarService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.Winkelkar.WinkelkarService.txt (.../WS.EC.Winkelkar.WinkelkarService.txt) (revision 74257) @@ -145,6 +145,7 @@ + Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml =================================================================== diff -u -r74215 -r74257 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74215) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74257) @@ -109,12 +109,22 @@ -Waarde:%DataType,Type:%Dictionary.CacheClassname +Waarde:%DataType,Type:%Dictionary.CacheClassname,PropertyNaam:%String="" 1 %DataType = 2) { + If (PropertyNaam = "MatKleur") { + Set GeconverteerdeWaarde = ##class(DOM.PM.enu.MATKleur).LogicalToDisplay(Waarde) + } + If (PropertyNaam = "MatMateriaal") { + Set GeconverteerdeWaarde = ##class(DOM.PM.enu.MATMateriaal).LogicalToDisplay(Waarde) + } + } + If (Type = "%Library.Boolean") { Set:(Waarde = 0) GeconverteerdeWaarde = "false" Set:(Waarde = 1) GeconverteerdeWaarde = "true" @@ -131,38 +141,70 @@ = 2)) { + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang()) && (HuidigeMesFase >= 2)) { If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { Set RolNaam = "TOBSynchroLinkage.Processed" } Else { Set RolNaam = "TOBSynchroLinkage.Standard" } } - If (##class(TECH.StringUtils).Equals(RolNaam, "Zijstabilisering") && (HuidigeMesFase >= 2)) { + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Zijstabilisering()) && (HuidigeMesFase >= 2)) { If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { Set RolNaam = "SideStabiliser.Processed" } Else { Set RolNaam = "SideStabiliser.Standard" } } - If (##class(TECH.StringUtils).Equals(RolNaam, "InschuifElementVoor") && (HuidigeMesFase >= 2)) { + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementVoor()) && (HuidigeMesFase >= 2)) { If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { Set RolNaam = "DesignElementFront.Processed" } Else { Set RolNaam = "DesignElementFront.Standard" } } - If (##class(TECH.StringUtils).Equals(RolNaam, "Opvullijst") && (HuidigeMesFase >= 2)) { + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Opvullijst()) && (HuidigeMesFase >= 2)) { If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { Set RolNaam = "DistanceTrim.Processed" } Else { Set RolNaam = "DistanceTrim.Standard" } } + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Voorstuk()) && (HuidigeMesFase >= 2)) { + If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { + Set RolNaam = "FrontPanel.Processed" + } Else { + Set RolNaam = "FrontPanel.Standard" + } + } + + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RelingVoor()) && (HuidigeMesFase >= 2)) { + If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { + Set RolNaam = "GalleryFront.Processed" + } Else { + Set RolNaam = "GalleryFront.Standard" + } + } + + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Dwarsverdeling()) && (HuidigeMesFase >= 2)) { + If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { + Set RolNaam = "CrossGallery.Processed" + } Else { + Set RolNaam = "CrossGallery.Standard" + } + } + + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).DwarsverdelingOnder()) && (HuidigeMesFase >= 2)) { + If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { + Set RolNaam = "CrossGalleryLower.Processed" + } Else { + Set RolNaam = "CrossGalleryLower.Standard" + } + } + Quit RolNaam ]]> Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneVerkoopService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneVerkoopService.txt (.../WS.EC.InterneVerkoopService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.InterneVerkoopService.txt (.../WS.EC.InterneVerkoopService.txt) (revision 74257) @@ -290,6 +290,7 @@ + Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.VKP.Maatwerk.ConfiguratorService.txt =================================================================== diff -u -r73396 -r74257 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.VKP.Maatwerk.ConfiguratorService.txt (.../WS.VKP.Maatwerk.ConfiguratorService.txt) (revision 73396) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.VKP.Maatwerk.ConfiguratorService.txt (.../WS.VKP.Maatwerk.ConfiguratorService.txt) (revision 74257) @@ -93,6 +93,7 @@ + Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/MVX/MatUitsparingSnijPositieBepaler.cls.xml =================================================================== diff -u -r65067 -r74257 --- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/MVX/MatUitsparingSnijPositieBepaler.cls.xml (.../MatUitsparingSnijPositieBepaler.cls.xml) (revision 65067) +++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/MVX/MatUitsparingSnijPositieBepaler.cls.xml (.../MatUitsparingSnijPositieBepaler.cls.xml) (revision 74257) @@ -39,7 +39,7 @@ Set MatLinksX = ..GeefMatMiddenM1(IngegevenKenmerken) + LadeUitsparingHelper.GeefBreedteUitsparingZ1(IngegevenKenmerken.UitsparingData) + 17 + 0.5 } } Else { - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Toepassing '"_IngegevenKenmerken.Toepassing_"' is niet geïmplementeerd.")) + Set MatLinksX = 0 } Quit MatLinksX @@ -57,7 +57,7 @@ } ElseIf (..IsSifonLade(IngegevenKenmerken)) { Set MatVooraanQ = (IngegevenKenmerken.LadeDiepte - ..#AftrekDiepteVoorMat + 1 - ..GeefUitsparingDiepte(IngegevenKenmerken) - 8 + 16 + 0.5) } Else { - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Toepassing '"_IngegevenKenmerken.Toepassing_"' is niet geïmplementeerd.")) + Set MatVooraanQ = 0 } Quit MatVooraanQ @@ -103,7 +103,7 @@ } ElseIf (..IsSifonLade(IngegevenKenmerken)) { Set MatRechtsY = IngegevenKenmerken.UitsparingData.RugDeelY - ..#AftrekRugBreedteVoorSifonlade - 2.5 - (2*0.5) } Else { - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Toepassing '"_IngegevenKenmerken.Toepassing_"' is niet geïmplementeerd.")) + Set MatRechtsY = 0 } Quit MatRechtsY Index: DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/Verwerker.cls.xml =================================================================== diff -u -r61252 -r74257 --- DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 61252) +++ DOM/PM/Maatwerk/Calc/Common/enu/GekoppeldIKType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 74257) @@ -21,6 +21,8 @@ Do ..VerwerkMatX() } ElseIf GekoppeldIKType = "MatY" { Do ..VerwerkMatY() + } ElseIf GekoppeldIKType = "MatZ" { + Do ..VerwerkMatZ() } ElseIf GekoppeldIKType = "MatZ1" { Do ..VerwerkMatZ1() } ElseIf GekoppeldIKType = "MatZ2" { @@ -58,6 +60,12 @@ + +1 +1 + + + 1 1 Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml =================================================================== diff -u -r72932 -r74257 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml (.../IngegevenKenmerkenOptiesGenerator.cls.xml) (revision 72932) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml (.../IngegevenKenmerkenOptiesGenerator.cls.xml) (revision 74257) @@ -73,7 +73,7 @@ #dim Property As %Dictionary.CompiledProperty = ##class(TECH.CompiledClassUtils).GeefProperty(KenmerkenObjt.%ClassName(1), PropertyNaam) #dim Naam As %String = "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ PropertyNaam) - Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerLade, Naam, ..ConverteerWaarde(Waarde, Property.Type))) + Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerLade, Naam, ..ConverteerWaarde(Waarde, Property.Type, PropertyNaam))) } Do ##class(TECH.ListUtils).AppendList(LijstOpties, ..GeefOptiesUitsparingData(KenmerkenObjt, SequentieNummerLade, VoorvoegselNaam))