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
 
Problem with RETURN

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
srvmani
Warnings : 1

New User


Joined: 30 Dec 2003
Posts: 19

PostPosted: Thu Mar 25, 2010 3:21 pm    Post subject: Problem with RETURN
Reply with quote

I am facing the problem with the following scenario.

1) Tran A started with the PROG A
2) PROG A xctled to PROG B
3) PROG B abended and xctled to PROG C(error information tracking)
4) at the completion of the program retruning with the tran id.

But at the completion of the PROG C i coded like to terminate the program c with the return tran id.

Once it is reached to the terminate para it is retruning the tran id and entering again for the second time.

I dont understand why it is re-entering again? even I terminated the program.

I coded like this in the PROG C

EXEC CICS RETURN
TRANSID(tran-id)
IMMEDIATE
END-EXEC.

Please help in this regard
Thanks
Subba
Back to top
View user's profile Send private message

Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN

PostPosted: Thu Mar 25, 2010 4:39 pm    Post subject:
Reply with quote

Hi Subba,

Please have a look into the manuals and try to understand the difference between CICS RETURN and CICS RETURN TRANSID ... Am sure you will understand where you went wrong...
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Mar 25, 2010 7:43 pm    Post subject:
Reply with quote

Quote:
3) PROG B abended and xctled to PROG C(error information tracking)
When PROG B abended, what facility/command did you use to 'xctl' to PROG C?
Back to top
View user's profile Send private message
Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN

PostPosted: Thu Mar 25, 2010 8:39 pm    Post subject:
Reply with quote

CICS Guy wrote:
Quote:
3) PROG B abended and xctled to PROG C(error information tracking)
When PROG B abended, what facility/command did you use to 'xctl' to PROG C?
I guessed that the owner meant the ABEND was HANDLEd... icon_wink.gif
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Mar 25, 2010 8:55 pm    Post subject:
Reply with quote

srvmani wrote:
1) Tran A started with the PROG A
2) PROG A xctled to PROG B
3) PROG B abended and xctled to PROG C(error information tracking)
4) at the completion of the program retruning with the tran id.
Returning with which tran id? Tran A that started with PROG A? Or the tran-id of the EC RETURN TRANSID(tran-id) command coded in PROG C?
Quote:
But at the completion of the PROG C i coded like to terminate the program c with the return tran id.
What program are you expecting to be started by this return tran id?
Quote:
Once it is reached to the terminate para it is retruning the tran id and entering again for the second time.
What program is being entered again? PROG A?
Binop B wrote:
I guessed that the owner meant the ABEND was HANDLEd... icon_wink.gif
Probably, but was it really a XCTL and not a LINK that transfered to PROG C?
Back to top
View user's profile Send private message
Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN

PostPosted: Thu Mar 25, 2010 9:16 pm    Post subject:
Reply with quote

Quote:
Probably, but was it really a XCTL and not a LINK that transfered to PROG C?
Here, in our system also, its the same kind of concept like if any functional error is found, a XCTL is done to the error routine. This was the basis for my assumption... icon_razz.gif
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 LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm
No new posts Return a Non Numeric value from REXX Learncoholic CLIST & REXX 3 Fri Sep 01, 2017 8:33 pm
No new posts Problem commiting to DB2 from IMS MPP Ole Soerensen IMS DB/DC 2 Wed Jul 26, 2017 5:19 pm
No new posts EXIT or RETURN cvnlynn CLIST & REXX 18 Wed Jul 19, 2017 2:50 am
No new posts QUESTION: RETURN CHANNEL pahiker CA Products 21 Thu Apr 20, 2017 12:31 am

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