本课程指导您完成一些详细的步骤来选择并配置资源适配器以连接至 IMS™ 服务器。
DFSDDLT0 控制语句
S11 1 1 1 1 TP 1 L GU E OK E Z0017 DATA SKS2 M2 SI1M3 SI1 WTO SEGMENT SI1 RECEIVED L GN E QD WTO END OF INPUT SEGMENTS L ISRT IW06OUT L Z0012 DATA *******M1SO1 E OK WTO SEGMENT SO1 INSERTTED L ISRT L Z0027 DATA ********M1SO2*********M2SO2 E OK WTO SEGMENT SO2 INSERTTED L ISRT L Z0048 DATA **********M1SO3***********M2SO3************M3SO3 E OK WTO SEGMENT SO3 INSERTTED WTO CURRENT PROGRAM STLDDLT2 TERMINATED L GU
此特定 IMS 应用程序返回的输出消息固定大小为 99 个字节,并通过 COBOL 01 结构 OUTPUT-MSG 表示。
开发此多段应用程序的一个方法是使用 COBOL 定义 OUTPUT-MSG 来定义此事务的输出。第二个方法是为此事务的输出创建一个输出消息。本教程提供的代码使用了第二个方法,因为这个方法也可用于构建处理可变长度输出消息的应用程序。将继续使用每个消息段的 COBOL 定义,以简化对每个段的数据访问。
连接至 IMS 服务器