使用z/OS JCL来执行IBM MQ消息队列管理器上的命令

本示例展示了如何使用z/OS的JCL来执行IBM MQ消息队列管理器上的命令，同时演示了如何在JCL脚本中解析变量以及如何捕获错误信息。

//MQCMD   JOB ,MSGCLASS=H,CLASS=A,MSGLEVEL=(1,1),                  
//             NOTIFY=&SYSUID,USER=JW10224                         
//*---------------------------------------------------------------- 
//MQCMD EXEC PGM=CSQUTIL                                          
//STEPLIB  DD DISP=SHR,DSN=SYS1.CSSLIB                            
//CMDOUT   DD SYSOUT=*                                            
//*---------------------------------------------------------------- 
//CMDSYSIN DD *                                                   
* ---------------------------------------------------------------- 
* MQSC command string to Define MQ Objects:                         
* ---------------------------------------------------------------- 
* DEFINE CHANNEL(MQCH01) CHLTYPE(SVRCONN) TRPTYPE(TCP)             
*    DESCR('Sample channel') REPLACE                                
* END                                                              
* ---------------------------------------------------------------- 
/*

//HEADTAIL DD *
/**** BEGIN PROGRAM - CSQUTIL CMD INVOKE ****/
/**** FETCH JOB, STEP, PROC and APPLICATION ERRORS   ****/
EXEC PROC=CSPUTIL              
/*
/**** END PROGRAM   ****/

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