Messages

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=*