Index: DOM/PM/TBXProduct/impl/TBXLadeMetUitsparing.cls.xml =================================================================== diff -u -r44248 -r44250 --- DOM/PM/TBXProduct/impl/TBXLadeMetUitsparing.cls.xml (.../TBXLadeMetUitsparing.cls.xml) (revision 44248) +++ DOM/PM/TBXProduct/impl/TBXLadeMetUitsparing.cls.xml (.../TBXLadeMetUitsparing.cls.xml) (revision 44250) @@ -6,43 +6,6 @@ DOM.PM.TBXProduct.TBXLadeMetUitsparing,DOM.PM.TBXProduct.impl.TBXLadeImpl right - -1 -%Integer - 0) { - ; Throw error - } - } - Else { - // De bouwsteen "Binnenzijkant v. spoelbak" is niet aanwezig - // In dit geval wordt de TussenstukDiepte hardcoded afgeleid uit ladediepte - #dim LadeDiepte As %Numeric = $LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",..GeefPRNr(),"LD")) - Set TussenstukDiepte=$S(LadeDiepte'>350:90, LadeDiepte'>400:120, 1:140) ; Tussenstuk voor LD=350 : 90mm - LD=400 : 120mm - LD > 400 : 140mm (LD=350 added by WimV on 24/06/2011) - } - - Quit TussenstukDiepte -]]> - - - -1 -%Integer - - - 1 %Integer