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)
/