z/OS上如何使用REXX编写自动化脚本

本示例代码介绍了如何使用REXX编写自动化脚本，即REXX程序可以对z/OS进行自动化操作。该示例代码中主要包括如何访问z/OS资源、执行z/OS命令以及处理返回结果等内容。

/* 该示例演示如何在z/OS上使用REXX编写自动化脚本 */
/* 连接到 z/OS端口 */
ADDRESS HOSTIP NAME('myzostcpip.com') SERVICE(23)
SAY '已连接到z/OS端口'
/* 执行z/OS命令 */
"ALLOC FILE(INPUT) DA('MY.DATASET') SHR REUSE"
"EXEC PGM=MYPROGRAM,PARM='INPUT(INPUT)'"
"FREE FD(INPUT)"
/* 处理返回结果 */
IF RC <> 0 THEN DO
  SAY '命令执行失败'
  EXIT 8
END
ELSE DO
  SAY '命令执行成功'
END
/* 关闭z/OS端口 */
ADDRESS HOSTIP CLOSE
SAY '已关闭z/OS连接'

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com