运行 EXCI 通道和容器样本应用程序

您可以创建批处理作业以运行客户机程序。 您还可以使用预生成的汇编程序版本来运行客户机程序。

开始之前

  1. 要使用 COBOL 版本的 EXCI 客户机程序，必须使用 DFHZXTCL ot DFHYXTVL 过程将程序转换，编译和链接编辑到合适的库中。
  2. EXCI 样本程序的资源定义包含在 CSD 中，但未包含在 IBM®定义的组列表 DFHLIST 中。 如果使用 GRPLIST = DFHLIST 初始化 CICS® ，那么必须先安装 EXCI 资源定义组，然后才能使用样本。 或者，您可以将样本组添加到启动组列表，以便在系统初始化时自动安装这些组。

过程

  • 根据以下样本 JCL 创建用于运行客户机程序的批处理作业:
    图 1。 用于启动 EXCI 客户机程序的样本作业
    //EXCI    JOB (accounting_information),CLASS=A,TIME=1440,
//        USER=userid,PASSWORD=pswd,REGION=100M
//*===============================================================*
//*    JCL to execute an external CICS interface client program   *
//*===============================================================*
//          EXEC  PGM=pgmname,REGION=nnM,MEMLIMIT=nnG
//STEPLIB   DD    DSN=CICSTS54.CICS.EXCI.LOADLIB,DISP=SHR
//          DD    DSN=CICSTS54.CICS.SDFHEXCI,DISP=SHR
//SYSPRINT  DD    SYSOUT=A
//SYSMDUMP  DD    DSN=SYS1.SYSMDP00,VOL=SER=volid,SPACE=(CYL,(1,1)),
//                DISP=OLD,UNIT=3390
  • 如果要使用客户机程序的预生成汇编程序版本，请针对客户机程序发出以下 EXEC 语句:
    //*===============================================================*
//ASM       EXEC  PGM=client_program_name,PARM='applid,userid',REGION=0M,MEMLIMIT=1G
    其中：
    客户机程序名
    指定客户机程序的名称，例如 DFH$AXNC。
    APPLID
    指定目标 CICS 服务器区域的 APPLID。
    注: 如果省略 applid，那么必须保留用户标识前面的逗号。
    USERID
    指定 DPL_request 调用的用户标识。

结果

图 2 显示了成功执行客户机程序 DFH$AXNC 的预生成汇编程序版本时来自 DFH$AXNC 的输出示例。

图 2。 成功执行 DFH$AXNC 的示例输出
*===================== EXCI Sample Batch Client Program =======================*
*                                                                              *
*     Parameters: APPLID=IYK2Z2G1 .......... .......                           *
*                                                                              *
*  EXEC Level Processor.                                                       *
*    Setting up the EXEC level call.                                           *
*    The Link Request with channel FIRST_CHANNEL has completed successfully.   *
*    Checking response container sent by server.                               *
*    Response OK, continue processing.                                         *
*    Query channel command completed successfully.                             *
*    Correct number of containers returned.                                    *
*    Browse of channel names completed successfully.                           *
*    The Link Request with channel SECOND_CHANNEL has completed successfully.  *
*    Checking response container sent by server.                               *
*    Response OK, continue processing.                                         *
*                                                                              *
*  CALL Level Processor.                                                       *
*    Initialise_User call complete.                                            *
*    Allocate_Pipe call complete.                                              *
*    Open_Pipe call complete.                                                  *
*    The connection has been successful.                                       *
*    Container EBCDIC_DATA was received correctly in channel FIRST_CHANNEL.    *
*    Container ASCII_DATA was received correctly in channel SECOND_CHANNEL.    *
*    Channels have been deleted.                                               *
*    Close_Pipe call complete.                                                 *
*    Deallocate_Pipe call complete.                                            *
*                                                                              *
*=================== End of EXCI Sample Batch Client Program ==================*