From fc81f62d2fb3cffd1a6a684ce6811b392ca3d342 Mon Sep 17 00:00:00 2001
From: Allan Bowe <allnbwe@gmail.com>
Date: Mon, 28 Jun 2021 23:52:12 +0300
Subject: [PATCH] fix: setting syscc to zero to prevent error state in
 response.  Closes #50

---
 all.sas           | 1 +
 base/mp_abort.sas | 1 +
 2 files changed, 2 insertions(+)

diff --git a/all.sas b/all.sas
index d2dfbda..91e94a4 100644
--- a/all.sas
+++ b/all.sas
@@ -1678,6 +1678,7 @@ Usage:
         sysuserid=symget('sysuserid');
         iftrue=symget('iftrue');
         put (_all_)(/=);
+        call symputx('syscc',0);
         abort cancel nolist;
       run;
     %end;
diff --git a/base/mp_abort.sas b/base/mp_abort.sas
index 37bcb4d..b880aed 100644
--- a/base/mp_abort.sas
+++ b/base/mp_abort.sas
@@ -165,6 +165,7 @@
         sysuserid=symget('sysuserid');
         iftrue=symget('iftrue');
         put (_all_)(/=);
+        call symputx('syscc',0);
         abort cancel nolist;
       run;
     %end;