Index: APPS/PM/Maatwerk/impl/Verpakking/BreedteBepaler.cls.xml =================================================================== diff -u -r62964 -r62966 --- APPS/PM/Maatwerk/impl/Verpakking/BreedteBepaler.cls.xml (.../BreedteBepaler.cls.xml) (revision 62964) +++ APPS/PM/Maatwerk/impl/Verpakking/BreedteBepaler.cls.xml (.../BreedteBepaler.cls.xml) (revision 62966) @@ -14,73 +14,33 @@ Do IngegevenKenmerken.Accept($this) #dim Breedte As %Double = IngegevenKenmerken.InterneBreedte + If ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenTypeAPI().IsSpoelbaklade(IngegevenKenmerken) { + + // Klasse zat oorspronkelijk in LBX-package en werd misbruikt door TAX, waarbij louter InterneBreedte op Kenmerken werd teruggegeven, wegens geen TAX-SpoelbakLade. + // Voorlopig ugly code om toch het risico op undefined in andere gevallen te vermijden (backwards compatibility): + If ($$$Not($IsObject(..SpoelbakAfmetingBepaler))) { + Set ..SpoelbakAfmetingBepaler = ##class(APPS.PM.Maatwerk.LBX.impl.SpoelbakAfmetingBepaler).%New() + } + Set Breedte = ..SpoelbakAfmetingBepaler.GeefAfmetingZonderUitsparing(IngegevenKenmerken) } Quit Breedte ]]> - -KADKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.KADKenmerken - - - LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken - -MATKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken - - - MVXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken - - -OLMKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.OLMKenmerken - - - - -SSTKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.SSTKenmerken - - - - -TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken - - - - -TBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken - -