Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

MQ Queue Backup to tape

Status
Not open for further replies.

tautera

Programmer
Feb 3, 2005
2
US
We are running MQ 5.3 under z/OS (mainframe). We have a queue which can contain (xml) messages up to 4meg in length. On a daily basis, at night, this queue is cleared out, but before it's cleared, we want to backup it up to tape. Is there a utility that can be used to backup/restore a specific MQ Q to tape? Remember messages can be 4 meg ...
 
Well looks like I get to answer my own post.

According to the WebSphere® MQ for z/OS™ System Administration Guide Version 5 Release 3 SC34-6053-00.

The answer is (drum roll) .. WebSphere MQ utility program CSQUTIL.

Use the following JCL to invoke it:

//COPY EXEC PGM=CSQUTIL,PARM=’CSQ1’
//STEPLIB DD DISP=SHR,DSN=thlqual.SCSQANLE
// DD DISP=SHR,DSN=thlqual.SCSQAUTH
//OUTPUTA DD DSN=SAMPLE.UTILITY.COPYA,DISP=(NEW,CATLG),
// SPACE=(CYL,(5,1),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,BLKSIZE=23200)
//CSQUOUT DD DSN=SAMPLE.UTILITY.COPY3,DISP=(NEW,CATLG),
// SPACE=(CYL,(5,1),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,BLKSIZE=23200)
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
* COPY WHOLE PAGE SET TO ’CSQUOUT’
COPY PSID(03)
* COPY ONE QUEUE TO ’OUTPUT’
COPY QUEUE(ABC123A) DDNAME(OUTPUTA)
/
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top