Index: DOM/PM/impl/DataM/DataMProductAPI.cls.xml =================================================================== diff -u -r2463 -r2473 --- DOM/PM/impl/DataM/DataMProductAPI.cls.xml (.../DataMProductAPI.cls.xml) (revision 2463) +++ DOM/PM/impl/DataM/DataMProductAPI.cls.xml (.../DataMProductAPI.cls.xml) (revision 2473) @@ -60,6 +60,14 @@ { Set Product = ##class(DOM.PM.TBXProduct.impl.TBXRelingImpl).%New(ProductNummer) } + ElseIf ($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",ProductNummer,"BasisType")) [ "BODEM") // Bij problemen eventueel beter : ... ? 1(1"RL",1"RLH",1"RLTUS",1"FRONTRL") OPM: "RLALU" is geen reling maar een adapter-stukje + { + Set Product = ##class(DOM.PM.TBXProduct.impl.TBXBodemImpl).%New(ProductNummer) + } + ElseIf ($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",ProductNummer,"BasisType")) [ "RUGSTRK") // Bij problemen eventueel beter : ... ? 1(1"RL",1"RLH",1"RLTUS",1"FRONTRL") OPM: "RLALU" is geen reling maar een adapter-stukje + { + Set Product = ##class(DOM.PM.TBXProduct.impl.TBXRugImpl).%New(ProductNummer) + } ElseIf ($$ISORGAL^ORGALUX(ProductNummer)) { If ($Piece(^KPR(ProductNummer,"I1"),"\",4) = 1327) // orgalux dwarslat op maat classificatie