Mainframe ABEND Code U4038



Get solution for your ABEND Codes & System Error Messages, SQL Codes, File Status etc...

Mainframe ABEND Code U4038

Postby vitorsadak » Wed Jun 05, 2013 8:59 pm

GOOD DAY,

HELLO,

'M GOING THROUGH AN ERROR IN THE PROGRAM AS MAINFRAME COBOL SEGUIENTES.

when I run my job, I have this abend in SYSTSPRT

READY
DSN SYSTEM(DB2D)
DSN :
RUN PROGRAM(ES0111T) PLAN(SIASBAT) LIB('DES.V01.LOAD')
IKJ56641I DSN ENDED DUE TO ERROR+
IKJ56641I USER ABEND CODE 4038 REASON CODE 00000001

SYSOUT and I got this message:

IGZ0201W- A file attribute mismatch was detected. File ARQENTRA in program ES0111
file specified in the ASSIGN clause had a record length of 150.
IGZ0035S- There was an unsuccessful OPEN or CLOSE of file RETORNO in program ES01
Neither FILE STATUS nor an ERROR declarative were specified. The status
From compile unit ES0111T at entry point ES0111T at compile unit offset
at address 0006E174.


WHAT CAN THIS GOING, SOMEONE HELP ME PLEASE.
vitorsadak
 
Posts: 6
Joined: Wed Jun 05, 2013 8:48 pm
Has thanked: 1 time
Been thanked: 0 time

Re: ABEND CODE 4038

Postby c62ap90 » Wed Jun 05, 2013 9:19 pm

Look at your program file DD-ARQENTRA and be sure it is setup for 150. Also be sure your file in your JCL is length 150.
I'm guessing your program has length of 150 but your input file is not length of 150.

 FD  file-name                             
     RECORDING MODE IS F                   
     LABEL RECORDS ARE STANDARD             
     RECORD CONTAINS  150 CHARACTERS       
     BLOCK CONTAINS 0 RECORDS.             
                                           
 01 file-name-rec     PIC X(150).

These users thanked the author c62ap90 for the post:
vitorsadak (Wed Jun 05, 2013 10:33 pm)
c62ap90
 
Posts: 125
Joined: Thu Oct 11, 2012 10:24 pm
Has thanked: 1 time
Been thanked: 7 times

Re: ABEND CODE 4038

Postby Robert Sample » Wed Jun 05, 2013 9:25 pm

You have two problems. The warning on DD name ARQENTRA indicates you have a record length mismatch of some sort.

You also got a file status 35 on DD name RETORNO indicates that you do not have this DD name in your JCL (or allocated to your TSO session). It could be present but mis-spelled, or not present at all.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: ABEND CODE 4038

Postby vitorsadak » Wed Jun 05, 2013 10:30 pm

Robert Sample wrote:You have two problems. The warning on DD name ARQENTRA indicates you have a record length mismatch of some sort.

You also got a file status 35 on DD name RETORNO indicates that you do not have this DD name in your JCL (or allocated to your TSO session). It could be present but mis-spelled, or not present at all.




THANK YOU FOR RESPONSE, WHEN REALLY CHANGED THE JOB WENT NORMALLY.
vitorsadak
 
Posts: 6
Joined: Wed Jun 05, 2013 8:48 pm
Has thanked: 1 time
Been thanked: 0 time

Re: ABEND CODE 4038

Postby Akatsukami » Wed Jun 05, 2013 11:24 pm

Robert Sample wrote:You have two problems. The warning on DD name ARQENTRA indicates you have a record length mismatch of some sort.

You also got a file status 35 on DD name RETORNO indicates that you do not have this DD name in your JCL (or allocated to your TSO session). It could be present but mis-spelled, or not present at all.

A third problem is that the OP should have been made in the "ABENDS and SQL Codes" forum :P
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: ABEND CODE 4038

Postby NicC » Thu Jun 06, 2013 1:37 am

Fourth problem - too much shouting (caps and bold).
Fifth - we had a similar problem the other day - OP did not read the forum rules and search before posting.
Moving.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times


Return to ABENDS & SQL Codes

 


  • Related topics
    Replies
    Views
    Last post