PDS 92 sign for CBL source

Document ID : KB000015488
Last Modified Date : 14/02/2018
Show Technical Document Details
Introduction:

When upgrading to 8.7 there is a program error with the generation from YCBLUFNK1I

Question:

upgrading to 8.7 there is a program error with YCBLUFNK1I

 

PLI3602 Information 00 17-08-10 09:55:24,979370 QPESERR QSYS 0154 YCBLUFNK1I Z2SYCBL 04DC 

Message . . . . : RECORD raised at 981 in YCBLUFNK1I. ONCODE 22. 

Cause . . . . . : A READ statement specified an INTO variable that is larger 

than the record length for file QCBLSRC in library CAGEN

What is causing this?

 

 

Environment:
IBM Iseries
Answer:

QLBLSRC and QCBLLESRC should have a record length of 102 

All the other source files should have a length of 92 apart from 

QRPGLESRC, which should be 112.