IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Abend Code 4094 + CICS


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
esshilpa

New User


Joined: 05 Aug 2006
Posts: 2
Location: bangalore

PostPosted: Sat Jun 28, 2008 12:00 pm
Reply with quote

I have CICS program which has TSQ functionality coded.i.e writing the TSQ in 00 screen and reading the same in 01 screen. But its abending with abend code 4094 after the sending screen and when it goes to
EXEC CICS RETURN
TRANSID (GRCA-PREV-TRANS-ID)
COMMAREA (DFHCOMMAREA)
END-EXEC.


CAUSE: LE/370 TERMINATION FAILED ABEND CODE: 4094

APPLID: HICSHSB4 USERID: S05290 TERM: sbej NETNAME: SPA31346 TRAN: GRMA

INTERRUPT OFFSET: ...... ADDRESS: 80033156 PSW: 079D0000 00000000 00000000

RESUME OFFSET: ...... ADDRESS: 80033156 LAST CICS COMMAND:



INSTRUCTION: 05EF BALR 14,15

REGISTERS:



0-3 00000000_00011000 00000000_26E000D0 00000000_00000018 00000000_26E000E0



4-7 00000000_80000001 00000000_26E06738 00000000_26E02CC8 00000000_26E06738



8-B 00000000_00000FFD 00000000_26E00018 00000000_00000001 00000000_00032F38



C-F 00000000_26E00160 00000000_26E00050 00000000_80033158 00000010_00000000

I am not able to find out what else could be the problem
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Sat Jun 28, 2008 12:29 pm
Reply with quote

search in the manual for the meaning of LE abend 4094,
the abend reason code should hint You on what is going on
without the reason code little can be said
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Sat Jun 28, 2008 8:45 pm
Reply with quote

LE abends normally indicate a storage problem,

Maybe your DFHCOMMAREA is too large.


Could be you whole program logic has problems,
limited information provided = liminited answers

Why not use a debugger' - EVEN IBM SUPPLIED IBM CEDF will
help.

DOES NO ONE GO TO THEIR CICS SYSTEMS PROGRAMMER ANYMORE
FOR HELP ?
Back to top
View user's profile Send private message
esshilpa

New User


Joined: 05 Aug 2006
Posts: 2
Location: bangalore

PostPosted: Thu Jul 03, 2008 12:43 pm
Reply with quote

I have found out that LE abend 4094 is the cics storage viloation.
But still I am unable to find out what the reason could be. Can somebody who has come across the same abend or knows more shed some more light for my analysis?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Thu Jul 03, 2008 5:03 pm
Reply with quote

Normally when you do a RETURN TRANSID your COMMAREA field is a WORKING-STORAGE structure. Your code specifies DFHCOMMAREA, which is probably in LINKAGE SECTION. Most likely when your transaction returns, CICS releases the storage associated with the current transaction which means DFHCOMMAREA is no longer part of your storage. That would cause a storage violation when you tried to use storage you don't have any more, as when the new transaction kicks off.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Jul 03, 2008 8:29 pm
Reply with quote

Esshilpa,

Robert may be on to something with his response about
pointing to dfhcommarea on your CICS return statement.

Suggest you change CICS return statment to a working
storage field and let us know if you still have the problem.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Calling an Open C library function in... CICS 1
Search our Forums:

Back to Top