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


Please Help Members By Posting Answers For Below Questions

Can an individual step be restricted from using all the jobs allowed cpu time?

1004


How to override loadlib?

1415


Explain the function of the steplib dd statement?

635


what is the JCL statement consists of?

693


What are steplib and joblib?

716






Suppose I have a program in cobol name ”careerride” and want to execute the program by jcl. Specify the process?

667


a set statement is used to define commonly used symbolic across job steps or procedures. It initializes the previous values in the symbolic names. It has to be defined before the first use of the symbolic names in the jcl. State whether true or false?

608


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?

1612


How does jcl act on a cobol code?

653


A chkpt is the parameter coded for multi-volume qsam datasets in a dd statement. When a chkpt is coded as chkpt=eov, a checkpoint is written to the dataset specified in the sysckeov statement at the end of each volume of the input/output multi-volume dataset. State whether true or false?

730


What is jcl in mainframe, and how many types of jcl statements are there for a job?

627


How to pass data to a program that is coded in an exec statement?

815


Explain how can values be passed from the job stream to an executable program?

609


What is the maximum length of a single line of jcl?

823


when can a job time-out occur? How to overcome that?

748