mirror of
https://github.com/sasjs/core.git
synced 2025-12-10 14:04:36 +00:00
97 lines
2.6 KiB
SAS
97 lines
2.6 KiB
SAS
/**
|
|
@file
|
|
@brief Testing mv_getviyafileextparms macro
|
|
|
|
<h4> SAS Macros </h4>
|
|
@li mf_isblank.sas
|
|
@li mp_assert.sas
|
|
@li mp_assertscope.sas
|
|
@li mv_getviyafileextparms.sas
|
|
|
|
**/
|
|
|
|
options mprint;
|
|
|
|
%let mvarIgnoreList =
|
|
MC0_JADP1LEN MC0_JADP2LEN MC0_JADP3LEN MC0_JADPNUM MC0_JADVLEN
|
|
SASJSPROCESSMODE SASJS_STPSRV_HEADER_LOC;
|
|
|
|
%put TEST 1 - Test with common extension, requesting only typeDefName parameter;
|
|
%mp_assertscope(SNAPSHOT)
|
|
%mv_getviyafileextparms(ext=txt, typeDefNameVar=viyaTypeDefName)
|
|
%mp_assertscope(COMPARE
|
|
,ignorelist=&mvarIgnoreList viyaTypeDefName
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(not %mf_isBlank(&viyaTypeDefName)),
|
|
desc=Check the requested macro variable viyaTypeDefName is not blank.
|
|
)
|
|
|
|
%put TEST 2 - Test with common extension, requesting only properties parameter;
|
|
%mp_assertscope(SNAPSHOT)
|
|
%mv_getviyafileextparms(ext=html, propertiesVar=viyaProperties)
|
|
%mp_assertscope(COMPARE
|
|
,ignorelist=&mvarIgnoreList viyaProperties
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(not %mf_isBlank(%superq(viyaProperties))),
|
|
desc=Check the requested macro variable viyaProperties is not blank.
|
|
)
|
|
|
|
%put TEST 3 - Test with common extension, requesting only mediaType parameter;
|
|
%mp_assertscope(SNAPSHOT)
|
|
%mv_getviyafileextparms(ext=mp3, mediaTypeVar=viyaMediaType)
|
|
%mp_assertscope(COMPARE
|
|
,ignorelist=&mvarIgnoreList viyaMediaType
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(not %mf_isBlank(&viyaMediaType)),
|
|
desc=Check the requested macro variable viyaMediaType is not blank.
|
|
)
|
|
|
|
%put TEST 4 - Test with common extension, requesting all parameters;
|
|
%mp_assertscope(SNAPSHOT)
|
|
%mv_getviyafileextparms(
|
|
ext=css,
|
|
typeDefNameVar=cssViyaTypeDefName,
|
|
propertiesVar=cssViyaProperties,
|
|
mediaTypeVar=cssViyaMediaType
|
|
)
|
|
%mp_assertscope(COMPARE
|
|
,ignorelist=
|
|
&mvarIgnoreList cssViyaTypeDefName cssViyaProperties cssViyaMediaType
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(not ( %mf_isBlank(&cssViyaTypeDefName) or
|
|
%mf_isBlank(%superq(cssViyaProperties)) or
|
|
%mf_isBlank(&cssViyaMediaType) ) ),
|
|
desc=Check a full set of requested macro variables are not blank.
|
|
)
|
|
|
|
|
|
%put TEST 5 - Test with invalid extension - requested parameters will be blank;
|
|
%mp_assertscope(SNAPSHOT)
|
|
%mv_getviyafileextparms(
|
|
ext=xxxINVALIDxxx,
|
|
typeDefNameVar=invalidTypeDefName,
|
|
propertiesVar=invalidProperties,
|
|
mediaTypeVar=invalidMediaType
|
|
)
|
|
%mp_assertscope(COMPARE
|
|
,ignorelist=
|
|
&mvarIgnoreList invalidTypeDefName invalidProperties invalidMediaType
|
|
)
|
|
|
|
%mp_assert(
|
|
iftrue=(
|
|
%mf_isBlank(&invalidTypeDefName) and
|
|
%mf_isBlank(%superq(invalidProperties)) and
|
|
%mf_isBlank(&invalidMediaType)
|
|
),
|
|
desc=Check the requested macro variables are all blank.
|
|
)
|