1
0
mirror of https://github.com/sasjs/core.git synced 2026-01-07 17:40:05 +00:00

feat: new mp_applyformats macro (and test), plus new addition to mp_validatecol (is_format)

This commit is contained in:
munja
2021-12-23 13:50:58 +00:00
parent a13c782074
commit 9f815c73e9
6 changed files with 281 additions and 3 deletions

View File

@@ -0,0 +1,45 @@
/**
@file
@brief Testing mp_applyformats.sas macro
<h4> SAS Macros </h4>
@li mf_getvarformat.sas
@li mp_applyformats.sas
@li mp_assert.sas
@li mp_getcols.sas
**/
/**
* Test 1 Base case
*/
data work.example;
set sashelp.prdsale;
format _all_;
run;
%let origfmt=%mf_getvarformat(work.example,month);
%mp_getcols(sashelp.prdsale,outds=work.cols)
data work.cols2;
set work.cols;
lib='WORK';
ds='EXAMPLE';
var=name;
fmt=format;
keep lib ds var fmt;
run;
%mp_applyformats(work.cols2)
%mp_assert(
iftrue=("&orig_fmt"=""),
desc=Check that formats were cleared,
outds=work.test_results
)
%mp_assert(
iftrue=("%mf_getvarformat(work.example,month)"="MONNAME3."),
desc=Check that formats were applied,
outds=work.test_results
)