mirror of
https://github.com/sasjs/core.git
synced 2025-12-10 14:04:36 +00:00
33 lines
488 B
SAS
33 lines
488 B
SAS
/**
|
|
@file
|
|
@brief Testing mf_getfmtname macro
|
|
|
|
<h4> SAS Macros </h4>
|
|
@li mf_getfmtname.sas
|
|
@li mp_assert.sas
|
|
|
|
**/
|
|
|
|
%mp_assert(
|
|
iftrue=(
|
|
"%mf_getfmtname(8.)"="W"
|
|
),
|
|
desc=Checking basic numeric,
|
|
outds=work.test_results
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(
|
|
"%mf_getfmtname($4.)"="$CHAR"
|
|
),
|
|
desc=Checking basic char,
|
|
outds=work.test_results
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(
|
|
"%mf_getfmtname(comma14.10)"="COMMA"
|
|
),
|
|
desc=Checking longer numeric,
|
|
outds=work.test_results
|
|
) |