ASG
IBM
Zystems
Cressida
Icon
Netflexity
 
  MQSeries.net
Search  Search       Tech Exchange      Education      Certifications      Library      Info Center      SupportPacs      LinkedIn  Search  Search                                                                   FAQ  FAQ   Usergroups  Usergroups
 
Register  ::  Log in Log in to check your private messages
 
RSS Feed - WebSphere MQ Support RSS Feed - Message Broker Support

MQSeries.net Forum Index » Mainframe, CICS, TXSeries » Any Interest......

Post new topic  Reply to topic
 Any Interest...... « View previous topic :: View next topic » 
Author Message
cicsprog
PostPosted: Wed Oct 20, 2010 8:37 am    Post subject: Any Interest...... Reply with quote

Partisan

Joined: 27 Jan 2002
Posts: 347

I was thinking that we could put together a webinar to share utilities we’ve all built for easing Z/OS MQ Administration. I’d be willing to do the first one. I’d probably need to get an ok from my company before I share anything I’ve developed. Limit it to one hour preso. Even if I'm not able to share the code, it might give you some ideas on what to develop for your own shop.

Here a screen shot from our in-house written ISPF MQ dialogs (Priamary Menu):

USERID - xxxxxxxx ----- MVS MQSeries Utilities/JCL Generator ---- xxxx ----
COMMAND ===>

MVS MQSeries Options

0 - MQSeries Site Environment

1 - MQSeries Object Maintenance

2 - MQSeries Queue Utilities

3 - MQSeries Queue Manager Utilities


Depress PF1 for Extended Help and Setup Information

Option 1 Screen

USERID - xxxxxxx -------- MQM MVS/ESA OBJECT Utilities
OPTION ===>

Dialogs for Administrators

1 Define OBJECTS to MQSeries Queue Manager
2 Define OBJECTS to MQSeries Queue Manager (FOREGROUND)
3 Extract OBJECTS from a MQSeries Queue Manager

Option 2 Screen

USERID - xxxxxx ------ MQM MVS/ESA QUEUE Utilities ------------ xxxx ----
OPTION ===>

Dialogs for Developers

1 - Send a Text Message to a Queue (Local, Remote, CLUSTER Q's Possible)
2 - MQSeries Queue PUT/GET or Trigger On/Off Attribute Manipulation
3 - Copy Queue Data to Sequential File
4 - Browse an MQM Queue Elements(Browse,Delete,Forward Msgs)*IBM Dialog
5 - Delete MQM Queue Data by Message Range
6 - Browse MQM Queue Data (Browse Msgs)*IBM Dialog
7 - Administer an MQM Dead Letter Queue on MQM ===> MQL0 *IBM Dialog
8 - Dead Letter Queue Report
9 - IBM DLQ Handler Utility
10 - Misc Queue Utilities (SupportPacs MA01 MO03)

Dialogs for Administrators

11 - CSQUTIL EMPTY,LOAD,COPY,FORMAT,COPYPAGE,RESETPAGE Utilities

Option 3 Screen

USERID - xxxxxxx --------- MQM MVS/ESA MQM Utilties ------------ xxxx ----
OPTION ===>


Dialogs for Administrators

1 - Issue MQM System Commands (Foreground) *IBM Dialog
2 - Issue MQM System Commands Batch
3 - Create/Recover/Expand MQSeries Queue Manager Datasets
4 - CSQUTIL EMPTY,LOAD,COPY,FORMAT,COPYPAGE,RESETPAGE Utilities
5 - MQSeries Queue Manager Reports
6 - MQSeries Installation Verification Program (IVP) MQM ===> MQC1
7 - MQSeries Client CHANNEL STOP Utility
8 - MQSeries CLUSTER Utilities
9 - Send DOC to IBM
10 - Send DOC to ASG

All these dialogs either generate JCL to execute the functionality or do a series of foreground commands thru CLISTS OR REXX.

Post back to this thread if you have interest.
Back to top
View user's profile Send private message
cicsprog
PostPosted: Wed Oct 20, 2010 8:54 am    Post subject: Reply with quote

Partisan

Joined: 27 Jan 2002
Posts: 347

Here’s an example on how useful these dialogs are in my shop. In option 3.3,

3 - Create/Recover/Expand MQSeries Queue Manager Datasets

Here are the options available to generate JCL to perform the MQ Administration task (screen shot is bad because of the wrap):

USERID - xxxxxxx ---------- MQSeries Dataset Utilities --------- xxx ----
COMMAND ===>

MQSeries Queue Manager ===> ( MQL0 MQL1 MQL2 MQC2 MQC1)
Dataset Option ===>
Create Dataset Options
1 - PAGESET Num ===> - Create/Expand/Dynamic PAGESET
Dataset
===> (Create=C Expand=E Dynamic=D)
2 - BOOTSTRAP - Create BOOTSTRAP Datasets 1 and 2
Log Type ===> (Dual Log D-Dual S-Single)
3 - Active Log Num ===> - Create Active Log Datset
Log Type ===> (Dual Log D-Dual S-Single)
Dynamic ===> N (Dynamic Y=Yes N=No)
4 - BSDS Management - NEWLOG and DELETE via CSQJU003
Recover Dataset Options
5 - BSDS Report(CSQJU004) - Print log map utility for Recovery
Log Type ===> (Dual Log D-Dual S-Single)
6 - Log Print (CSQ1LOGP) - Print logs (BSDS,Active,Archive)
Logs From ===> (Log type B=BSDS A=Active R=Archive)
7 - PAGESET Num ===> - Recover PAGESET Dataset
8 - BOOTSTRAP - Recover BOOTSTRAP Datasets 1 and 2
Expand Dataset Options
9 - Active Log Expand - Expand Active Log Datasets
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic  Reply to topic Page 1 of 1

MQSeries.net Forum Index » Mainframe, CICS, TXSeries » Any Interest......
Jump to:  



You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Protected by Anti-Spam ACP
 
 


Theme by Dustin Baccetti
Powered by phpBB © 2001, 2002 phpBB Group

Copyright © MQSeries.net. All rights reserved.