diff --git a/src/main/QRPGLESRC/IBMIUNIT.rpgle b/src/main/QRPGLESRC/IBMIUNIT.rpgle
index c930d12..a896105 100644
--- a/src/main/QRPGLESRC/IBMIUNIT.rpgle
+++ b/src/main/QRPGLESRC/IBMIUNIT.rpgle
@@ -940,6 +940,7 @@ dcl-proc runTests;
 
             callUiCase( ui.testSetup : testCase );
             status = callProcedure( testSuite.testSetupProcedure );
+            testCase.result = status;                             
 
             if ( status = RESULT_SUCCESSFUL );