Do ##class(vhUnitTest.Manager).RunTest("/debug=1/display=all","PRA.Concurrency.TestAtomaireInstructie") vhUnitTest.TestCase IsViaObjecten:%Boolean 1 1 IsViaObjecten:%Boolean,ResourceName:%String,ResourceNameEinde:%String