//PUNCH003 JOB (XXX),'OPCA',MSGCLASS=X,COND=(0,NE),
//         REGION=4M,
// NOTIFY=&SYSUID
/*JOBPARM S=ANY
//* ---------------------------ANPASSEN---------------------------------
// SET DSOU=OPCA.INST.PROD.FETCHLIB
// SET SPAC=(CYL,(1,5,15))
// SET DSIN=&SYSUID..PS.&DSOU
//* --------------------------------------------------------------------
//JS10    EXEC PGM=IEBUPDTE,REGION=4M,PARM=NEW
//SYSPRINT  DD SYSOUT=*
//SYSUT1    DD DUMMY
//SYSUT2    DD DSN=&DSOU.,
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920),
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,SPACE=&SPAC
//SYSIN     DD DISP=SHR,DSN=&DSIN