zOs/JCL/KDUNLOB
//A540769U JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG 00040003
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769U.UNLOAC'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE SREC DSN('TSS.SKA.&DB..&SN..P&PART..REC')
DATACLAS(ENN35) MGMTCLAS(COM#A032)
SPACE TRK MAXPRIME 600
TEMPLATE PUNCH DSN('TSS.SKA.&DB..&SN..P&PART..PUN')
DATACLAS(NULL8) MGMTCLAS(COM#A032)
SPACE(1,10) TRK
UNLOAD FROM TABLE OA1P.TKD305A1
( ID
, RULESET_ID
, ARCHIVE BLOB
)
PUNCHDDN PUNCH UNLDDN SREC SPANNED YES
SHRLEVEL CHANGE ISOLATION UR
UNLOAD FROM TABLE OA1P.TKD315A1
( ID
, RULESET_ID
, ARCHIVE BLOB
)
PUNCHDDN PUNCH UNLDDN SREC SPANNED YES
SHRLEVEL CHANGE ISOLATION UR
UNLOAD FROM TABLE OA1P.TKD337A1
( ID
, COMMAND_TYPE
, SENDER_ID
, CLIENT_ID
, TARGET
, PAYLOAD CLOB
)
PUNCHDDN PUNCH UNLDDN SREC SPANNED YES
SHRLEVEL CHANGE ISOLATION UR