Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdelingHouder.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdelingHouder.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdelingHouder.cls.xml (revision 66892) @@ -0,0 +1,55 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +persistent +1 +DOM.PM.Maatwerk.Calc.HF.Halffab + + +DOM.PM.enu.MVXLadeKleur + + + +bitmap +LadeKleur + + + +DOM.PM.enu.MVXZijWandType + + + +bitmap +ZijWandType + + + +%String + + + + +%Library.CacheStorage +HalffabDwarsverdelingHouderDefaultData + +listnode +"HalffabDwarsverdelingHouder" + +LadeKleur + + +ZijWandType + + + + + + + Index: vhDeploy/D20220216DeployenMVXDwarsverdeling.cls.xml =================================================================== diff -u --- vhDeploy/D20220216DeployenMVXDwarsverdeling.cls.xml (revision 0) +++ vhDeploy/D20220216DeployenMVXDwarsverdeling.cls.xml (revision 66892) @@ -0,0 +1,24 @@ + + + +vhDeploy.Deploy + + +%String +Deployen Selectiekenmerken Dwarsverdeling en DwarsverdelingHouder voor Merivobox + + + +1 + + + + + + Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdeling.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdeling.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabDwarsverdeling.cls.xml (revision 66892) @@ -0,0 +1,54 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +persistent +1 +DOM.PM.Maatwerk.Calc.HF.Halffab,DOM.PM.Maatwerk.Calc.HF.IBewerkbaarHalffab + + +%String + + + +bitmap +BewerkbaarOp + + + +DOM.PM.enu.MVXLadeKleur + + + +bitmap +LadeKleur + + + +%String + + + + +%Library.CacheStorage +HalffabDwarsverdelingDefaultData + +listnode +"HalffabDwarsverdeling" + +BewerkbaarOp + + +LadeKleur + + + + + + + Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml =================================================================== diff -u -r65177 -r66892 --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 65177) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 66892) @@ -206,6 +206,30 @@ Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur")) Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("Dwarsverdeling", "Dwarsverdeling") + Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New() + Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New() + Set BewerkingInfo.Aftrek = 1 //Waarde maakt niet uit, wordt gedefinieerd in .NET + Set BewerkingInfo.IngegevenKenmerk = ..GeefIngegevenKenmerkViaNaam("InterneBreedte") + Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte()) + Set Rol.BuilderType = BuilderType + Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen() + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur")) + Set HeeftDwarsverdelingConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New() + Set HeeftDwarsverdelingConditie.IngegevenKenmerk = ..GeefIngegevenKenmerkViaNaam("AantalDwarsverdelingen") + Set HeeftDwarsverdelingConditie.Operator = ">" + Set HeeftDwarsverdelingConditie.Waarde = "0" + Do Rol.Condities.Insert(HeeftDwarsverdelingConditie) + Do ..Rollen.Insert(Rol) + + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("DwarsverdelingHouder", "DwarsverdelingHouder") + Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New() + Set Rol.BuilderType.AantalItems = 2 + Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen() + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur")) + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("ZijWandType")) + Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("FrontBevestigingBoven", "Frontbevestiging bovenaan") Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New() Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()