IBM Mainframe Forum

Below are some of the Changes I have made on my cobol program, but I am now getting a " ABENDED S000 U4038 " on my Run JCL.


This is the error I am getting in my SDSF SYSOUT

********************************* TOP OF DATA **********************************
IGZ0201W A file attribute mismatch was detected. File IN-FILE in program C1202230 had a record length of 84 and the file specified in the ASSIGN clause had a record length of 80.
IGZ0035S There was an unsuccessful OPEN or CLOSE of file ICREDIT in program C1202230 at relative location X'0AF4'. Neither FILE STATUS nor an ERROR declarative were specified. The status code was 39. From compile unit C1202230 at entry point C1202230 at compile unit offset +00000AF4 at entry offset +00000AF4 at address 1A200AF4
******************************** BOTTOM OF DATA ********************************

do not post screenshots, they just clutter the posted message and do not help
a plain text cut and paste with the code tags would have been more than enough
( the colors and the fonts used make the image quite unreadable )

1. NONE of the data you posted has any relevance to the error you got -- so why did you post useless junk?

2. This error message tells you EVERYTHING you need to know to (a) understand the problem, and (b) fix the problem:Since you posted nothing about IN-FILE, there's not much we can do to help you -- there are a number of possibilities:
- you computed the record length of IN-FILE wrong
- your JCL has the wrong record length
- you could have mixed up variable length and fixed length record information
- etc
- etc
- etc

You see how you added REPORT-SPEND-TO-DATE? You see how it's four bytes long? You see how the error message says one thing is 80 bytes while the other is 84?

My guess here is that you added a field to the report line, increasing its length by four bytes. If so, you need to accommodate that field when you write out the file. So in your JCL, you need to increase the lrecl to match the new record length.