From 1035bc22bf2e2212874e772a04871ae9c6ddb4d4 Mon Sep 17 00:00:00 2001
From: Steven James <steven@waitforitjames.com>
Date: Tue, 23 Nov 2021 09:10:37 -0500
Subject: [PATCH] Store possible failure status in testCase.result

Fixes issue #11
---
 src/main/QRPGLESRC/IBMIUNIT.rpgle | 1 +
 1 file changed, 1 insertion(+)

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 );