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

Test Handle Condition


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

New User


Joined: 05 Nov 2014
Posts: 95
Location: India

PostPosted: Thu Feb 12, 2015 11:59 am
Reply with quote

Hi
I have a peculiar problem here. I have some programs which have EXEC CICS HANDLE CONDITIONS and also EXEC CICS HANDLE ABEND (which was commented earlier). EXEC CICS HANDLE CONDITION handles almost all of the invalid conditions. e.g.

EXEC CICS HANDLE CONDITION
IOERR(IOERROR)
ENDFILE(ENDFILE)
NOTAUTH(FILENOTA)
NOTOPEN(FILENOTO)
DISABLED(FILENOTA)
DUPREC(DUPLICT)
NOTFND(NOTFOUND)
ERROR(IOERROR)

The modules might have abended (not sure because of what) on our client side, we do not have a record of the logs. And then EXEC CICS HANDLE ABEND Was uncommented to tackle the abends, ie now we have following before EXEC CICS HANDLE CONDITION

EXEC CICS HANDLE ABEND
LABEL(ABENDERR)

I was just testing the changes. I am unable to think of any other condition apart from the ones listed above (in HANDLE CONDITION) to test the HANDLE ABEND. I tried disabling some of the calling programs through CEMT I PROG, but that does not solve the purpose. Don't have access to the PPT etc so that I can manipulate them.

Please tell me any other creatable condition apart from the following ones for which I can see if EXEC CICS ABEND takes care of that , which It did not earlier.

IOERR
ENDFILE
NOTAUTH
NOTOPEN
DISABLED
DUPREC
NOTFND
ERROR

Thanks a lot.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel

PostPosted: Thu Feb 12, 2015 4:04 pm
Reply with quote

not very clear what you need is...

What are you trying to achieve ?
Back to top
View user's profile Send private message
amitc23

New User


Joined: 05 Nov 2014
Posts: 95
Location: India

PostPosted: Thu Feb 12, 2015 4:28 pm
Reply with quote

Hi Marso
Thanks for looking into this.

I am just trying to simulate any other condition other than ones listed above so that my code traps it through HANDLE ABEND rather than HANDLE CONDITION.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Thu Feb 12, 2015 7:58 pm
Reply with quote

It's been a while since I've dealt with CICS programs, but you might consider using the RESP option of each CICS command rather than the HANDLE CONDITION command which is in effect for ALL CICS commands, not just the one you're executing at the time. The RESP option is preferred to the HANDLE CONDITION by many shops.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Feb 12, 2015 8:12 pm
Reply with quote

The Handle ABEND has nothing to do with the handle CONDITION unless each of the handle condition routines is and CICS ABEND command, in which case it will then go to the LABEL(ABENDERR)
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: Thu Feb 12, 2015 8:31 pm
Reply with quote

IMHO, I tend to avoid HANDLE ABEND LABEL(label-name) and let the transaction abend on it's own, preserving all in question.

Just my 2 cents....
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Feb 12, 2015 8:33 pm
Reply with quote

I Agree Bill, and Terry stated the correct method to be using.
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 Zunit Test case editor error Testing & Performance 4
No new posts How to give complex condition in JCL . CLIST & REXX 30
No new posts Copying GDG version(all/few) from pro... CLIST & REXX 13
No new posts selectively copy based on condition DFSORT/ICETOOL 3
No new posts REXX Test under Mask??? CLIST & REXX 3
Search our Forums:

Back to Top