Index: DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml =================================================================== diff -u -r62453 -r62576 --- DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml (.../MVXRol.cls.xml) (revision 62453) +++ DOM/PM/Maatwerk/Calc/HF/enu/MVXRol.cls.xml (.../MVXRol.cls.xml) (revision 62576) @@ -8,11 +8,11 @@ DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol -;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontHouder;LadeZijkant;Rug;RugWandHouder;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Voorstuk +;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugWandHouder;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Voorstuk -;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontHouder;LadeZijkant;Rug;RugWandHouder;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Voorstuk +;AfdekkapFrontHouderBinnen;AfdekkapRugWandHouder;Bodem;FrontBevestigingBoven;FrontBevestigingOnder;FrontBevestigingTussenstuk;FrontHouder;LadeZijkant;Rug;RugWandHouder;TiponBlumotionEenheid;TiponBlumotionSynchronisatieStang;Voorstuk @@ -50,6 +50,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 -r62569 -r62576 --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 62569) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 62576) @@ -43,8 +43,8 @@ Do ..VoegToeEnumeratieKenmerk("RugHoogte", "Rughoogte", "N/M/E") Do ..VoegToeEnumeratieKenmerk("RugWandMateriaal", "Materiaal rugwand", "Hout/Staal") Do ..VoegToeEnumeratieKenmerk("Toepassing", "Toepassing", "L/SY/SP", "Lade/Sifon/Spoelbak") - // UitsparingCode voorlopig in comment. Welke mogelijke waarden? Hoe zit het met de andere UitsparingData? => SCA zoekt het uit... - // Do ..VoegToeEnumeratieKenmerk("UitsparingData.UitsparingCode", "UitsparingCode", "SY_Recht_M_D250_B150/SY_Recht_M_D250_B300/SY_Recht_M_D240_B160/SY_Recht_M_D240_B300", "Smal/Breed/Smal160/Breed300",,,"DOM.PM.enu.UitsparingCode") + Do ..VoegToeSamengesteldKenmerk("UitsparingData", "Uitsparingdata", "DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingData", 1) + Do ..VoegToeEnumeratieKenmerk("UitsparingData.UitsparingCode", "UitsparingCode", "SP_Recht_M_D350_B470/SP_Recht_M_D350_B570/SP_Recht_M_D350_B770/SP_Recht_M_D450_B470/SP_Recht_M_D450_B570/SP_Recht_M_D450_B770", "MvxD350B470/MvxD350B570/MvxD350B770/MvxD450B470/MvxD450B570/MvxD450B770",,,"DOM.PM.enu.UitsparingCode") Do ..VoegToeEnumeratieKenmerk("VoorwandType", "Type voorwand", "Metaal") Do ..VoegToeEnumeratieKenmerk("ZijWandType", "Type zijwand", "Pure") @@ -227,23 +227,19 @@ Do Rol.Condities.Insert(Conditie) Do ..Rollen.Insert(Rol) - /* - // ON HOLD, want uitsparingcode kan nog niet bepaald worden! 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() Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("UitsparingData.UitsparingCode")) Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur")) Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("AantalSchroeven","%Integer",##class(APPS.PM.enu.DataType).Getal())) - ;Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("UitsparingBreedte","%Integer",##class(APPS.PM.enu.DataType).Getal())) Set Conditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New() Set Conditie.IngegevenKenmerk = ..GeefIngegevenKenmerkViaNaam("Toepassing") Set Conditie.Operator = "=" Set Conditie.Waarde = "##class(DOM.PM.enu.MVXToepassing).Sifon()" Set Rol.ProductieDocTemplate = "{Rol}, {UitsparingCode}, {PPS:MVX:Kleur:o:}, Freespositie X" Do Rol.Condities.Insert(Conditie) Do ..Rollen.Insert(Rol) - */ Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("TiponBlumotionEenheid", "TIP-ON BLUMOTION eenheid") Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New() Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml =================================================================== diff -u -r62453 -r62576 --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml (.../HalffabClassNameFactory.cls.xml) (revision 62453) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/HalffabClassNameFactory.cls.xml (.../HalffabClassNameFactory.cls.xml) (revision 62576) @@ -15,6 +15,7 @@ Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabBodem", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Bodem()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabFrontBevestigingBoven", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingBoven()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabFrontBevestigingOnder", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingOnder()) + Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabFrontBevestigingTussenstuk", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingTussenstuk()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabFrontHouder", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontHouder()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabLadeZijkant", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).LadeZijkant()) Do ..KlasseNamen.SetAt("DOM.PM.Maatwerk.Calc.HF.impl.MVX.Halffab.HalffabRug", ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Rug()) Index: DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabSifonkap.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabSifonkap.cls.xml (revision 0) +++ DOM/PM/Maatwerk/Calc/HF/impl/MVX/Halffab/HalffabSifonkap.cls.xml (revision 62576) @@ -0,0 +1,60 @@ + + + + +Gegenereerde klasse via APPS.PM.Maatwerk.MaatwerkModel.impl.ModelUtils +persistent +1 +DOM.PM.Maatwerk.Calc.HF.Halffab + + +DOM.PM.enu.UitsparingCode + + + +bitmap +UitsparingCode + + + +DOM.PM.enu.MVXLadeKleur + + + +bitmap +LadeKleur + + + +%Integer + + + +%String + + + + +%Library.CacheStorage +HalffabSifonkapDefaultData + +listnode +"HalffabSifonkap" + +UitsparingCode + + +LadeKleur + + +AantalSchroeven + + + + + + +