View previous topic :: View next topic
|
Author |
Message |
bay hoe san
New User
Joined: 22 Sep 2010 Posts: 4 Location: IBM Singapore
|
|
|
|
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 |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
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 |
|
|
bay hoe san
New User
Joined: 22 Sep 2010 Posts: 4 Location: IBM Singapore
|
|
|
|
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 |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
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 |
|
|
bay hoe san
New User
Joined: 22 Sep 2010 Posts: 4 Location: IBM Singapore
|
|
|
|
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 |
|
|
Earl Haigh
Active User
Joined: 25 Jul 2006 Posts: 475
|
|
|
|
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 ) |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
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 |
|
Back to top |
|
|
Nimesh.Srivastava
New User
Joined: 30 Nov 2006 Posts: 78 Location: SINGAPORE
|
|
|
|
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 |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
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....
Bill |
|
Back to top |
|
|
aemontero
New User
Joined: 04 Nov 2009 Posts: 7 Location: Caracas, Venezuela
|
|
|
|
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 |
|
|
|