1
0
mirror of https://github.com/sasjs/core.git synced 2025-12-10 14:04:36 +00:00

fix: tests for ms_creategroup

This commit is contained in:
Allan Bowe
2022-05-17 14:56:11 +00:00
committed by GitHub
parent ed11d44fe8
commit 3fa639ebf7
2 changed files with 13 additions and 3 deletions

View File

@@ -117,6 +117,9 @@ libname &libref JSON fileref=&fref2;
data &outds;
set &libref..root;
drop ordinal_root;
%if &mdebug=1 %then %do;
putlog _all_;
%end;
run;
@@ -129,11 +132,18 @@ run;
/* reset options */
options &optval;
%if &mdebug=1 %then %do;
%if &mdebug=0 %then %do;
filename &fref0 clear;
filename &fref1 clear;
filename &fref2 clear;
libname &libref clear;
%end;
%else %do;
data _null_;
infile &fref2;
input;
putlog _infile_;
run;
%end;
%mend ms_creategroup;

View File

@@ -22,7 +22,7 @@
%let id=0;
data _null_;
set work.test1;
call symputx('id',id);
call symputx('id',groupid);
run;
%mp_assert(
iftrue=(&id>0),
@@ -36,7 +36,7 @@ run;
data _null_;
set work.test2;
where name="&group";
call symputx('checkid',id);
call symputx('checkid',groupid);
run;
%mp_assert(
iftrue=(&checkid=&id),