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

fix: mp_abort on windows m6+

Browse Source
This commit is contained in:
Allan Bowe
2022-06-06 11:28:37 +00:00
parent 67ba2a5286
commit 16ed91f6a9
2 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
all.sas
View File

@@ -2207,7 +2207,7 @@ Usage:
include, and then call \%mp_abort(mode=INCLUDE) from the source program (ie, include, and then call \%mp_abort(mode=INCLUDE) from the source program (ie,
OUTSIDE of the top-parent macro). OUTSIDE of the top-parent macro).
The soft abort has also been found to be ineffective in 9.4m6 windows The soft abort has also been found to be ineffective in 9.4m6 windows
environments. environments and above, so in these cases, endsas is used.
@param mac= (mp_abort.sas) To contain the name of the calling macro. Do not @param mac= (mp_abort.sas) To contain the name of the calling macro. Do not
@@ -2416,8 +2416,10 @@ Usage:
rc=stpsrvset('program error', 0); rc=stpsrvset('program error', 0);
call symputx("syscc",0,"g"); call symputx("syscc",0,"g");
run; run;
%if &sysscp=WIN and "%substr(&sysvlong. ,1,9)"="9.04.01M6" %then %do; %if &sysscp=WIN
/* skip approach (below) does not work on this OS / version combo */ and "%substr(%str(&sysvlong ),1,8)"="9.04.01M"
and "%substr(%str(&sysvlong ),9,1)">"5" %then %do;
/* skip approach (below) does not work in windows m6+ envs */
endsas; endsas;
%end; %end;
%else %do; %else %do;

8
base/mp_abort.sas
View File

@@ -22,7 +22,7 @@
include, and then call \%mp_abort(mode=INCLUDE) from the source program (ie, include, and then call \%mp_abort(mode=INCLUDE) from the source program (ie,
OUTSIDE of the top-parent macro). OUTSIDE of the top-parent macro).
The soft abort has also been found to be ineffective in 9.4m6 windows The soft abort has also been found to be ineffective in 9.4m6 windows
environments. environments and above, so in these cases, endsas is used.
@param mac= (mp_abort.sas) To contain the name of the calling macro. Do not @param mac= (mp_abort.sas) To contain the name of the calling macro. Do not
@@ -231,8 +231,10 @@
rc=stpsrvset('program error', 0); rc=stpsrvset('program error', 0);
call symputx("syscc",0,"g"); call symputx("syscc",0,"g");
run; run;
%if &sysscp=WIN and "%substr(&sysvlong. ,1,9)"="9.04.01M6" %then %do; %if &sysscp=WIN
/* skip approach (below) does not work on this OS / version combo */ and "%substr(%str(&sysvlong ),1,8)"="9.04.01M"
and "%substr(%str(&sysvlong ),9,1)">"5" %then %do;
/* skip approach (below) does not work in windows m6+ envs */
endsas; endsas;
%end; %end;
%else %do; %else %do;