Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Check MQ existance using REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries
View previous topic :: :: View next topic  
Author Message
PrabakarV

New User


Joined: 21 Dec 2007
Posts: 88
Location: My Desk

PostPosted: Tue Oct 06, 2009 11:45 am    Post subject: Check MQ existance using REXX
Reply with quote

Hi,

My requirement is to check a list of MQs against the MQ manager about their existance in MQ manager...

simply saying i have list of MQs in a PS file. I have to check whether they exists or not in MQM...

is there any way to achive this thru REXX? Thanks
Back to top
View user's profile Send private message

kaushik8205

New User


Joined: 10 Nov 2006
Posts: 49
Location: Canada

PostPosted: Sat Nov 07, 2009 1:17 am    Post subject:
Reply with quote

Hi,

Is there a specific requirement for doing this task with REXX..
As per my understanding this should be a one time task to check all obsolete Qs..

Thanks.
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Sat Nov 07, 2009 2:15 am    Post subject:
Reply with quote

You could use CSQUTIL program to list the Queues and then parse the SYSPRINT to do a match program with your table.
Code:
//TESTSTEP EXEC PGM=CSQUTIL,PARM='CSQ1'               
//*YSPRINT DD SYSOUT=*                                       
//SYSPRINT DD DSN=&&MQPRINT,DISP=(,PASS),UNIT=SYSDA,         
//            SPACE=(CYL,(1,1)),RECFM=FB,LRECL=121,BLKSIZE=0
//SYSIN    DD *                                             
COMMAND DDNAME(CMDINP)                                       
/*                                                           
//CMDINP   DD *                                             
DISPLAY QUEUE(*) ALL                                         
Back to top
View user's profile Send private message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Sun Nov 08, 2009 12:42 pm    Post subject:
Reply with quote

This check is just constrained to local Queue/channels, for remote queue/channels, there is no way to check without the support of the remote part's help.
Incorrect. See next reply.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2445
Location: Netherlands, Amstelveen

PostPosted: Sun Nov 08, 2009 4:13 pm    Post subject:
Reply with quote

Using the TGTQMGR(qmgrname) parameter makes it possible to query remote queue managers.
Suitable queues and channels have to be set up to access the remote queue manager.

If that is not the case one can trigger the jobs on other systems (/*ROUTE XEQ) and route the output to a central point.

Or if SA/390 is implemented remote execution can be performed by the INGSEND command.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Looping REXX - unable to interrupt RAVISANKAR07 CLIST & REXX 3 Wed Dec 06, 2017 1:08 pm
No new posts The same REXX program doesnt work for... jackzhang75 CLIST & REXX 5 Wed Dec 06, 2017 2:51 am
No new posts Rexx - File tailoring samzee71 CLIST & REXX 10 Thu Nov 30, 2017 10:47 pm
This topic is locked: you cannot edit posts or make replies. Rexx to Grab ISMF Information. upendrasri All Other Mainframe Topics 16 Sun Nov 26, 2017 12:35 am
No new posts Rexx to send an email without SMTP Se... upendrasri All Other Mainframe Topics 12 Sun Nov 19, 2017 7:59 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us