mirror of
https://github.com/sasjs/core.git
synced 2025-12-18 17:24:36 +00:00
Compare commits
2 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
| 79c81aa8a4 | |||
| bbbcf7d550 |
9
all.sas
9
all.sas
@@ -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
31
base/mf_existfileref.sas
Normal 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;
|
||||||
@@ -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)
|
||||||
|
|||||||
Reference in New Issue
Block a user