mirror of
https://github.com/sasjs/core.git
synced 2026-01-05 16:40:06 +00:00
fix: auto-detect cmplib in mcfxx funcs, mp_ds2csv supports dates etc, fix to mp_abort in viya due to abort cancel FILE hard stop (according to docs it should continue outside of the include)
This commit is contained in:
@@ -93,4 +93,74 @@ run;
|
||||
iftrue=("&test3b"="PASS"),
|
||||
desc=Checking data row Test 3,
|
||||
outds=work.test_results
|
||||
)
|
||||
)
|
||||
|
||||
/* test 4 - sasjs with compare */
|
||||
filename example temp;
|
||||
%mp_ds2csv(sashelp.air,outref=example,headerformat=SASJS)
|
||||
data _null_; infile example; input;put _infile_; if _n_>5 then stop;run;
|
||||
|
||||
data _null_;
|
||||
infile example;
|
||||
input;
|
||||
call symputx('stmnt',_infile_);
|
||||
stop;
|
||||
run;
|
||||
data work.want;
|
||||
infile example dsd firstobs=2;
|
||||
input &stmnt;
|
||||
run;
|
||||
|
||||
%mp_assert(
|
||||
iftrue=(&syscc =0),
|
||||
desc=Checking syscc prior to compare of sashelp.air,
|
||||
outds=work.test_results
|
||||
)
|
||||
|
||||
proc compare base=want compare=sashelp.air;
|
||||
run;
|
||||
%mp_assert(
|
||||
iftrue=(&sysinfo le 41),
|
||||
desc=Checking compare of sashelp.air,
|
||||
outds=work.test_results
|
||||
)
|
||||
|
||||
/* test 5 - sasjs with time/datetime/date */
|
||||
filename f2 temp;
|
||||
data work.test5;
|
||||
do x=1 to 5;
|
||||
y=x;
|
||||
z=x;
|
||||
end;
|
||||
format x date9. y datetime19. z time.;
|
||||
run;
|
||||
%mp_ds2csv(work.test5,outref=f2,headerformat=SASJS)
|
||||
data _null_; infile example; input;put _infile_; if _n_>5 then stop;run;
|
||||
|
||||
data _null_;
|
||||
infile f2;
|
||||
input;
|
||||
putlog _infile_;
|
||||
call symputx('stmnt2',_infile_);
|
||||
stop;
|
||||
run;
|
||||
data work.want5;
|
||||
infile f2 dsd firstobs=2;
|
||||
input &stmnt2;
|
||||
putlog _infile_;
|
||||
run;
|
||||
|
||||
%mp_assert(
|
||||
iftrue=(&syscc=0),
|
||||
desc=Checking syscc prior to compare of test5,
|
||||
outds=work.test_results
|
||||
)
|
||||
|
||||
proc compare base=want5 compare=work.test5;
|
||||
run;
|
||||
%mp_assert(
|
||||
iftrue=(&sysinfo le 41),
|
||||
desc=Checking compare of work.test5,
|
||||
outds=work.test_results
|
||||
)
|
||||
|
||||
|
||||
Reference in New Issue
Block a user