search cancel

VIEW Problem running SARBCH program - IEC141I 013-20

book

Article ID: 202374

calendar_today

Updated On:

Products

Deliver View

Issue/Introduction

when I run the following jcl I'm getting an error message  that looks to be related to a DCB problem, could you please help me to determine the cause of the error and what is the solution? 

Error:

IEC141I 013-20,IGG0191A,P4838126,STEP2,REPORT,751B,TSU111,
P48381.CAVIEW.DL12.SAR1.SARUSERS                          

Thanks

//STEP2    EXEC PGM=SARBCH                                                                                              
//SYSPRINT DD  SYSOUT=* 
//REPORT   DD  DISP=(,CATLG,DELETE),DSN=##HLQ.SARUSERS,
//             DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1320),
//             UNIT=SYSDA,SPACE=(TRK,(15,15),RLSE)                               
//SYSIN DD *                                                                    
/DBASE NAME=sardb.dataset.name                                                     
/LIST USER=*                                                                    
/*    

Environment

Release : 14.0

Component : CA View

Resolution

Error IEC141I 013-20
20 An OPEN macro instruction was issued for a sequential data set using queued access. BLKSIZE is not a multiple of LRECL, or LRECL is 0 with RECFM=FB or RECFM=FBS, or BLKSIZE is not at least four bytes greater than LRECL with RECFM=V.

Please review Report DD and make sure blksize is a multiple of 133.....

REPORT DD
Defines an output data set (normally SYSOUT) into which SYSOUT listing from the LIST function is written.
This statement can be omitted if no LIST control statements are input to the program. If you are not defining a SYSOUT data set, you must code DCB=BLKSIZE=nnn, where nnn is a multiple of 133.