The SETLANG function can be used in REXX execs that run in any MVS address
space.
Using the STORAGE Function
You can use the STORAGE function to retrieve data from a particular address in
storage. You can also use the STORAGE function to place data into a particular
address in storage.
The STORAGE function can be used in REXX execs that run in any MVS address
space.
Using the SYSCPUS Function
The SYSCPUS function places, in a stem variable, information about those CPUs
that are on-line.
The SYSCPUS function runs in any MVS address space.
Example:
Consider a system with two on-line CPUs. Their serial numbers are FF0000149221
and FF1000149221. Assuming you issue the following sequence of statements
/* REXX */
x = SYSCPUS('cpus.')
SAY '0, if function performed okay: ' x
SAY 'Number of on-line CPUs is ' cpus.0
DOi=1TOCPUS.0
SAY 'CPU' i ' has CPU info ' cpus.i
END
you get the following output:
0, if function performed okay: 0
Number of on-line CPUs is 2
CPU 1 has CPU info FF0000149221
CPU 2 has CPU info FF1000149221
/* ↑ ↑ */
/* | 4 digits = model number */
/* 6 digits = CPU ID */
Using the SYSDSN Function
The SYSDSN function determines if a specified data set is available for your use. If
the data set is available for your use, it returns "OK".
available = SYSDSN('myrexx.exec')
/* available could be set to "OK" */
When a data set is not correct as specified or when a data set is not available, the
SYSDSN function returns one of the following messages:
v MEMBER SPECIFIED, BUT DATASET IS NOT PARTITIONED
v MEMBER NOT FOUND
v DATASET NOT FOUND
v ERROR PROCESSING REQUESTED DATASET
v PROTECTED DATASET
v VOLUME NOT ON SYSTEM
v UNAVAILABLE DATASET
TSO/E External Functions
126
z/OS V1R1.0 TSO/E REXX User’s Guide