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

Program got failed with AETA abend


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

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 3:34 pm
Reply with quote

One of my program got failed with AETA abend. Really I donot know what the abend means and what would have gone wrong with my program.

Only if I know the meaning of the AETA abend, I can come up with a fix.

Please let me know
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Wed Apr 23, 2008 3:41 pm
Reply with quote

Quote:
Only if I know the meaning of the AETA abend, I can come up with a fix.


did You care to search the manuals, or google for "CICS +AETA"
Back to top
View user's profile Send private message
Ravimirage

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 3:59 pm
Reply with quote

I've taken lot of time trying to understand what the Abend means .I got the below information about the abend AETA

AETA
Explanation
A CICS transaction has issued a non-CICS command via an application "stub" (an expansion of a DFHRMCAL macro). Program DFHERM has determined that the exit has been disabled since the previous DFHRMCAL request was issued from the transaction.

System action
The task is abnormally terminated with a transaction dump

Module
DFHERM

But I could not understand even a single word in the description. My program got failed when trying to execute an IF statement . I'm wondering what this is to do with AETA abend.


Program IR05 failed with Abend Code AETA when executing the IF
in the following statement:

013392 IF FILE-STATUS-DB-NOT-AVAIL

Please help.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Wed Apr 23, 2008 4:14 pm
Reply with quote

the program name IR05 might be meaningful for you, but for us is irrelevant

at what stage of development/testing You get the error ...
is this the first test You are running ???
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Wed Apr 23, 2008 4:22 pm
Reply with quote

In the transaction dump, there should be a TRACE, which shows the CICS commands issued, which may be helpful.

Does anyone in your shop have knowledge of IPCS?

If neither of these suggestions suffice, then ship the transaction dump to IBM and they'll review it.

However, if it does work its way up to CICS Level2 support (in the States, they're located in Raleigh, North Carolina), then keep in mind that they may require a region dump.

Regards,

Bill
Back to top
View user's profile Send private message
Ravimirage

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 5:41 pm
Reply with quote

Hi Enrico/Bill,

Thanks for getting back to me. Actually the program is a well working one.
But suddenly it got failed with this AETA abend, this is the first time in 10 years that the program got failed with AETA abend.

Sorry I don't have the TRACE of the dump and nobody aware of IPCS.

Thanks.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Wed Apr 23, 2008 5:51 pm
Reply with quote

what has changed in the environment ...
Back to top
View user's profile Send private message
Ravimirage

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 6:12 pm
Reply with quote

Nothing was changed in the environment. It is the same envrionment for more than 10 years.


Regards,
Ravi.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Wed Apr 23, 2008 6:24 pm
Reply with quote

Do You keep getting the abend or You got it only once ?
Back to top
View user's profile Send private message
Ravimirage

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 6:29 pm
Reply with quote

I got the abend only once and then I resubmitted the program without changing anything and luckly it completed fine.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Wed Apr 23, 2008 6:33 pm
Reply with quote

then it means that one of Your external environments was not available

Quote:
A CICS transaction has issued a non-CICS command via an application "stub" (an expansion of a DFHRMCAL macro). Program DFHERM has determined that the exit has been disabled since the previous DFHRMCAL request was issued from the transaction.
Back to top
View user's profile Send private message
Ravimirage

New User


Joined: 19 Apr 2008
Posts: 6
Location: Chennai,India

PostPosted: Wed Apr 23, 2008 7:10 pm
Reply with quote

Thank you very much for your time.


Regards,
Ravi.
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 WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts Receiving RC 5 when executing REXX pr... CLIST & REXX 3
No new posts COBOL program logic for comparisipn o... COBOL Programming 2
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
No new posts Need to get an DLI abend like U0200 IMS DB/DC 2
Search our Forums:

Back to Top