第八章运行程序.docVIP

2.5 第八章 运行程序 本章讲述了以下内容： 使用CL CALL命令运行程序和传递参数 从菜单驱动的应用程序运行程序 使用用户建立的命令运行程序 管理活动组 管理运行时存储空间 另外，可以用以下方法运行程序 程序员菜单。CL程序设计包含此菜单的信息，启动应用开发管理工具(STRPDM）命令。ADTS/400：应用开发管理工具包含这条命令的信息。 QCMDEXC程序。CL程序设计包含这个程序的信息。 高级语言。第九章2.6节中的“程序和过程调用”。提供了从其它高级语言运行程序及调用程序和过程的资料。 2.5.1使用CL CALL命令运行程序 可以使用CL CALL命令运行程序(类型为*PGM)。可以交互地或作为批处理作业的一部分，或在CL程序中使用该命令。如果需要提示，键入CALL然后按F4(提示)键。如果需要帮助，键入CALL然后按F1(帮助)键。 例如：要从命令行调用程序EMPRPT，键入： CALL EMPRPT 指定的程序目标必须在某个库中，并且这个库要包含在库列表*LIBL中。也可以象下面那样在CL CALL命令中确切地指出库名： CALL MYLIB/EMPRPT 关于CL CALL命令的详细的资料参见CL参考手册。 一旦调用程序，OS/400系统就执行程序中的指令。 2.5.1.1使用CL CALL命令传递参数 当运行程序时，使用CL CALL命令的PARM选项来向ILE程序传递参数。 CALL PGM(程序名) PARM(参数1，参数2，……，参数n) 也可以只键入参数而不指定键字。 CALL 库/程序名(参数1，参数2，……，参数n) 每个参数的值可以由CL程序变量或由以下之一来指定： 字符串常量 数字常量 逻辑常量 如果把参数传递给一个ILE RPG/400过程，这个过程作为入口过程，那么这个程序必须有且仅有一个*ENTRY PLIST。紧随其后的参数（在PARM语句中）必须与CALL命令所传递的参数一一对应。 关于如何处理参数的完整性描述参见CL参考手册中的CALL命令或CL程序设计中的“在程序间传递参数”。 例如，程序EMPRPT2在首次起动时要求有正确的口令传递给它，否则将不运行。图30显示了源程序。 1.要建立程序，键入： CRTBNDRPG PGM(MYLIB/EMPRPT2) 2.要运行程序，键入： CALL MYLIB/EMPRPT2(HELLO) 当调用命令发出时，由命令传递的参数值储存起来，程序的参数PSWORD指向它的位置。程序检查PSWORD的内容与程序中存储的(’HELLO’)是否匹配。在这里，两个值是一样的，所以程序继续运行。 *===============================================================* * 程 序 名： EMPRPT2 * * 有关文件： EMPMST（物理文件） * * PRINT （打印文件） * * 说 明：这个程序在输入的口令正确时，打印存储在EMPMST * * 文件中的雇员信息。 * * 在命令行进入“CALL 库名/EMPRPT2（PSWORD）”, * * 这里PSWORD是这个程序的口令，口令是‘HELLO’。 * *===============================================================* FPRINT O F 80 PRINTER FEMPMST IP E