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 / arjun

Actually BLKSIZE is coded as 0 .I think BLKSIZE should
always be coded in multiples of LRECL.i.e; LRECL=133 then
BLKSIZE=1330 should be coded.

Is This Answer Correct ?    0 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

List in order the hierarchical levels of jcl?

670


How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length ----TRY

860


How can a jobs execution priority be modified?

797


What is the function of a dd statement?

709


define cond parameter in jcl?

776






What are the parameter we cannot use in procedure?

640


How can an in-stream dataset be terminated?

848


Explain about ISPF/TSO Commands

1313


In job processing, what happens in execution stage?

698


What is NOTCAT ?

740


Name the statement which can be used to send data to another mvs jes3 node?

604


Explain the job statement in jcl?

653


what sort card you will use to copy the data from one dataset to another dataset?

730


which utility is used a dummy utility?

792


write a jcl to execute a job by 7:00 am on jan 20,1986?

699