Index: vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml =================================================================== diff -u -r45953 -r45956 --- vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml (.../Test.cls.xml) (revision 45953) +++ vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml (.../Test.cls.xml) (revision 45956) @@ -61,7 +61,8 @@ #dim EventRaiserSpy As vhTest.Spy.TECH.PubSub.EventRaiser = ##class(vhTest.Spy.TECH.PubSub.EventRaiser).PushedInstance() - #dim Product As DOM.PM.impl.DataM.DataMProduct = ##class(DOM.PM.impl.ProductImpl).OpenId(..#ProductId) + Set Product = ##class(DOM.PM.impl.DataM.DataMProduct).%New() + Do Product.Open(..#ProductId) Do Product.ZetKorttekst("Korttekst") Do Product.Save() @@ -77,14 +78,26 @@ #dim EventRaiserSpy As vhTest.Spy.TECH.PubSub.EventRaiser = ##class(vhTest.Spy.TECH.PubSub.EventRaiser).PushedInstance() - #dim Product As DOM.PM.impl.DataM.DataMProduct = ##class(DOM.PM.impl.ProductImpl).OpenId(..#ProductId) + Set Product = ##class(DOM.PM.impl.DataM.DataMProduct).%New() + Do Product.Open(..#ProductId) Do Product.Save() Do $$$AssertEquals(EventRaiserSpy.IsEventGeraised("AdministratiefProductGewijzigdEvent"),"Event 'AdministratiefProductGewijzigdEvent' niet geraised") Do $$$AssertEquals(EventRaiserSpy.IsEventGeraised("AdministratiefProductGemaaktEvent"),"Event 'AdministratiefProductGemaaktEvent' niet geraised") ]]> + + + +