Posts related to JCL
Here’s a simple way of deleting all members of a partitioned dataset via a batch job: //DELETE EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DELETE USER1.PDS.EXAMPLE(*) In the above example all the members (represented by the *) of the dataset USER1.PDS.EXAMPLE will be deleted.
S001 An I/O error ocurred. Check reason code for exact cause. Examples are trying to read beyond End of File, trying to write to an input file or a file length error. S002 Invalid I/O record, eg attempting to write a record that is longer than the maximum record length. […]
JOB – Identifies the beginning of a job. The JOB statement informs the operating system of the start of a job, gives the necessary accounting information, and supplies run parameters. Each job must begin with a single JOB statement EXEC – Indicates what work is to be done. EXEC (execute) statement […]
The following JCL creates a history data set from log data recorded on the Logrec log stream //LOGRECHS JOB,MSGLEVEL=(1,1),MSGCLASS=X,NOTIFY=&SYSUID //EREPDALY EXEC PGM=IFCEREP1,PARM=(‘HIST,ACC=Y,SYSUM’) //ACCIN DD DSN=SYS1.SYSPLEX.LOGREC, // SUBSYS=(LOGR,IFBSEXIT,,’DEVICESTATS,LASTRUN’), // DCB=(RECFM=VB,BLKSIZE=4000) //ACCDEV DD DSN=MVS.LOGREC.LGSTREAM.HISTORY, // DISP=(NEW,CATLG), // DCB=(RECFM=VB,BLKSIZE=4000), // UNIT=SYSDA,SPACE=(CYL,(25,5)) //SERLOG DD DUMMY //DIRECTWK DD UNIT=SYSDA,SPACE=(CYL,15,,CONTIG) //TOURIST DD SYSOUT=A,DCB=BLKSIZE=133 //EREPPT DD SYSOUT=A,DCB=BLKSIZE=133 […]
Next are a few examples of Jobs to list information from the Logrec Data Set: 1. Detail Edit Report This job generates detail edits and summaries of all software and operational records: //EREPRPT1 JOB,MSGLEVEL=(1,1),MSGCLASS=X,NOTIFY=&SYSUID //REPORT1 EXEC PGM=IFCEREP1,PARM=’CARD’ //ACCIN DD DSN=MVS.LOGREC.HISTORY,DISP=SHR //DIRECTWK DD UNIT=SYSDA, // SPACE=(CYL,5,,CONTIG) //EREPPT DD SYSOUT=A,DCB=BLKSIZE=133 //TOURIST DD […]
Copyright © 2024 Rui Miguel Feio