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
-
-