IBM TSO/E REXX User Manual page 211

Sample SETUP Exec
/****************************** REXX *******************************/
/* This exec is an example of how to allocate a private PDS named */
/* USERID.REXX.EXEC to the beginning of a concatenation to SYSPROC */
/* that consists of 3 other data sets named 'ICQ.INFOCNTR.ICQCLIB' */
/* 'SYS1.TSO.CLIST', and 'ISP.ISPF.CLISTS'. After the ALLOCATE
/* command executes, a message indicates whether the command was
/* successful or not.
/*******************************************************************/
"ALLOC FILE(SYSPROC) DATASET(rexx.exec,",
"'icq.infocntr.icqclib',",
"'sys1.tso.clist',",
"'isp.ispf.clists') SHR REUSE"
IF RC = 0 THEN
SAY 'Allocation to SYSPROC completed.'
ELSE
SAY 'Allocation to SYSPROC failed.'
Note: The order in which you list data sets in an ALLOCATE command is the
order in which they are concatenated and searched. To give your execs
priority in the search order, list your data set of execs before other data
sets.
Generally all the data sets in the list should have the same record
format, (either RECFM=VB or RECFM=FB) and logical record length,
LRECL. Also, the first data set in the list can determine the block size,
BLKSIZE, for the data sets that follow. If the block size of the first data
set is smaller than the block sizes of subsequent data sets, you might
end in error. To avoid error, use the Preliminary Checklist and the other
checklists provided, and follow directions carefully.
2. Execute SETUP by entering the following EXEC command:
READY
EXEC rexx.exec(setup) exec
If the allocation was successful, you should then see displayed on your screen:
Allocation to SYSPROC completed.
To have SETUP execute when you log on and automatically allocate your data
set to SYSPROC, type the same EXEC command in the COMMAND field of
your LOGON panel.
Checklist #4
*/
*/
*/
Appendix A. Allocating Data Sets
193