Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Abend Code 4094 + CICS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
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    Post subject: Abend Code 4094 + CICS
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

Global Moderator


Joined: 14 Mar 2007
Posts: 10375
Location: italy

PostPosted: Sat Jun 28, 2008 12:29 pm    Post subject: Reply to: Aben Code 4094 + CICS
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    Post subject:
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    Post subject: need more info on LE 4094 abend
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: 8201
Location: Dubuque, Iowa, USA

PostPosted: Thu Jul 03, 2008 5:03 pm    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IBEGENER RETURN CODE 12 anilkumar922 All Other Mainframe Topics 5 Wed Dec 13, 2017 11:41 am
No new posts Finding the plan when code compiled u... Ahemad DB2 1 Fri Dec 01, 2017 6:38 pm
No new posts Is CICS BMS logic on z/OS different ... Andi1982 CICS 2 Fri Dec 01, 2017 1:56 pm
No new posts Strange Code amitc23 COBOL Programming 6 Tue Nov 28, 2017 11:25 am
No new posts How to get complete URL from CICS Con... mbattu CICS 1 Tue Nov 14, 2017 11:59 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us