sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-01-15 12:30:06 +00:00
Code Issues Projects Releases Wiki Activity

fix: conditional logic around mp_abort(mode=INCLUDE) to cover case when no mp_include was executed

Browse Source
This commit is contained in:
Allan Bowe
2021-09-05 20:55:44 +03:00
parent 5cc5fae750
commit d096cbddeb
2 changed files with 28 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
all.sas
View File

@@ -1715,6 +1715,7 @@ Usage:
%then %do; %then %do;
options obs=max replace nosyntaxcheck mprint; options obs=max replace nosyntaxcheck mprint;
%if &mode=INCLUDE %then %do; %if &mode=INCLUDE %then %do;
%if %sysfunc(exist(&errds))=1 %then %do;
data _null_; data _null_;
set &errds; set &errds;
call symputx('iftrue',iftrue,'l'); call symputx('iftrue',iftrue,'l');
@@ -1724,6 +1725,11 @@ Usage:
run; run;
%if (&iftrue)=0 %then %return; %if (&iftrue)=0 %then %return;
%end; %end;
%else %do;
%put &sysmacroname: No include errors found;
%return;
%end;
%end;
/* extract log errs / warns, if exist */ /* extract log errs / warns, if exist */
%local logloc logline; %local logloc logline;

6
base/mp_abort.sas
View File

@@ -88,6 +88,7 @@
%then %do; %then %do;
options obs=max replace nosyntaxcheck mprint; options obs=max replace nosyntaxcheck mprint;
%if &mode=INCLUDE %then %do; %if &mode=INCLUDE %then %do;
%if %sysfunc(exist(&errds))=1 %then %do;
data _null_; data _null_;
set &errds; set &errds;
call symputx('iftrue',iftrue,'l'); call symputx('iftrue',iftrue,'l');
@@ -97,6 +98,11 @@
run; run;
%if (&iftrue)=0 %then %return; %if (&iftrue)=0 %then %return;
%end; %end;
%else %do;
%put &sysmacroname: No include errors found;
%return;
%end;
%end;
/* extract log errs / warns, if exist */ /* extract log errs / warns, if exist */
%local logloc logline; %local logloc logline;