Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml =================================================================== diff -u -r36594 -r36611 --- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 36594) +++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 36611) @@ -48,20 +48,7 @@ #dim Enum As DOM.PM.Maatwerk.TAX.impl.BaseEnums = ##class(DOM.PM.Maatwerk.TAX.impl.BaseEnums).%New() #dim GeconcateneerdeRolTipon As TECH.String = ..GeefGeconcateneerdeRol(Enum.GeleiderTechnologie.TIPON) #dim GeconcateneerdeRolTiponBlumotion As TECH.String = ..GeefGeconcateneerdeRol(Enum.GeleiderTechnologie.TIPONBLUMOTION) - - If (##class(TECH.ListUtils).Contains(TAORKenmerken.NietMeeleveren, GeconcateneerdeRolTipon)) { - Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.TiponSynchronisatieStang) - Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.TiponSynchronisatieTandwiel) - Do ..IngegevenKenmerken.NietMeeleveren.Remove(GeconcateneerdeRolTipon) - } - If (##class(TECH.ListUtils).Contains(TAORKenmerken.NietMeeleveren, GeconcateneerdeRolTiponBlumotion)) { - Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.TiponBlumotionSetEenhedenEnMeenemers) - Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.TiponBlumotionSynchronisatieAdapter) - Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.TiponBlumotionSynchronisatieStang) - Do ..IngegevenKenmerken.NietMeeleveren.Remove(GeconcateneerdeRolTiponBlumotion) - } - If ##class(TECH.Context.RuntimeContext).Instance().GeefPersonalityID() = ##class(DOM.common.enu.Personality).Daro() { Do ..IngegevenKenmerken.NietMeeleveren.Insert(Enum.Rol.Glijder) } @@ -154,9 +141,8 @@ + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,dtoKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken +1 + + Index: APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml =================================================================== diff -u -r36554 -r36611 --- APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml (.../KenmerkNaarDtoVisitor.cls.xml) (revision 36554) +++ APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml (.../KenmerkNaarDtoVisitor.cls.xml) (revision 36611) @@ -57,11 +57,6 @@ Do ..WisCorpusBreedteIndienNul(TAORKenmerken, .IngegevenKenmerken) Do ..KopieerNietMeeleveren(TAORKenmerken,.IngegevenKenmerken) - If (##class(TECH.ListUtils).Contains(IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()) && ##class(TECH.ListUtils).Contains(IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel())) { - Do IngegevenKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()) - Do IngegevenKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()) - Do IngegevenKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()) - } Quit $$$OK ]]> @@ -186,11 +181,6 @@ Set IngegevenKenmerken.AantalDwarsverdelingen = $select(LBXKenmerken.AantalDwarsverdelingen=0:"",1:LBXKenmerken.AantalDwarsverdelingen) Do ..KopieerNietMeeleveren(LBXKenmerken,.IngegevenKenmerken) - If (##class(TECH.ListUtils).Contains(IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()) && ##class(TECH.ListUtils).Contains(IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang())) { - Do IngegevenKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()_##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang()) - Do IngegevenKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()) - Do IngegevenKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang()) - } Quit $$$OK ]]> @@ -252,6 +242,25 @@ While (Iterator.HasNext()) { Do dtoKenmerken.NietMeeleveren.Insert(Iterator.Next()) } + + If (##class(TECH.ListUtils).Contains(dtoKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()) && ##class(TECH.ListUtils).Contains(dtoKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang())) { + Do dtoKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()_##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang()) + } + + If (##class(TECH.ListUtils).Contains(dtoKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()) && ##class(TECH.ListUtils).Contains(dtoKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel())) { + Do dtoKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieStang()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()) + } + + If (##class(TECH.ListUtils).Contains(dtoKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSetEenhedenEnMeenemers()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieAdapter()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieStang())) { + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSetEenhedenEnMeenemers()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieAdapter()) + Do dtoKenmerken.NietMeeleveren.Remove(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieStang()) + Do dtoKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSetEenhedenEnMeenemers()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieAdapter()_##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponBlumotionSynchronisatieStang()) + } ]]>