One dataset is creating in the step1 with LRECL of 133 and
the same dataset is used in the next step in DISP=SHR mode,
but while scanning the JCL the following error is thrwon.
Please verify the below JCL
$/SEPP030.PROVIDER DD
DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868
//ERRORRPT DD
DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE,
--ERRORRPT DD
DSN=F5910PG.F5910EPP.ERRORRPT.P,
//
DISP=&DISNCD,UNIT=&DELQ,
-- DISP=
(NEW,CATLG,DELETE),UNIT=DELQ,
// SPACE=(TRK,
(30,15),RLSE),
//
DCB=&DCB2
-- DCB=
(PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB)
$/SEPP030.ERRORRPT DD
DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT
//SEPP040 EXEC PGM=FILEAID,COND=
(0002,EQ,SEPP030)
//SYSPRINT DD
SYSOUT=*
//SYSLIST DD
SYSOUT=*
//DD01 DD DSN=SYSCMN.PROD.CCLIB
(F5910EP1),DISP=SHR
$/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB
(F5910EP1)
E1 - DSS20791E - DATA
SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN
LRECL OF 133 COULD NOT BE OPENED BECAUSE
THE CODED
LRECL WAS
80.
// DD
DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE,
-- DD
DSN=F5910PG.F5910EPP.ERRORRPT.P,
//
DISP=SHR
$/ DD
DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT
please find the error code in the above mentioned lines and
please suggest me about the error and the solution for that.
Answer Posted / muttiah
If you tailor JCL with changes, it will look like this.
$/SEPP030.PROVIDER DD
DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868
//ERRORRPT DD
DSN=F5910PG.F5910EPP.ERRORRPT.P,
// DISP=(NEW,CATLG,DELETE),UNIT=DELQ,
// SPACE=(TRK,(30,15),RLSE),
// DCB=(PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB)
$/SEPP030.ERRORRPT DD
DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT
//SEPP040 EXEC PGM=FILEAID,COND=
(0002,EQ,SEPP030)
//SYSPRINT DD
SYSOUT=*
//SYSLIST DD
SYSOUT=*
//DD01 DD DSN=SYSCMN.PROD.CCLIB
(F5910EP1),DISP=SHR
$/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB
(F5910EP1)
E1 - DSS20791E - DATA
SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN
LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL
WAS 80.
// DD
DSN=F5910PG.F5910EPP.ERRORRPT.P,DISP=SHR
$/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT
Here the line starting with $/ is an override line.
But my questin here is $/ line has SEPP030.XXXXXX which
indicates there is a proc override but i'm not able to see
any proc in the JCL only pgm is there.We can use this stmt
only when we are using procedure's but not programs
file Z1225BT.F5910EPP.ERRORRPT.AOUTPUT details like where
it is created is not provided may be there they might have
given as 133..
If you see the last 2 lines the files are concatenated
F5910PG.F5910EPP.ERRORRPT.P 1225BT.F5910EPP.ERRORRPT.AOUTPUT
when you are contatenating the files should be of same LRECL
I guess there we are getting this error.
If you can provide the exact JCL/Details i can help you out.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
What is the function of the dd mgmtclas keyword in sms datasets?
what is the JCL statement consists of?
How can a stopped job be started again?
Explain how can values be passed from the job stream to an executable program?
if we want to use a gdg which is already created by some job, then how to use the reference of the last generation in a jcl?
how do you create a dataset in a jcl with the same file organisation as that of another existing dataset?
Explain how can an in-stream dataset be terminated?
What is the use of symbol // in jcl?
1) SORT FIELDS=(20,4,CH,D,10,3,CH,D) OUTREC FIELDS=(7:20,4,C' FUTURE ',20,2,10,3,1Z,1,9,13,7, 24,57,TRAN=LTOU,6X'FF') This example illustrates how a fixed-length input data set can be sorted and reformatted for output. The SORTIN LRECL is 80 bytes. The reformatted output records are fixed length with a record size of 103 bytes. SOLRF (the IBM-supplied default) is in effect, so unless the SORTOUT LRECL is specified or available, it will automatically be set to the reformatted record length of 103. in the above example i have some doubts that a) sort fields=(20,4,CH,D,10,3,CH,D) -what exactly it does and this fields related to output record fields or input record fields b)outrec used to refprmat the records after sorting that means could please reply me as soon as possible Thanks. Venkat
what EXEC statement is and what is the syntax of EXEC statement used in JCL?
How jcl is used for testing batch programs?
List the various advantages of using jcl language?
How jcl work to handle various input output file operations?
Can we call instream to catalog and catalog to instream?
Is automatic restart possible in jcl?