Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabVerpakking.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabVerpakking.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabVerpakking.cls.xml (revision 62952) @@ -0,0 +1,53 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +persistent +1 +DOM.PM.Maatwerk.Calc.HF.Halffab + + +DOM.PM.Verpakking.enu.KartonSamenstelling + + + +bitmap +Samenstelling + + + +%Integer + + + +bitmap +Kartonbreedte + + + +%String + + + + +%Library.CacheStorage +HalffabVerpakkingDefaultData + +listnode +"HalffabVerpakking" + +Samenstelling + + +Kartonbreedte + + + + + + + Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabRugWandHouderSchroef.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabRugWandHouderSchroef.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabRugWandHouderSchroef.cls.xml (revision 62952) @@ -0,0 +1,24 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +persistent +1 +DOM.PM.Maatwerk.Calc.HF.Halffab + + +%String + + + + +%Library.CacheStorage + + + + + Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml =================================================================== diff -u -r62948 -r62952 --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml (.../HalffabClassNameFactory.cls.xml) (revision 62948) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml (.../HalffabClassNameFactory.cls.xml) (revision 62952) @@ -21,10 +21,12 @@ Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabRug", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Rug()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabRugBodemSchroef", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RugBodemSchroef()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabRugWandHouder", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RugWandHouder()) + Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabRugWandHouderSchroef", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RugWandHouderSchroef()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabSifonkap", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Sifonkap()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabTiponBlumotionEenheid", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabTiponBlumotionSynchronisatieStang", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabTussenstuk", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Tussenstuk()) + Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabVerpakking", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Verpakking()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabVoorstuk", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Voorstuk()) Quit $$$OK ]]> Index: DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml =================================================================== diff -u -r62948 -r62952 --- DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml (.../MVXRol.cls.xml) (revision 62948) +++ DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml (.../MVXRol.cls.xml) (revision 62952) @@ -8,11 +8,11 @@ DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol -;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugBodemSchroef;RugWandHouder;Sifonkap;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Tussenstuk;Voorstuk +;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugBodemSchroef;RugWandHouder;RugWandHouderSchroef;Sifonkap;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Tussenstuk;Verpakking;Voorstuk -;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugBodemSchroef;RugWandHouder;Sifonkap;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Tussenstuk;Voorstuk +;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugBodemSchroef;RugWandHouder;RugWandHouderSchroef;Sifonkap;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Tussenstuk;Verpakking;Voorstuk @@ -92,6 +92,13 @@ ]]> + +1 +DOM.PM.Maatwerk.Calc.HF.enu.MVXRol + + + 1 DOM.PM.Maatwerk.Calc.HF.enu.MVXRol @@ -120,6 +127,13 @@ ]]> + +1 +DOM.PM.Maatwerk.Calc.HF.enu.MVXRol + + + 1 DOM.PM.Maatwerk.Calc.HF.enu.MVXRol Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml =================================================================== diff -u -r62948 -r62952 --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 62948) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 62952) @@ -232,6 +232,14 @@ Do Rol.Condities.Insert(Conditie) Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("RugWandHouderSchroef", "Schroef rugwandhouder") + Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.SpecifiekProductBuilderType).%New(906180) + Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen() + Set Conditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.RolBestaatConditie).%New("RugWandHouder") + Do Rol.Condities.Insert(Conditie) + ;Do ..ZetSpecialeProductieWijzenOpRol(Rol, "RRWH") // Voorlopig in comment gezet, wegens (nog) onbestaande ProductieWijze + Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("Sifonkap") Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New() Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen() @@ -284,6 +292,13 @@ Do Rol.Condities.Insert(Conditie) Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("Verpakking") + Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.CustomBuilderType).%New() + Set Rol.BuilderType = BuilderType + Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("Samenstelling","DOM.PM.Verpakking.enu.KartonSamenstelling",##class(APPS.PM.enu.DataType).Tekst(),1)) + Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("Kartonbreedte","%Integer",##class(APPS.PM.enu.DataType).Getal(),1)) + Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("Voorstuk") Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New() Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New() @@ -580,14 +595,7 @@ Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("OpvullijstKleur")) Do ..Rollen.Insert(Rol) - Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("RugWandHouderSchroef", "Schroef rugwandhouder") - Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.SpecifiekProductBuilderType).%New(906180) - Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen() - Set Conditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.RolBestaatConditie).%New("RugWandHouder") - Do Rol.Condities.Insert(Conditie) - Do ..ZetSpecialeProductieWijzenOpRol(Rol, "RRWH") - Do ..Rollen.Insert(Rol) - + // Maatwerkmodel in sync brengen, fase 1 (UST815) // Voorlopig custom builder. Een volgende fase kan de manueel gemaakte builders vervangen door een gegenereerde // en eventuele customisatie. Index: vhDeploy/D20201203xTriggerMerivoboxMaatwerkModelDeel4.cls.xml =================================================================== diff -u --- vhDeploy/D20201203xTriggerMerivoboxMaatwerkModelDeel4.cls.xml (revision 0) +++ vhDeploy/D20201203xTriggerMerivoboxMaatwerkModelDeel4.cls.xml (revision 62952) @@ -0,0 +1,26 @@ + + + +vhDeploy.Deploy + + +%String +Deploy voor nieuwe MVX-rol RugWandHouderSchroef + + + +1 + + + + + +