If you activate the EDCHKLB option, you receive generated ISPF labels on all JCL statements in error. The label format is a period (.) followed by five alphabetic characters. The following example shows the output with the labeling of errors; the lines in error are marked by labels ".AABJA" and ".AADCA", on the left side.
EDIT USERID1.JCK.CNTL(EJCKERRS) - 01.00 Columns 00001 00072 Command ===> Scroll ===> CSR ****** ***************************** Top of Data ****************************** ==MSG> CAY6000 2 STATEMENTS FLAGGED IN JOB "USERID1L" MAXIMUM SEVERITY WAS 8 ==MSG> ==MSG> 000100 //USERID1L JOB (113300000),'EJCK ERRORS',CLASS=K, 000200 // MSGCLASS=X 000300 //* .AABJA //IEBGENER EXEC PGM=IEBGENERX ==MSG> //IEBGENER EXEC PGM=IEBGENERX ==MSG> CAY6042E OPERAND "IEBGENERX" IS TOO LONG FOR "PGM" PARAMETER OF "EXEC" ==MSG> 000500 //SYSPRINT DD SYSOUT=* 000600 //SYSIN DD DUMMY 000700 //SYSUT2 DD SYSOUT=* .AADCA //SYSUT1 DD DSN=DATASET.DOES.NOT.EXIST,DISP=SHR ==MSG> //SYSUT1 DD DSN=DATASET.DOES.NOT.EXIST,DISP=SHR ==MSG> CAY6079E DATA SET "DATASET.DOES.NOT.EXIST" SPECIFIED AS OLD OR SHR, ==MSG> BUT CANNOT BE FOUND ==MSG> 000900 //*
You can locate the next line containing a label in an EDCHEK screen by entering the subcommand LOCATE LABEL on the ISPF command line.
You can continue to edit the file with the labels in place or clear them using the RESET LABEL command. The ISPF labels are not saved with the data set and do not need to be cleared before re-executing EDCHEK. EDCHEK executes the RESET command (for ==MSG> lines) and RESET LABEL command internally. Pre-existing labels are replaced if any line containing a label is in error.
Copyright © 2014 CA.
All rights reserved.
|
|