zOs/SQL/EXLOBUNL
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769V.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
UNLOAD DATA
PUNCHDDN TPUNCH UNLDDN TSRECD SPANNED YES MAXERR 20
SHRLEVEL CHANGE
FROM TABLE A540769.EXLOBNTRIES
( BROKERUUID
, ACCESSID
, QOPLEVEL
, PERMISSIONS
, PRINCIPAL
, TOPIC BLOB
)