1
0
mirror of https://github.com/sasjs/core.git synced 2025-12-18 17:24:36 +00:00

Compare commits

..

2 Commits

Author SHA1 Message Date
79c81aa8a4 feat: mf_existfileref macro 2021-01-26 16:00:23 +01:00
bbbcf7d550 chore: updating the docs for mf_getquotedstr 2021-01-23 13:37:15 +02:00
3 changed files with 47 additions and 2 deletions

View File

@@ -577,11 +577,18 @@ options noquotelenmax;
@brief Adds custom quotes / delimiters to a delimited string @brief Adds custom quotes / delimiters to a delimited string
@details Can be used in open code, eg as follows: @details Can be used in open code, eg as follows:
%put %mf_getquotedstr(blah blah blah); %put %mf_getquotedstr(blah blah blah);
which returns: which returns:
> 'blah','blah','blah' > 'blah','blah','blah'
Alternatively:
%put %mf_getquotedstr(these words are double quoted,quote=D)
for:
> "these","words","are","double","quoted"
@param in_str the unquoted, spaced delimited string to transform @param in_str the unquoted, spaced delimited string to transform
@param dlm= the delimeter to be applied to the output (default comma) @param dlm= the delimeter to be applied to the output (default comma)
@param indlm= the delimeter used for the input (default is space) @param indlm= the delimeter used for the input (default is space)

31
base/mf_existfileref.sas Normal file
View File

@@ -0,0 +1,31 @@
/**
@file
@brief Checks whether a fileref exists
@details You can probably do without this macro as it is just a one liner.
Mainly it is here as a convenient way to remember the syntax!
For this macro, if the fileref exists but the underlying file does not exist
@param fref the fileref to detect
@return output returns 1 if found AND the file exists. 0 is returned if not
found, and -1 is returned if the fileref is found but the file does not exist.
@version 8
@author [Allan Bowe](https://www.linkedin.com/in/allanbowe/)
**/
%macro mf_existfileref(fref
)/*/STORE SOURCE*/;
%local result;
%let result=%sysfunc(fileref(&fref));
%if &result>0 %then %do;
0
%end;
%else %if &result=0 %then %do;
1
%end;
%else %do;
-1
%end;
%mend;

View File

@@ -3,11 +3,18 @@
@brief Adds custom quotes / delimiters to a delimited string @brief Adds custom quotes / delimiters to a delimited string
@details Can be used in open code, eg as follows: @details Can be used in open code, eg as follows:
%put %mf_getquotedstr(blah blah blah); %put %mf_getquotedstr(blah blah blah);
which returns: which returns:
> 'blah','blah','blah' > 'blah','blah','blah'
Alternatively:
%put %mf_getquotedstr(these words are double quoted,quote=D)
for:
> "these","words","are","double","quoted"
@param in_str the unquoted, spaced delimited string to transform @param in_str the unquoted, spaced delimited string to transform
@param dlm= the delimeter to be applied to the output (default comma) @param dlm= the delimeter to be applied to the output (default comma)
@param indlm= the delimeter used for the input (default is space) @param indlm= the delimeter used for the input (default is space)