To invoke EDCHEK as an edit macro:
EDIT ---- CAI.CHQA.JCLCHECK.TESTJCL(JTEST11) - 01.15 ------ COLUMNS 001 072 COMMAND ===> %EJCK SCROLL ===> PAGE 000001 //JTEST111 JOB '40100000',JTEST111,CLASS=K,MSGCLASS=X, 000002 // RESTART=(JS020.PS010) 000003 //* 000004 //* THIS TESTJOB TESTS THE VALIDITY OF VARIOUS REFERBACKS IN JCL 000005 //* 000006 //TESTPROC PROC 000007 //PS010 EXEC PGM=IEFBR14 000008 //DD011 DD DISP=SHR, 000009 // DSN=CAI.CHQA.TESTJCL, 000010 // UNIT=SYSDA, 000011 // VOL=SER=APCM04 000012 //DD012 DD DUMMY 000013 //TESTPROC PEND 000014 //OUT1 OUTPUT CLASS=X
The following is a sample of the top of a screen containing EDCHEK output.
EDIT ---- CAI.CHQA.JCLCHECK.TESTJCL(JTEST11) - 01.15 ------ COLUMNS 001 072 COMMAND ===> SCROLL ===> PAGE ==MSG> CAY6000 9 STATEMENTS FLAGGED IN JOB "JTEST111" MAXIMUM SEVERITY WAS 8 ==MSG> ==MSG> ==MSG> 000001 //JTEST111 JOB '40100000',JTEST111,CLASS=K,MSGCLASS=X, 000002 // RESTART=(JS020.PS010) 000003 //* 000004 //* THIS TESTJOB TESTS THE VALIDITY OF VARIOUS REFERBACKS IN JCL
The following shows samples of EDCHEK messages further down in the JCL.
000087 // VOL=REF=*.DD041 ==MSG> // VOL=REF=*.DD041 ==MSG> CAY6051E STATEMENT REFERENCED BY BACK REFERENCE "*.DD041" CANNOT BE ==MSG> FOUND. (USED IN "REF" PARAMETER OF "VOL") ==MSG> 000088 //JS060 EXEC PGM=IEFBR14, ==MSG> //JS060 EXEC PGM=IEFBR14, 000089 // COND=(0,LT,JS070) ==MSG> // COND=(0,LT,JS070) ==MSG> CAY6051E STATEMENT REFERENCED BY BACK REFERENCE "JS070" CANNOT BE ==MSG> FOUND. (USED IN "STEP" PARAMETER OF "COND#1") ==MSG> CAY6145I CONDITION CODE PROCESSING TERMINATED DUE TO ERRORS ==MSG> 000090 //*
|
Copyright © 2013 CA.
All rights reserved.
|
|