Index: vhUnitTest/BL/PPS/OL/TestInpak.cls.xml =================================================================== diff -u -r31456 -r35936 --- vhUnitTest/BL/PPS/OL/TestInpak.cls.xml (.../TestInpak.cls.xml) (revision 31456) +++ vhUnitTest/BL/PPS/OL/TestInpak.cls.xml (.../TestInpak.cls.xml) (revision 35936) @@ -104,7 +104,12 @@ If $$$AssertTrue(..IsOptiboxServerAlive()) { Set Inpak = ##class(BL.PPS.OL.Inpak).%New() Do $$$AssertEquals(Inpak.StartBerekening(..Bon.GeefID()),$$$pxStatusOK) + + Do $$$AssertTrue(0,"Als OptiboxDEV Alive is, dan deze UT terug inschakelen: vhUnitTest.APPS.Halux.PPS.TBXPers.TestWerkpost") } + Else { + Do $$$AssertTrue(0,"Zolang de OptiboxDEV niet Alive is, is de test vhUnitTest.APPS.Halux.PPS.TBXPers.TestWerkpost uitgeschakeld") + } ]]> Index: vhUnitTest/APPS/Halux/PPS/TBXPers/TestWerkpost.cls.xml =================================================================== diff -u -r33369 -r35936 --- vhUnitTest/APPS/Halux/PPS/TBXPers/TestWerkpost.cls.xml (.../TestWerkpost.cls.xml) (revision 33369) +++ vhUnitTest/APPS/Halux/PPS/TBXPers/TestWerkpost.cls.xml (.../TestWerkpost.cls.xml) (revision 35936) @@ -5,6 +5,11 @@ 1 vhUnitTest.TestCase + +%Boolean +1 + + 1007