I think he wants the QMGR name and that his program may run on any number of CICS regions, not knowing which one is which.
| Bob Buxton <[EMAIL PROTECTED]>
Sent by: MQSeries List <[email protected]> 04/11/2006 10:38 AM
|
|
The simplest way to check if CICS is connected to MQ is to issue any MQ
Verb, you will get a reason code 2059 MQRC_Q_MGR_NOT_AVAILABLE if it is not
connected
Bob Buxton
Websphere MQ for zOS Development
>
> ----- Message from Al Chu <[EMAIL PROTECTED]> on Tue, 11 Apr
> 2006 18:54:35 +1000 -----
>
> Subject:
>
> Check MQ connection from a CICS program
>
> Hi
>
> I’d like to know whether is a way to check CICS MQ connection from a
> CICS program. I searched the manuals and found the following;
>
>
>
┌────────────────────────────────────────────────────────────────────────┐
> │
> ?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
> │
> │?? EXEC CICS LINK PROGRAM('CSQCDSPL') INPUTMSG('CKQC
> DISPLAY')
> ???????????????????????????????????????????????????????????????????????????????????????????????
> │
> │
>
> ????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
> │
>
└────────────────────────────────────────────────────────────────────────┘
> Figure 46. Linking to the adapter program CSQCDSPL from a CICS program
>
> Figure 44 shows a typical output from this command. The response
> messages are sent to the CKQQ queue (the transient data queue).
>
> The COMMAREA option can be used instead of INPUTMSG but only when
> the program is run at PLT time.
>
>
>
> This interface seems to send the response to the CKQQ TDQ. I’d like
> to receive the response in my program via Commarea after PLT time.
> Or is there any control block which I can peep?
>
> Al Chu
Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com
Archive: http://listserv.meduniwien.ac.at/archives/mqser-l.html
