vhLib.Macro 1 %RegisteredObject,TECH.Comparator.IComparator right Do ##class(zTryout.CSC.Try).TryKenmerken() 1 1 1 Do ##class(zTryout.CSC.Try).Try1() 1 Do ##class(zTryout.CSC.Try).Try2() 1 Do ##class(zTryout.CSC.Try).Try3() 1 Do ##class(zTryout.CSC.Try).Try4() 1 Do ##class(zTryout.CSC.Try).Try5() 1 328896) { Set Kaderdeur = ##class(Prod.GADef.KaderDeur).%DeleteId(ID) } } ]]> Do ##class(zTryout.CSC.Try).Try7() 1 Do ##class(zTryout.CSC.Try).SchrijfProduct(675151,700) 1 ProductID:%Integer,VerplaatsNaarProductID:%Integer 1 %Library.CacheStorage ^zTryout.CSC.TryD TryDefaultData ^zTryout.CSC.TryD ^zTryout.CSC.TryI ^zTryout.CSC.TryS %%CLASSNAME