Index: BL/FOP/Prod/Product.cls.xml =================================================================== diff -u -r30626 -r31226 --- BL/FOP/Prod/Product.cls.xml (.../Product.cls.xml) (revision 30626) +++ BL/FOP/Prod/Product.cls.xml (.../Product.cls.xml) (revision 31226) @@ -255,13 +255,11 @@ #dim ProductType As APPS.EC.enu.ProductType = "" #dim ProductAPI As DOM.PM.ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI() If ProductAPI.IsMaatwerkProduct(ProductID){ - Try{ - #dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ProductAPI.GeefMaatwerkProduct(ProductID) - #dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken() - + #dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ProductAPI.GeefMaatwerkProduct(ProductID) + #dim ProductSpecificatie As DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie = MaatwerkProduct.GeefProductSpecificatie() + If $isObject(ProductSpecificatie) { + #dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ProductSpecificatie.GeefIngegevenKenmerken() Set ProductType = ##class(APPS.EC.Winkelkar.impl.ProductTypeBepaler).%New().GeefProductType(IngegevenKenmerken) - }Catch{ - DO ##class(vhLib.Logger).%New("BL.FOP.Prod.Product").Warning("BepaalProductType gefaald","Product '"_ProductID_"' wordt valselijk als MaatwerkProduct aanschouwd."_$C(13,10)_##class(TECH.ExceptionHandler).Catch().ToString()) } } Quit ProductType