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

Print CICS TSQ


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
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
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: 1353
Location: Israel

PostPosted: Wed Sep 22, 2010 2:17 pm
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
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
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
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
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
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

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Sep 23, 2010 12:03 pm
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
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: 2501
Location: Atlanta, Georgia, USA

PostPosted: Fri Sep 24, 2010 3:34 pm
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts Calling an Open C library function in... CICS 1
No new posts How to 'Ping' a CICS region in JCL CICS 2
No new posts Parallelization in CICS to reduce res... CICS 4
No new posts How to avoid duplicating a CICS Web S... CICS 0
Search our Forums:

Back to Top