1
0
mirror of https://github.com/sasjs/core.git synced 2025-12-11 06:24:35 +00:00

fix: adding quit statement so that exit loop would work on step boundary

This commit is contained in:
2021-01-21 21:55:07 +02:00
parent efc731cfaa
commit 82184bc6be
2 changed files with 6 additions and 2 deletions

View File

@@ -4782,6 +4782,7 @@ proc sql
%local lib dir ds1 ds2 ds3 start_tm i;
%let start_tm=%sysfunc(datetime());
%let duration=%sysevalf(&duration);
/* create a temporary library in WORK */
%let lib=%mf_getuniquelibref();
@@ -4809,7 +4810,7 @@ libname &lib "%sysfunc(pathname(work))/&dir";
proc summary ;
class randnum0 randnum1;
output out=&lib..&ds2;
run;
run;quit;
%if %sysevalf( (%sysfunc(datetime())-&start_tm)>&duration ) %then %goto gate;
/* add more data */
@@ -4818,6 +4819,7 @@ libname &lib "%sysfunc(pathname(work))/&dir";
select *, ranuni(0)*10 as randnum2
from &lib..&ds1
order by randnum1;
quit;
%if %sysevalf( (%sysfunc(datetime())-&start_tm)>&duration ) %then %goto gate;
proc sort data=&lib..&ds3;