Values PARSE SOURCE Returns

The string that PARSE SOURCE returns contains these tokens:

The characters OPS/REXX
One of the following strings:
- RULE, in an AOF rule
- PROGRAM, in an OPS/REXX program
- SUBROUTINE, in an external subroutine
The name of the ruleset.rulename or program issuing the PARSE SOURCE instruction
The name of a subroutine, if a subroutine and not a program or ruleset.rulename issued the PARSE SOURCE instruction
One of the following:
- The ddname from which the program was loaded
- The ? character, if in a rule, in an external subroutine, or if invoked through an edit macro such as !OI
- SYSnnnnn (where nnnnn is a numeric value), if the OX or OPSEXEC command invoked the program
The data set name from which the program was loaded, or the ? character if a rule or a subroutine invoked the program
The name of the initial host command environment, for instance TSO or OPER

Following are examples of strings that PARSE SOURCE returns if the source of a program is:

An AOF rule

OPS/REXX RULE RS1.RULE1 RS1.RULE1 ? ? OPER

An external subroutine called by a rule

OPS/REXX SUBROUTINE RS1.RULE1 EXSUB1 ? ? OPER

An OPS/REXX program invoked by the OI command processor
```
OPS/REXX PROGRAM PGM1 PGM1 SYSEXEC OPS/REXX TSO
```
An OPS/REXX program invoked by the OX command processor
```
OPS/REXX PROGRAM PGM1 PGM1 SYS00007 OPS/REXX TSO
```