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))