Using OPS/REXX › OPS/REXX Interfaces › OPS/REXX Interface with TSO › Support for the TSO Host Command EXECIO

Support for the TSO Host Command EXECIO

The CA OPS/MVS product implements its own version of EXECIO as a TSO host command. You can use EXECIO, as documented for TSO/E REXX, in an OPS/REXX program. You cannot use EXECIO in a rule of any kind. The OPS/REXX version of EXECIO:

• Does not support the LIFO option.
• Checks the syntax of the stem name.
• Prohibits use of global variable stems with the STEM option.
• Supports DISKRU only for true sequential data sets. You cannot use DISKRU against a partitioned data set member.
• Supports mixed case variable names with the STEM option

The following OPS/REXX program segment demonstrates how you might use the EXECIO command to read and display the first 72 characters from each record in a sequential data file:

ADDRESS TSO
"ALLOC F(DD77) DA('SOME.DATASET.NAME') SHR REU"
IF RC <> 0 THEN
  DO
    SAY "ALLOC RC="RC
    /* Error recovery */
    EXIT
  END
"EXECIO * DISKR DD77 (FINIS"
IF RC <> 0 THEN
  DO
    SAY "EXECIO RC="RC
    /* Error recovery */
  END
DO WHILE QUEUED() > 0
  PULL REC
  SAY SUBSTR(REC,1,72)
END
"FREE F(DD77)
IF RC <> 0 THEN
  SAY "FREE FAILED; RC="RC