Index: zTryout/WV/PM/Test.cls.xml =================================================================== diff -u -r65422 -r65562 --- zTryout/WV/PM/Test.cls.xml (.../Test.cls.xml) (revision 65422) +++ zTryout/WV/PM/Test.cls.xml (.../Test.cls.xml) (revision 65562) @@ -220,7 +220,7 @@ #dim NieuwProductId As %String = GAProd.ProductGetObjectId() If ##class(DOM.DomeinContext).Instance().GeefProductAPI().BestaatProduct(NieuwProductId) { - Write !,"TBXProduct is opnieuw gemaakt met ProductId '"_NieuwProductId_"'." + Write " TBXProduct is opnieuw gemaakt met ProductId '"_NieuwProductId_"'." Write:(NieuwProductId '= OorspronkelijkKprProductId) !!,"!!! LET OP: productId is gewijzigd t.o.v. de oorspronkelijke waarde (was initieel Id '"_OorspronkelijkKprProductId_"'). !!! ",! ;Write !,"DisplayKenmerken wordt nu oproepen:",! ;Do ..DisplayKenmerken(NieuwProductId) @@ -378,7 +378,7 @@ #dim NieuwProductId As %String = GADefKaderDeur.ProductGetObjectId() If ##class(DOM.DomeinContext).Instance().GeefProductAPI().BestaatProduct(NieuwProductId) { - Write !,"KADProduct is opnieuw gemaakt met ProductId '"_NieuwProductId_"'." + Write " KADProduct is opnieuw gemaakt met ProductId '"_NieuwProductId_"'." Write:(NieuwProductId '= OorspronkelijkKprProductId) !!,"!!! LET OP: productId is gewijzigd t.o.v. de oorspronkelijke waarde (was initieel Id '"_OorspronkelijkKprProductId_"'). !!! ",! ;Write !,"DisplayKenmerken wordt nu oproepen:",! ;Do ..DisplayKenmerken(NieuwProductId)