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
 

 

How to delete TSQ in CICS region not from the program

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

New User


Joined: 15 Sep 2005
Posts: 42

PostPosted: Tue Oct 16, 2007 12:19 pm    Post subject: How to delete TSQ in CICS region not from the program
Reply with quote

Hi All,

I want to delete TSQ's from CICS region not from the program .

I have the used the following command to delete the TSQ

CECI DELETEQ TS TSqname

My TSQname is T0497471....

01 WS-TS-QUEUE.
05 WS-PRINTER-NAME PIC X(08).
05 WS-TASK-ID PIC 9(07) COMP-3.

Task id is COMP-3 value.

Can anyone update me how to delete from the CICS region.

Thanks,
Sridevi
Back to top
View user's profile Send private message

nuthan

Active User


Joined: 26 Sep 2005
Posts: 146
Location: Bangalore

PostPosted: Tue Oct 16, 2007 12:29 pm    Post subject:
Reply with quote

CECI is the IBM supplied transaction. So u can use this in CICS region and delete.
Let me know where u have used the syntax 'CECI DELETEQ TS TSqname
'
Back to top
View user's profile Send private message
sridevi2005

New User


Joined: 15 Sep 2005
Posts: 42

PostPosted: Tue Oct 16, 2007 12:44 pm    Post subject: Reply to: How to delete TSQ in CICS region not from the prog
Reply with quote

Hi,

I have used this command in one of my region.
I think I'm getting error because of comp-3 value.

When I used CEMT I TSQ(*) I got the following queue name

T0497471........
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Tue Oct 16, 2007 3:07 pm    Post subject:
Reply with quote

Do your CEMT command:
Code:
CEMT I TSQ(*)

Place your cursor on the line where is the TS you want and press ENTER
You receive detailed info about the TS, but also the possibility to use PF2 for hex display.
Copy the hex value.
In CECI, use PF2 as well to display the hex value and paste your TS name.
Am I clear ?
Back to top
View user's profile Send private message
sridevi2005

New User


Joined: 15 Sep 2005
Posts: 42

PostPosted: Tue Oct 16, 2007 6:26 pm    Post subject: Reply to: How to delete TSQ in CICS region not from the prog
Reply with quote

HI,

I got the hex value X'E3F0F4F9F7F4F7F0F0F0F0F000000000' for the TSQ name 'T04974700000....' .

But now I was unable to delete the queue name.I used the following code

CECI DELTEQ T04974700000....

Can u update me how to put hex value in CECI

Thank u very mcuh
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Tue Oct 16, 2007 7:01 pm    Post subject: Reply to: How to delete TSQ in CICS region not from the prog
Reply with quote

OK, you now have the hex value, that was the difficult part !

Enter:
Code:
CECI DELETEQ TS QNAME(X)

You will receive:
Code:
DELETEQ TS QNAME(X)                         
STATUS:  ABOUT TO EXECUTE COMMAND           
 EXEC CICS  DELETEQ TS                     
  ( QUeue() | QName( 'X               ' ) )
  < Sysid() >                               

Hit PF2 and you will see:
Code:
DELETEQ TS QNAME(X)                                         
STATUS:  ABOUT TO EXECUTE COMMAND                           
 EXEC CICS  DELETEQ TS                                     
  ( QUeue() | QName( X'E7404040404040404040404040404040' ) )
  < Sysid() >                                               

Now paste the hex queue name instead of the E74040.. so you now have:
Code:
DELETEQ TS QNAME(X)                                         
STATUS:  ABOUT TO EXECUTE COMMAND                           
 EXEC CICS  DELETEQ TS                                     
  ( QUeue() | QName( X'E3F0F4F9F7F4F7F0F0F0F0F000000000' ) )
  < Sysid() >                                               

Hit ENTER once to get the change and once more to execute the command.
That should do the trick!
Back to top
View user's profile Send private message
sridevi2005

New User


Joined: 15 Sep 2005
Posts: 42

PostPosted: Wed Oct 17, 2007 11:47 am    Post subject: Reply to: How to delete TSQ in CICS region not from the prog
Reply with quote

Hi Marso,

Its working fine.
Thank u vey much for your support.
It was very great help.
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 transaction slow response time vasanthz All Other Mainframe Topics 2 Thu Jan 19, 2017 1:31 am
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
No new posts INDEPENDENT CICS TS 4.1 MRO REGION UP... Kyle Carroll CICS 0 Wed Dec 14, 2016 6:55 pm
No new posts CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am


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