IBM Mainframe Forum

What is meant by resp as 16 and resp2 as 9 when is called for SET TDQUEUE.

What did the EXEC CICS command look like? It appears that you are confusing two different things. OPENSTATUS(cvda-variable) will set cvda-variable to a CVDA value that can then be tested in your code (COBOL would have IF CVDA-VARIABLE = DFHVALUE(OPEN) as an example). Having OPENSTATUS(19) means that the resource you are inquiring against is closed -- but the RESP and RESP2 values are not used to make that determination; only the cvda-variable matters in such a case.

If you are coding EXEC CICS SET TDQUEUE OPENSTATUS(19) then you are telling CICS that you want the TDQUEUE closed -- to find out if it is open or closed, you would use EXEC CICS INQUIRE TDQUEUE OPENSTATUS(cvda-variable). You need to post more about what you are trying to do to get better help -- code (tagged with the CODE button) is usually the best way to start.

Hi Robert I do want to close the TDQUEUE, here is the code:



The retcode1 and retcode2 are 16 & 9 respectively.

This all is done after submitting a JCL via TDQ (row by row).

The CICS manuals such as https://www.ibm.com/support/knowledgece ... queue.html will tell you that RESP 16 is INVREQ and the RESP2 of 9 means

9
OPENSTATUS was specified for an intrapartition queue.

and if you're writing your JCL to an intrapartition TDQ, then you are NOT submitting it to the internal reader (which is an extrapartition TDQ).