Being stuck with using Enterprise Guide instead of having access to a real computer is a pain.
You can create simple SAS code to copy the source code to the SAS log or some other place where you can look at it. If SAS is running on Windows then it is normally very easy as you should have a SASAUTOS fileref defined.
884 data _null_;
885 infile sasautos(tslit.sas);
886 input;
887 put _infile_;
888 run;
NOTE: The infile library SASAUTOS is:
Directory=('C:\Program Files\SASHome\SASFoundation\9.4\core\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\aacomp\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\accelmva\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\assist\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\dmscore\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\eis\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\ets\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\graph\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\hps\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\iml\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\mlearning\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\or\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\qc\sasmacro' 'C:\Program
Files\SASHome\SASFoundation\9.4\share\sasmacro' 'C:\Program Files\SASHome\SASFoundation\9.4\stat\sasmacro')
NOTE: The infile SASAUTOS(tslit.sas) is:
Filename=C:\Program Files\SASHome\SASFoundation\9.4\core\sasmacro\tslit.sas,
RECFM=V,LRECL=32767,File Size (bytes)=3509,
Last Modified=07Sep2017:00:11:06,
Create Time=05May2022:12:17:21
/*---------------------------------------------------------------------
*
* SAS TEST LIBRARY
*
* NAME: tslit.sas
* TITLE: %tslit - puts single quotes around input value
* INPUT:
* OUTPUT: none
* SPEC.REQ:
* SUPPORT: flash - gordon Keener
* domcge - Don McGee - Dev Testing Austin (DTA)
* 04May06 domcge - updated macro with Gordon Keener's version.
*-------------------------------------------------------------------*/
/*********************************************************************
NAME: tslit
FUNCTION: puts single quote around the input value. This comes in
useful when needing to evaluate a macro variable and at the
same time put singe quotes (') around the value.
For example:
%put %tslit(test); --- will output 'test' to the log
%put %tslit(&SYSHOSTNAME); --- will output the value in &SYSHOSTNAME
in single quotes, ie. 'rdaw3squad'
An example in PROC TSSQL:
proc tssql;
CREATE TABLE tab1(var1 CHAR(10));
INSERT INTO tab1 VALUES(%tslit(&SYSHOSTNAME));
--- The following will produce an error because it ---
--- it thinks it is looking for a column name. ---
INSERT INTO tab1 VALUES("&SYSHOSTNAME");
SELECT * FROM tab1;
DROP TABLE tab1;
quit;
The log:
31 proc tssql;
32 CREATE TABLE tab1(var1 CHAR(10));
NOTE: Execution succeeded. No rows affected.
33
34 INSERT INTO tab1 VALUES(%tslit(&SYSHOSTNAME));
NOTE: Execution succeeded. One row affected.
35
36 INSERT INTO tab1 VALUES("&SYSHOSTNAME");
ERROR: Column not found ERROR: column "rdaw3squad" not found
37
38 SELECT * FROM tab1;
VAR1
----------
rdaw3squad
39
40 DROP TABLE tab1;
NOTE: Execution succeeded. No rows affected.
41 quit;
NOTE: PROCEDURE TSSQL used (Total process time):
real time 0.25 seconds
cpu time 0.23 seconds
**********************************************************************/
/*********************************************************************
* This version of the macro was provided by Gordon Keener. It will *
* work in the datastep because it unquotes the result at the end. *
* It also uses the datastep function quote to added the necessary *
* values to the input value. *
*********************************************************************/
%macro tslit(value);
%local s1 s2 v1 v2 v3;
/* S1337780: Check for NULL string */
%if %length(&value)=0 %then %do;
''
%end;
%else %do;
%let s1 = %str(%'%");
%let s2 = %str(%"%');
%let v1 = %qsysfunc(translate(&value, &s1, &s2));
%let v2 = %qsysfunc(quote(&v1));
%let v3 = %qsysfunc(translate(&v2, &s2, &s1));
%unquote(&v3)
%end;
%mend;
NOTE: A total of 105 records were read from the infile library SASAUTOS.
The minimum record length was 0.
The maximum record length was 81.
NOTE: 105 records were read from the infile SASAUTOS(tslit.sas).
The minimum record length was 0.
The maximum record length was 81.
NOTE: DATA statement used (Total process time):
real time 0.01 seconds
cpu time 0.00 seconds
On Unix if SASAUTOS fileref is not defined for you it is easy enough to define as on Unix they normally store all of the autocall macros into a single directory instead of the gazillion individual directories they used on PC-SAS. So if the SASAUTOS fileref is not defined you can make it yourself.
%if %sysfunc(fileref(sasautos)) %then %do;
filename sasautos '!SASROOT/sasautos';
%end;
Other points:
- They do not change the autocall macro very often.
- If you are using Enterprise Guide (or SAS/Studio) to submit your code then there are other macros that are defined by that interface. Finding the source for those is MUCH harder.
- Some are just ancient and so do not take advantage of advances in SAS features. For example the %TSLIT() macro just could just be replaced with this function call: %sysfunc(quote(%superq(value),%str(%')))
Click image to register for webinar
