Sample JCL to be validated:
//MYJOB JOB (12345),'TEST',CLASS=X
//STEP01 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
TEST CONTROL STATEMENT 1
TEST CONTROL STATEMENT 2
TEST CONTROL STATEMENT 3
/*
After validation:
//MYJOB JOB (12345),'TEST',CLASS=X
//STEP01 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
/*
(3 CARDS IN INPUT STREAM DATA SET)
In the CAZ1REXX RAW_DATA_PROCESSING routine, after the input stream is processed, variable $CA.RECORD.n will contain this statement: (3 CARDS IN INPUT STREAM DATA SET).
How to bypass this statement in the RAW_DATA_PROCESSING routine?
Release: 12.0
Component: JCLCheck Workload Automation
Sample codes:
RAW_DATA_PROCESSING:
Do n = 1 to $ca.rcount
Say 'Data: ' $CA.RECORD.n
if substr($CA.RECORD.n,1,1) = '(' then do
if pos('IN INPUT STREAM DATA SET)',$CA.RECORD.n,2) /= 0 then do
Say 'Skipped Data: ' $CA.RECORD.n
iterate n
end
end
SAY 'Processed Data: ' $CA.RECORD.n
End