Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml =================================================================== diff -u -r67630 -r69856 --- APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 67630) +++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/MerivoboxModel.cls.xml (.../MerivoboxModel.cls.xml) (revision 69856) @@ -459,6 +459,19 @@ Set Rol.ProductieDocTemplate = "{Rol}, {PPS:MVX:Identificatie}, {LiRe}" Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("TiponBlumotionSetEenhedenEnMeenemers", "TIP-ON BLUMOTION set eenehden en meenemers") + 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(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("InterneBreedteMin","%Integer",##class(APPS.PM.enu.DataType).Getal())) + Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("InterneBreedteMax","%Integer",##class(APPS.PM.enu.DataType).Getal())) + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte")) + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeDiepte")) + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("Draagkracht")) + Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("Toepassing")) + Do ..Rollen.Insert(Rol) + Set Rol.ProductieDocTemplate = "{Rol}, {PPS:MVX:Identificatie}" + Do ..Rollen.Insert(Rol) + Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("TiponBlumotionSynchronisatieStang", "TIP-ON BLUMOTION synchronisatiestang rond") Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardOfBewerktBuilderType).%New() Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()