02.05.2013 Views

SAS(R) 9.1.3 Companion for z/OS

SAS(R) 9.1.3 Companion for z/OS

SAS(R) 9.1.3 Companion for z/OS

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Output 16.11 Selecting a Member from a Source Statement Library<br />

19 proc source indd=’userid.taste.test’ print;<br />

20 select oranges4; run;<br />

ORANGES4<br />

data oranges;<br />

input variety $ flavor texture looks;<br />

total=flavor+texture+looks;<br />

datalines;<br />

navel 9 8 6<br />

temple 7 7 7<br />

valencia 8 9 9<br />

mandarin 5 7 8<br />

;<br />

proc sort data=oranges;<br />

by descending total;<br />

proc print data=oranges;<br />

title ’Taste Test Result <strong>for</strong> Oranges’;<br />

17 - RECORDS<br />

NOTE: INDD=SYS00158 data set is :<br />

Dsname=USERID.TASTE.TEST,<br />

Unit=3380,Volume=XXXXXX,Disp=SHR,Blksize=23055,<br />

Lrecl=259,Recfm=FB.<br />

3348 Members defined in source library.<br />

0 Aliases defined in source library.<br />

1 Members selected.<br />

17 Records read from source library.<br />

Procedures under z/<strong>OS</strong> SOURCE Procedure 345<br />

Example of Building and Submitting a Job to Assemble Programs<br />

The following PROC SOURCE program builds and submits a job to compile assembler<br />

programs. It writes the output directly to the internal reader so that the compile job<br />

can be executed.<br />

filename out sysout=a pgm=intrdr lrecl=80 recfm=f;<br />

proc source indd=’userid.asm.src’ nodata outdd=out;<br />

first ’//COMPILE JOB (0,ROOM),’’DUMMY’’,’;<br />

first ’// NOTIFY=,REGION=4M,TYPRUN=HOLD’;<br />

first ’/*JOBPARM FETCH’;<br />

last ’//’;<br />

be<strong>for</strong>e ’//XXXXXXXX EXEC ASMHCL,’ 3;<br />

be<strong>for</strong>e ’// MAC2=’’XXX.MACLIB’’ ’;<br />

be<strong>for</strong>e ’//SYSIN DD DISP=SHR,’;<br />

be<strong>for</strong>e ’// DSN=USERID.ASM.SOURCE(XXXXXXXX)’ 26 NOBLANK;<br />

run;<br />

The output that is written to the internal reader is shown below. Note that this<br />

output shows only the statements that are generated by PROC SOURCE, be<strong>for</strong>e they<br />

are executed.

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!