Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Print CICS TSQ

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
bay hoe san

New User


Joined: 22 Sep 2010
Posts: 4
Location: IBM Singapore

PostPosted: Wed Sep 22, 2010 11:49 am    Post subject: Print CICS TSQ
Reply with quote

Hello,

May I know is there any utility or program that I can use to print the content of TSQ? I have substantial orphan TSQ in 1 of our CICS region and we are not able to find out which program is generating those orphanage TSQ.
Pls advise.
Thanks.

.Hoe San.
Back to top
View user's profile Send private message

Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1219
Location: Israel

PostPosted: Wed Sep 22, 2010 2:17 pm    Post subject: Reply to: Print CICS TSQ
Reply with quote

No need for utility. In CICS enter:
Code:
CECI INQ TSQN(yourtsqname)

You will get the transaction id that created the TS queue.

That should give you a good starting point.
Back to top
View user's profile Send private message
bay hoe san

New User


Joined: 22 Sep 2010
Posts: 4
Location: IBM Singapore

PostPosted: Wed Sep 22, 2010 3:13 pm    Post subject: Reply to: Print CICS TSQ
Reply with quote

Hello,

1. Thanks for your prompt response.
2. We need to know the content of the TSQ as application team is not able to pinpoint which program is creating those TSQ. Any CICS utility which we can run as a job or as a transaction?
Pls advise.
Thanks.

.Hoe San.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Wed Sep 22, 2010 3:33 pm    Post subject:
Reply with quote

Hoe San,

Their problem is not identifying which programs wrote the queue item,
it is identifying those programs that do not delete the items.
When clearscreen or simply transid switch is being made,
the program receiving control,
due to the return id issued by the last session's RETURN,
is simply not interrogating whether queue items need to be deleted.


Doesn't anyone at IBM Singapore know anything about CICS?
Back to top
View user's profile Send private message
bay hoe san

New User


Joined: 22 Sep 2010
Posts: 4
Location: IBM Singapore

PostPosted: Thu Sep 23, 2010 5:56 am    Post subject:
Reply with quote

Hello,

1. Thanks for your response. Yes, u r right that we need to identify those programs that created the 'orphan' TSQ. We have tried various means and unable to pinpoint which programs.
2. Do u know of any utility that can print and delete TSQ?
Appreciate for an advice. Thanks.

.Hoe San.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Sep 23, 2010 6:54 am    Post subject:
Reply with quote

Quote:
. Do u know of any utility that can print and delete TSQ?


Don't know of any, but I could certainly write one for you in less
than a day. (but it'll cost you icon_cool.gif )
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Thu Sep 23, 2010 11:05 am    Post subject:
Reply with quote

how many programs do you have writing tsq? simple search would find that.
and as I said before, and you ignored,
it is not the writes, it is the lack of deletes.

which programs recieve control from a clear screen?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu Sep 23, 2010 12:03 pm    Post subject: Reply to: Print CICS TSQ
Reply with quote

Quote:
... (but it'll cost you )...


since it seems that the strategy is to get free consultancy on public forums
do not expect IBM to pay You icon_biggrin.gif
Back to top
View user's profile Send private message
Nimesh.Srivastava

New User


Joined: 30 Nov 2006
Posts: 78
Location: SINGAPORE

PostPosted: Fri Sep 24, 2010 1:47 pm    Post subject:
Reply with quote

Hoe San,
what is the lanuage that your programs are using?
in case identification of programs is an issue and programming lanuage is C/C++, then you can write a generic atexit routine for CICS programs,
this one routine when binded with multiple programs may print the content of the TSQ onto the CICS spool [if required for debugging purposes] and thereafter DELETEQ the TSQ.
OR
if you have installed & access to CICS ASG-TMON in your shop then you may go to "resource analysis" for TSQ and check the last access details
Hope this helps
Nimesh
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Fri Sep 24, 2010 3:34 pm    Post subject: Reply to: Print CICS TSQ
Reply with quote

You can create a "customised" terminal-autoinstall "delete" exit (transid=CATD) or modify "DFHZNEP", where the targeted TSQ can be deleted during a graceful or forced CICS logoff.

The construction of the TSQ name(s) for the subsequent DELETEQ (with NOHANDLE), using well-known/predefined components, would be defined to either of these modules.

This must be done in Assembler.... icon_wink.gif

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

New User


Joined: 04 Nov 2009
Posts: 7
Location: Caracas, Venezuela

PostPosted: Thu Nov 04, 2010 10:15 pm    Post subject: Reply to: Print CICS TSQ
Reply with quote

Hi, you can put the content of TSQ into a TDQ, you must open your TSQ wtih CEBR, CEBR yourtsq and later type PUT yourtdq.


Bye
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 CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm
No new posts CICS NEW SIT PARAMETERS CICS BEHAVIOR... Kyle Carroll CICS 0 Fri Nov 04, 2016 11:55 pm
No new posts Single COPY CICS TS datasets and when... Kyle Carroll CICS 2 Tue Oct 11, 2016 9:47 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us