Index: WSimpl/AX/CalculatedProduct/ProductUpdater.cls.xml =================================================================== diff -u -r62385 -r64147 --- WSimpl/AX/CalculatedProduct/ProductUpdater.cls.xml (.../ProductUpdater.cls.xml) (revision 62385) +++ WSimpl/AX/CalculatedProduct/ProductUpdater.cls.xml (.../ProductUpdater.cls.xml) (revision 64147) @@ -71,7 +71,7 @@ #dim Product As DOM.PM.Product = "" #dim LadeVariant As AXimpl.PM.enu.LadeVariant = ..GeefLadeVariant(ProductId, Request.Attribute) - If ((LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TBX()) || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).LBX()) || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX() || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX()))) { + If ((LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TBX()) || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).LBX()) || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX() || (LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX())) || (LadeVariant = "MAT") ) { Set Product = ..GeefProductVolgensAxKenmerken(Request, ProductId, DossierNummer) } Else { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("Onbekende LadeVariant voorzien: '"_LadeVariant_"'. Het door AX aangeleverde AdminProductNummer: '"_ProductId_"'.")) Index: WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml =================================================================== diff -u -r62288 -r64147 --- WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml (.../LadeVariantBepaler.cls.xml) (revision 62288) +++ WSimpl/AX/CalculatedProduct/LadeVariantBepaler.cls.xml (.../LadeVariantBepaler.cls.xml) (revision 64147) @@ -64,6 +64,8 @@ Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX() } ElseIf (..ProductTypeApi.IsMerivoboxProduct(ProductId)) { Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX() + } ElseIf (..ProductTypeApi.IsAntislipmatProduct(ProductId)) { + Set LadeVariant = "MAT" } Quit LadeVariant @@ -92,11 +94,13 @@ Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TBX() } ElseIf (..LadeVariantVolgensAxKenmerken = "LBX") { Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).LBX() - } ElseIf (..LadeVariantVolgensAxKenmerken = "TAX") { - Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX() + } ElseIf (..LadeVariantVolgensAxKenmerken = "MAT") { + Set LadeVariant = "MAT" } ElseIf (..LadeVariantVolgensAxKenmerken = "MVX") { Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).MVX() - } + }ElseIf (..LadeVariantVolgensAxKenmerken = "TAX") { + Set LadeVariant = ##class(AXimpl.PM.enu.LadeVariant).TAX() + } Quit LadeVariant ]]>