vhUnitTest.TestCase TECH.File.FileAPI 1 TECH.XMLCorrelater 1 AXimpl.AifMessage.EventRaiser 1 aTestName:%String FileAPI:TECH.File.FileAPI=..FileAPI,XmlCorrelater:TECH.XMLCorrelater=..XmlCorrelater,EventRaiser:AXimpl.AifMessage.EventRaiser=..EventRaiser 1 AXimpl.AifMessage.ResponseProcessor 1 %Stream.Object ") do Stream.WriteLine("") do Stream.WriteLine("") quit Stream ]]>