1
0
mirror of https://github.com/sasjs/core.git synced 2026-01-09 02:10:06 +00:00

feat: adding two more test types to mp_assertdsobs.sas, also a test for the assertion macro itself

This commit is contained in:
Allan Bowe
2021-05-15 16:30:57 +03:00
parent fed217eec3
commit 530cd6e95c
3 changed files with 124 additions and 6 deletions

View File

@@ -0,0 +1,60 @@
/**
@file
@brief Testing mp_assertdsobs.sas macro
<h4> SAS Macros </h4>
@li mp_assertdsobs.sas
@li mp_assertcolvals.sas
**/
data work.somedata;
do x=1 to 15;
output;
end;
run;
%mp_assertdsobs(work.somedata,
test=ATLEAST 15,
outds=work.test_the_test
)
%mp_assertdsobs(work.somedata,
test=ATMOST 15,
outds=work.test_the_test
)
data work.check;
val='PASS';
run;
%mp_assertcolvals(work.test_the_test.test_result,
checkvals=work.check.val,
desc=Testing ATLEAST / ATMOST for passes,
test=ALLVALS
)
%mp_assertdsobs(work.somedata,
test=ATLEAST 16,
outds=work.test_the_test2
)
%mp_assertdsobs(work.somedata,
test=ATMOST 14,
outds=work.test_the_test2
)
data _null_;
set work.test_the_test2;
putlog (_all_)(=);
run;
data work.check2;
val='FAIL';
run;
%mp_assertcolvals(work.test_the_test2.test_result,
checkvals=work.check2.val,
desc=Testing ATLEAST / ATMOST for failures,
test=ALLVALS
)