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