Index: APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml =================================================================== diff -u -r61830 -r61898 --- APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml (.../SSTImageCodeBepaler.cls.xml) (revision 61830) +++ APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml (.../SSTImageCodeBepaler.cls.xml) (revision 61898) @@ -10,16 +10,6 @@ #dim AfbeeldingCode As %String #dim SSTKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.SSTKenmerken = IngegevenKenmerken.GekoppeldeIngegevenKenmerken.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep()) - /*If $$$Not($IsObject(..SSTKenmerken)) { - Set GekoppeldeIKIt = ##class(TECH.ListIterator).%New(..IngegevenKenmerken.GekoppeldeIngegevenKenmerken) - While GekoppeldeIKIt.HasNext() { - #dim GKIK As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = GekoppeldeIKIt.Next() - If (GKIK.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep()) { - Set ..SSTKenmerken = GKIK.IngegevenKenmerken - } - } - }*/ - If SSTKenmerken.Uitvoering = ##class(DOM.PM.enu.SSTUitvoering).Volledig() { Set AfbeeldingCode = "SST_Volledig" }ElseIf SSTKenmerken.Uitvoering = ##class(DOM.PM.enu.SSTUitvoering).SokkelEnTablet() {