1
Tips and Tricks / Re: delete z/OS ver.9.5 JCL with proc
« on: January 15, 2019, 03:40:05 AM »
Del-unload. jobb.
//BGXXXXX JOB (DCLP,B647),'DEL ODV95',COND=(0,LT),
// CLASS=A,REGION=500M,
// MSGCLASS=X,
// MSGLEVEL=(1,1),
// NOTIFY=BG0FKA
//S010 EXEC PROC=DELODV95,APG='BGV2X',
// L='12879-1708-0-7FAA-20140509000000-20140509000000-12880'
----
del proc i proc. bibliotek . DELODV95
//DELODV95 PROC SIZE=500M,
// H=ARCHIVE
//*-------------------------------------------
//ARSLDELT EXEC PGM=ARSADMIN,REGION=&SIZE,
// PARM=('/unload -h&H -Q -g&APG -L&L')
//STEPLIB DD DISP=SHR,DSN=CMOP.PROD.ARSLOAD
// DD DISP=SHR,DSN=DB0P.PROD.SDSNEXIT
// DD DISP=SHR,DSN=DB0P.PROD.SDSNLOAD
//CEEDUMP DD SYSOUT=*
//ARSBIN DD PATH='/usr/lpp/ars/V9R5M0/bin'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//STDERR DD SYSOUT=*
//BGXXXXX JOB (DCLP,B647),'DEL ODV95',COND=(0,LT),
// CLASS=A,REGION=500M,
// MSGCLASS=X,
// MSGLEVEL=(1,1),
// NOTIFY=BG0FKA
//S010 EXEC PROC=DELODV95,APG='BGV2X',
// L='12879-1708-0-7FAA-20140509000000-20140509000000-12880'
----
del proc i proc. bibliotek . DELODV95
//DELODV95 PROC SIZE=500M,
// H=ARCHIVE
//*-------------------------------------------
//ARSLDELT EXEC PGM=ARSADMIN,REGION=&SIZE,
// PARM=('/unload -h&H -Q -g&APG -L&L')
//STEPLIB DD DISP=SHR,DSN=CMOP.PROD.ARSLOAD
// DD DISP=SHR,DSN=DB0P.PROD.SDSNEXIT
// DD DISP=SHR,DSN=DB0P.PROD.SDSNLOAD
//CEEDUMP DD SYSOUT=*
//ARSBIN DD PATH='/usr/lpp/ars/V9R5M0/bin'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//STDERR DD SYSOUT=*