Index: vhUnitTest/APPS/VisiDot/TestVHossXML.cls.xml =================================================================== diff -u -r2079 -r2494 --- vhUnitTest/APPS/VisiDot/TestVHossXML.cls.xml (.../TestVHossXML.cls.xml) (revision 2079) +++ vhUnitTest/APPS/VisiDot/TestVHossXML.cls.xml (.../TestVHossXML.cls.xml) (revision 2494) @@ -146,7 +146,7 @@ Set Dir = "Stage2_NormalRead_AllOk\" Set File = "ReadResults_ReadID00000182_Controller_Gate1_Status00_Time_20110814_153423_890_DUAL_(Stage_3_Before_DB_Insertion).xml" Set CaptureInfo = ..Import(Dir, File) - D ##class(APPS.VisiDot.zTryout).%New().ShowVHoss(CaptureInfo) + D ##class(APPS.VisiDot.impl.Tech).ShowVHoss(CaptureInfo) Set Status = CaptureInfo.XMLExportToStream(.CaptureInfoStream,,"literal") Do ..WebService.UpdateData(##class(APPS.VisiDot.enu.ActionCodes).VHossRead(), CaptureInfoStream, .ResultDesc, .ProcessedData) @@ -165,7 +165,7 @@ Do ..WebService.UpdateData(##class(APPS.VisiDot.enu.ActionCodes).VHossRead(), CaptureInfoStream, .ResultDesc, .ProcessedData) w !,"Missing labels : ",! - D ##class(APPS.VisiDot.zTryout).%New().ShowVHoss(CaptureInfo) + D ##class(APPS.VisiDot.impl.Tech).ShowVHoss(CaptureInfo) Set ErrorCode=..Finish(ProcessedData) Do $$$AssertEquals(ErrorCode,##class(APPS.VisiDot.enu.FoutCodes).VHossLadeOntbrekend(),"Capture bevat een ontbrekende lade")