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
 
Response code 16

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
Maddipatla Rajasekhar

New User


Joined: 10 Mar 2009
Posts: 16
Location: Hyderabad

PostPosted: Mon May 09, 2011 7:57 pm    Post subject: Response code 16
Reply with quote

Hello,

I have an issue as follows

I am passing the control from one program to another using LINK

In the LINKed (Called) program i have to send the map first to the user and after user enters the data i want to validate the data and then accordingly i want to get back to calling program

Here after sending the map i am using response code to bring the control back to beginning of the program for validation using return command

But here it is giving response code 16 (May be becasue i am using LINK to call this program)

Can anyone suggest, how should i acheive this, meaning LINK the program then send the map validate the user data in LINKed program and then pass the control back to Calling program



Note: I don't want to use XCTL for calling the program (Some other issues are there if i use XCTL)

Thanks in advance
Back to top
View user's profile Send private message

Bill O'Boyle

CICS Moderator


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

PostPosted: Mon May 09, 2011 8:23 pm    Post subject: Reply to: Response code 16
Reply with quote

An EIBRESP of 16 in an INVREQ. What is the value in EIBRESP2 as well as EIBRCODE?

In order for the user to enter screen data, you must terminate the task and return with a TRANSID, COMMAREA and COMMAREA-LENGTH.

This MUST be done by the root program, which is defined to the TRANSID in the PCT entry or optionally, a program which the root program transfers control and it issues the above return.

In any case, all of this must be issued at CICS Logical Level ZERO. You're attempting to issue this from Logical Level 1 or greater, which is invalid (INVREQ).

You CANNOT issue an above RETURN with a TRANSID (or anything else for that matter) from a sub-ordinate, non level zero, program.

That's just how it works....

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

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Mon May 09, 2011 9:14 pm    Post subject:
Reply with quote

Prog A links to Prog B.
prog B sends map, sets some kind of indicator in dfhcommarea so:
when user enters data and sends map from the terminal, which will invoke prog A,
prog a will know to link to prog B - so prog B can receive map and process.

CICS will always invoke Prog A. prog A must know (from flag in dfhcomm ?)
that it needs to link to B so B can process the map.

Besides the RETURN isssued by PROG B will return it to PGM A.

you need to learn how cics functions.

As Bill said, the pct controls everything.
and I think the only issues involved with XCTL vs LINK is your lack of knowledge.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue May 10, 2011 12:33 pm    Post subject: Reply to: Response code 16
Reply with quote

I echo Dick. XCTL has been around from before you were born (probably). Millions upon millions are performed daily. If there was a genuine "issue" someone else would have noticed as well.

That is the way CICS works, and it is for a reason. I have used a different terminal monitor, even. Works the same way, as far as returning/not returning to where it left or back up at the top and with a block of information which wings about with it which tells you what you need to know.
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
This topic is locked: you cannot edit posts or make replies. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am
No new posts I want to retire TRX and use only Rex... Abhinav Sharma CLIST & REXX 6 Sat Jul 29, 2017 2:53 am
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm

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