IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

Deleting a TSQ from CICS

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> CICS
View previous topic :: View next topic  
Author Message
Manas Sinha



Joined: 29 Apr 2008
Posts: 20
Location: United Kingdom
Posted: Tue Jul 01, 2008 7:25 pm    Post subject: Deleting a TSQ from CICS  
Hi All,

I am trying to delete a TSQ from CICS using the CECI command -

CECI DELETEQ TS QNAME(X) and then giving the Hex address got via CEMT (PF2).

At the bottom of the screen i see 'INVREQ' response.

Can somebody advise what could be the problem ?

Best regards,
Amit.
Back to top  
Manas Sinha



Joined: 29 Apr 2008
Posts: 20
Location: United Kingdom
Posted: Tue Jul 01, 2008 7:44 pm    Post subject:  
The EXEC Interface block looks something like this -

DELETEQ TS QNAME(X)
EXEC INTERFACE BLOCK
EIBTIME = X'0151306F'
EIBDATE = X'0108183F'
EIBTRNID = X'C3C5C3C9'
EIBTASKN = X'0035946C'
EIBTRMID = X'C6F0F5F5'
EIBCPOSN = X'0018'
EIBCALEN = X'0000'
EIBAID = X'7D'
EIBFN = X'0A06' (DELETEQ)
EIBRCODE = X'200000000000'
EIBDS = X'0000000000000000'
EIBREQID = X'0000000000000000'
EIBRSRCE = X'C6C1C9E2E3C1E3E2'
EIBSYNC = X'00'
EIBFREE = X'00'
EIBRECV = X'00'
EIBATT = X'00'
EIBEOC = X'00'
+ EIBFMH = X'00'

Best regards,
Amit.
Back to top  
Manas Sinha



Joined: 29 Apr 2008
Posts: 20
Location: United Kingdom
Posted: Tue Jul 01, 2008 7:53 pm    Post subject:  
EIBRESP=X'00000010' EIBRESP2=X'00000000'

Can somebody tell me what these EIBRESP codes reflect ?

Best regards,
Amit.
Back to top  
Earl Haigh



Joined: 25 Jul 2006
Posts: 219
Posted: Tue Jul 01, 2008 8:21 pm    Post subject:  
please try reviewing the appropriate CICS application programming
guide for eib response codes,

you could also perform a google search.

based on your original question, I'm guessing the TSQ name


if the characters in the TSQ name contain non display characters,

and sometimes, lowercase characters, you can not delete the
tsq with CECI.
Back to top  
Earl Haigh



Joined: 25 Jul 2006
Posts: 219
Posted: Tue Jul 01, 2008 8:29 pm    Post subject:  
it is also possible the TSQ you are trying to delete,

is not a qname , but queue id (1-8)

try using

deleteq queue (x)

also,

make sure the tsq to be deleted exists in the same region you
are executing the deleteq command, otherwise you will need to
use the sysid option
Back to top  
Robert Sample



Joined: 06 Jun 2008
Posts: 943
Location: Atlanta, GA
Posted: Tue Jul 01, 2008 8:44 pm    Post subject:  
Quote: EIBRESP=X'00000010' EIBRESP2=X'00000000'

Can somebody tell me what these EIBRESP codes reflect ?

Response code 16 is ... surprise ... INVREQ. Generally when the computer tells me something I tend to believe it without conflicting evidence. Just to verify, you are entering Code: CECI DELETEQ TS QNAME('16BYTESOFHEX') and not actually an X? You can specify a variable name in a CECI request but you need to hit PF5 and populate the variable BEFORE you issue the command, and it's best to use an & in front of the variable name.
Back to top  
Bill O'Boyle



Joined: 14 Jan 2008
Posts: 345
Location: Orlando, FL, USA
Posted: Tue Jul 01, 2008 11:25 pm    Post subject: Re: EIB Stuff Link  
Watch the wraparound -

http://publib.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/dfhwp405/2.1?ACTION=MATCHES&REQUEST=rewrite&TYPE=FUZZY&SHELF=dfhwsh0p&DT=20060119100347&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT

Bill[/url]
Back to top  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> CICS
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM