Index: vhUnitTest/DOM/PM/TBXProduct/impl/TBXLadeImpl/BaseRug.cls.xml =================================================================== diff -u -r29214 -r44215 --- vhUnitTest/DOM/PM/TBXProduct/impl/TBXLadeImpl/BaseRug.cls.xml (.../BaseRug.cls.xml) (revision 29214) +++ vhUnitTest/DOM/PM/TBXProduct/impl/TBXLadeImpl/BaseRug.cls.xml (.../BaseRug.cls.xml) (revision 44215) @@ -51,7 +51,7 @@ #dim RugProductIDNormaal As %String = "568111" Do ..ZetRugProductSpoelbakInPRBS(..#ProductID,RugProductIDNormaal) - Set TBX = ##class(DOM.PM.TBXProduct.impl.TBXSpoelbakladeImpl).%New(..#ProductID) + Set TBX = ##class(DOM.PM.TBXProduct.impl.TBXSpoelbakladeType2).%New(..#ProductID) Quit TBX ]]> Index: DOM/PM/impl/ProductTypeAPIimpl.cls.xml =================================================================== diff -u -r44154 -r44215 --- DOM/PM/impl/ProductTypeAPIimpl.cls.xml (.../ProductTypeAPIimpl.cls.xml) (revision 44154) +++ DOM/PM/impl/ProductTypeAPIimpl.cls.xml (.../ProductTypeAPIimpl.cls.xml) (revision 44215) @@ -62,7 +62,7 @@ } Elseif (Klas = ##class(DOM.PM.enu.TBXToepassing).Spoelbak()) { - Set Product = ##class(DOM.PM.TBXProduct.impl.TBXSpoelbakladeImpl).%New(ProductID) + Set Product = ##class(DOM.PM.TBXProduct.impl.TBXSpoelbakladeType2).%New(ProductID) } Elseif (Klas = ##class(DOM.PM.enu.TBXToepassing).Buro()) {