From cb0ddfb61c1a13a3b9f3739a3c18d018703f91a3 Mon Sep 17 00:00:00 2001 From: Allan Bowe Date: Thu, 30 Sep 2021 18:50:02 +0100 Subject: [PATCH] fix: applying tag wrappers to sasjsAbort response json. The adapter will always extract from these in any case, and it seems there are some situations where it is not possible to avoid errors being thrown in SAS 9 (resulting in a log always appearing in the response). This change will make it much easier to handle on the frontend side. --- all.sas | 4 ++-- base/mp_abort.sas | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/all.sas b/all.sas index 2d4e760..ae4a4c2 100644 --- a/all.sas +++ b/all.sas @@ -1830,7 +1830,7 @@ Usage: msg=cats('"',msg,'"'); if symexist('_debug') then debug=quote(trim(symget('_debug'))); else debug='""'; - if debug ge '"131"' then put '>>weboutBEGIN<<'; + put '>>weboutBEGIN<<'; put '{"START_DTTM" : "' "%sysfunc(datetime(),datetime20.3)" '"'; put ',"sasjsAbort" : [{'; put ' "MSG":' msg ; @@ -1862,7 +1862,7 @@ Usage: put ",""SYSWARNINGTEXT"" : " syswarningtext; put ',"END_DTTM" : "' "%sysfunc(datetime(),datetime20.3)" '" '; put "}" @; - if debug ge '"131"' then put '>>weboutEND<<'; + put '>>weboutEND<<'; run; %put _all_; diff --git a/base/mp_abort.sas b/base/mp_abort.sas index 099a7ee..dd4d500 100644 --- a/base/mp_abort.sas +++ b/base/mp_abort.sas @@ -169,7 +169,7 @@ msg=cats('"',msg,'"'); if symexist('_debug') then debug=quote(trim(symget('_debug'))); else debug='""'; - if debug ge '"131"' then put '>>weboutBEGIN<<'; + put '>>weboutBEGIN<<'; put '{"START_DTTM" : "' "%sysfunc(datetime(),datetime20.3)" '"'; put ',"sasjsAbort" : [{'; put ' "MSG":' msg ; @@ -201,7 +201,7 @@ put ",""SYSWARNINGTEXT"" : " syswarningtext; put ',"END_DTTM" : "' "%sysfunc(datetime(),datetime20.3)" '" '; put "}" @; - if debug ge '"131"' then put '>>weboutEND<<'; + put '>>weboutEND<<'; run; %put _all_;