sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-04-21 07:21:31 +00:00
Code Issues Projects Releases Wiki Activity

chore: updating all.sas

Browse Source
This commit is contained in:
github-actions
2026-04-02 22:45:31 +00:00
parent 186ea1cfba
commit e66ef31e26
1 changed files with 15 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
all.sas
+15 -1
View File
@@ -14541,7 +14541,7 @@ alter table &libds modify &var char(&len);
%mend mp_updatevarlength; %mend mp_updatevarlength;
/** /**
@file @file
@brief Used to validate variables in a dataset @brief Used to validate values in a data step
@details Useful when sanitising inputs, to ensure that they arrive with a @details Useful when sanitising inputs, to ensure that they arrive with a
certain pattern. certain pattern.
Usage: Usage:
@@ -14568,6 +14568,7 @@ alter table &libds modify &var char(&len);
@param [in] incol The column to be validated @param [in] incol The column to be validated
@param [in] rule The rule to apply. Current rules: @param [in] rule The rule to apply. Current rules:
@li ISINT - checks if the variable is an integer @li ISINT - checks if the variable is an integer
@li ISLIB - checks if the value is a valid libref (NOT whether it exists)
@li ISNUM - checks if the variable is numeric @li ISNUM - checks if the variable is numeric
@li LIBDS - matches LIBREF.DATASET format @li LIBDS - matches LIBREF.DATASET format
@li FORMAT - checks if the provided format is syntactically valid @li FORMAT - checks if the provided format is syntactically valid
@@ -14606,6 +14607,19 @@ alter table &libds modify &var char(&len);
else &outcol=1; else &outcol=1;
drop &tempcol; drop &tempcol;
%end; %end;
%else %if &rule=ISLIB %then %do;
if _n_=1 then do;
retain &tempcol;
&tempcol=prxparse('/^[_a-z]\w{0,7}$/i');
if missing(&tempcol) then do;
putlog 'ERR' +(-1) "OR: Invalid expression for ISLIB";
stop;
end;
drop &tempcol;
end;
if prxmatch(&tempcol, trim(&incol)) then &outcol=1;
else &outcol=0;
%end;
%else %if &rule=LIBDS %then %do; %else %if &rule=LIBDS %then %do;
/* match libref.dataset */ /* match libref.dataset */
if _n_=1 then do; if _n_=1 then do;