Rexx 系统命令

Rexx是一种解释型编程语言，用于处理IBM系列计算机操作系统（如z/OS，OS/390，VM/CMS等）上的文本文件和数据处理。Rexx提供了一组系统命令，可用于管理操作系统和执行各种任务。以下是一些常用的Rexx系统命令：

ADDRESS

该命令用于指定Rexx程序执行的环境地址，可以是COMMAND、TANGO、DB2或其他可用的调用接口。通常，在不指定环境时，默认为COMMAND。

/* 将 Rexx 程序环境切换为 DB2 */
ADDRESS DB2

ARG

该命令用于将命令行参数传递到Rexx程序中。ARG也可以用于启动时从JES2或JES3中获取信息。

/* 获取命令行参数 */
ARG arg1 arg2 arg3

/* 获取从JES2提供的输入 */
ARG &INDD

/* 获取从JES3提供的输出 */
ARG &OUTDD

CALL

该命令用于调用另一个Rexx程序或系统命令，并将控制权传递给它。

/* 调用另一个Rexx程序 */
CALL myprogram

/* 调用DOS系统命令 */
CALL 'CMD.EXE /C DIR'

EXECIO

该命令用于读取或写入文件。

/* 从文件中读取一行 */
EXECIO 1 DISKR myinputfile
PARSE PULL myline

/* 将一行写入文件 */
myline = "Hello World"
EXECIO 1 DISKW myoutputfile
PARSE VAR myline myword1 myword2
myword1 = "Goodbye"
myword2 = "World"
EXECIO 1 DISKW myoutputfile

EXPLAIN

该命令用于解释Rexx程序并报告语法错误。

/* 解释Rexx程序 */
EXPLAIN myprogram

IF

该命令用于编写条件判断语句。

/* IF语句 */
IF var1 = 1 & var2 = 'ABC' THEN
   SAY '条件成立！'
ELSE
   SAY '条件不成立！'

NOP

该命令用于占位或注释代码。

/* 占位符 */
NOP

/* 注释 */
/* 这是一个注释行 */

PARSE

该命令用于解析字符串并将其分成组件，通常用于处理命令行参数。

/* 解析命令行参数 */
PARSE VAR myline arg1 arg2 arg3

QUEUE

该命令用于将字符串放入队列中，以便其他任务可以使用它。

/* 将字符串放入队列中 */
QUEUE 'Hello World!'

SAY

该命令用于将输出发送到标准输出设备。

/* 输出字符串 */
SAY 'Hello World!'

SIGNAL

该命令用于控制程序的执行流程。

/* 中止程序执行 */
SIGNAL STOP

/* 跳转到指定标签 */
SIGNAL mylabel