| Author |
Message
|
| zhanghz |
 Posted: Wed Oct 14, 2009 5:11 pm Post subject: |
 |
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| bruce2359 wrote: |
I'm going to guess that this is one of those lower-case vs. UPPER-CASE vs. MiXeD-cAsE issues.
On z/OS, whenever you type lower-case, the editor folds it to UPPER-CASE. Is the queue name literally all caps?
Is it possible that the app program tried to open a mixed-case qname? Look at the mf application using the ispf editor, but turn caps off. This will leave lower-case as lower-case. |
I thought about it too. In my own test using sample JCL CSQ4BVJR, I was putting to CLUSQB, all CAPITAL. From the definition of CLUSQB given by AIX team, the queue names are all CAPITAL. |
|
| Back to top |
|
 |
| bruce2359 |
| Posted: Wed Oct 14, 2009 5:28 pm Post subject: |
|
|
Poobah
Joined: 05 Jan 2008
Posts: 9469
Location: US: west coast, almost. Otherwise, enroute.
|
| Quote: |
| ...the queue names are all CAPITAL |
Paste here the DEFINE QL mqsc script command that the AIX team uses for the cluster queue in question.
| Quote: |
| dis qc(*) on MF qmgr does not see CLUSQB. |
You have told us what does NOT appear. Do any of the cluster queues for this cluster appear when you do a DIS QC(*)?
_________________
I like deadlines. I like to wave as they pass by.
ב''ה
Lex Orandi, Lex Credendi, Lex Vivendi. As we Worship, So we Believe, So we Live. |
|
| Back to top |
|
|
| bruce2359 |
| Posted: Wed Oct 14, 2009 5:43 pm Post subject: |
|
|
Poobah
Joined: 05 Jan 2008
Posts: 9469
Location: US: west coast, almost. Otherwise, enroute.
|
What version of WMQ on z/OS?
Are you saying that there are only two qmgrs in this cluster (one AIX, one z/OS)?
And that one is an FR, and the other is a PR?
Use the supplied browse utility to browse the SYSTEM.CLUSTER.COMMAND.QUEUE. Any messages in it?
Use the supplied browse utility to browse the
SYSTEM.CLUSTER.REPOSITORY.QUEUE. Be absolutely certain that you have set caps OFF. Search for the cluster queue. Does it exist there? Look carefully for the the queue name and cluster name.
What programming language? COBOL? C?
Please post the source code of MQOPEN call. Include the source code that populates the MQOD.
_________________
I like deadlines. I like to wave as they pass by.
ב''ה
Lex Orandi, Lex Credendi, Lex Vivendi. As we Worship, So we Believe, So we Live. |
|
| Back to top |
|
|
| zhanghz |
| Posted: Wed Oct 14, 2009 5:45 pm Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| bruce2359 wrote: |
| Quote: |
| ...the queue names are all CAPITAL |
Paste here the DEFINE QL mqsc script command that the AIX team uses for the cluster queue in question.
| Quote: |
| dis qc(*) on MF qmgr does not see CLUSQB. |
You have told us what does NOT appear. Do any of the cluster queues for this cluster appear when you do a DIS QC(*)? |
I don't have DEFINE QL script, here is the DIS Q(CLUSQB) output:
| Quote: |
DIS Q(CLUSQB)
1 : DIS Q(CLUSQB)
AMQ8409: Display Queue details.
QUEUE(CLUSQB) TYPE(QLOCAL)
ACCTQ(QMGR) ALTDATE(2009-10-13)
ALTTIME(19.29.37) BOQNAME( )
BOTHRESH(0) CLUSNL( )
CLUSTER(MQCSCBIMVA) CLWLPRTY(0)
CLWLRANK(0) CLWLUSEQ(QMGR)
CRDATE(2009-10-13) CRTIME(19.29.37)
CURDEPTH(0) DEFBIND(OPEN)
DEFPRTY(0) DEFPSIST(NO)
DEFSOPT(SHARED) DEFTYPE(PREDEFINED)
DESCR(Cluster Local Queue for Merva – HK)
DISTL(NO) GET(ENABLED)
HARDENBO INITQ( )
IPPROCS(1) MAXDEPTH(5000)
MAXMSGL(4194304) MONQ(QMGR)
MSGDLVSQ(PRIORITY) NOTRIGGER
NPMCLASS(NORMAL) OPPROCS(0)
PROCESS( ) PUT(ENABLED)
QDEPTHHI(80) QDEPTHLO(20)
QDPHIEV(DISABLED) QDPLOEV(DISABLED)
QDPMAXEV(ENABLED) QSVCIEV(NONE)
QSVCINT(999999999) RETINTVL(999999999)
SCOPE(QMGR) SHARE
STATQ(QMGR) TRIGDATA( )
TRIGDPTH(1) TRIGMPRI(0)
TRIGTYPE(FIRST) USAGE(NORMAL)
|
Here is the DIS Q(CLUSQA) output:
| Quote: |
QUEUE(CLUSQA) TYPE(QLOCAL)
ACCTQ(QMGR) ALTDATE(2009-10-06)
ALTTIME(16.43.53) BOQNAME( )
BOTHRESH(0) CLUSNL( )
CLUSTER(MQCSCBIMVA) CLWLPRTY(0)
CLWLRANK(0) CLWLUSEQ(QMGR)
CRDATE(2009-10-06) CRTIME(16.43.53)
CURDEPTH(0) DEFBIND(NOTFIXED)
DEFPRTY(0) DEFPSIST(NO)
DEFSOPT(SHARED) DEFTYPE(PREDEFINED)
DESCR(Cluster Local Queue for Merva - LN)
DISTL(NO) GET(ENABLED)
HARDENBO INITQ( )
IPPROCS(1) MAXDEPTH(5000)
MAXMSGL(4194304) MONQ(QMGR)
MSGDLVSQ(PRIORITY) NOTRIGGER
NPMCLASS(NORMAL) OPPROCS(0)
PROCESS( ) PUT(ENABLED)
QDEPTHHI(80) QDEPTHLO(20)
QDPHIEV(DISABLED) QDPLOEV(DISABLED)
QDPMAXEV(ENABLED) QSVCIEV(NONE)
QSVCINT(999999999) RETINTVL(999999999)
SCOPE(QMGR) SHARE
STATQ(QMGR) TRIGDATA( )
TRIGDPTH(1) TRIGMPRI(0)
TRIGTYPE(FIRST) USAGE(NORMAL)
|
DIS QC(*) on MF side shows CLUSQA, but no CLUSQB. |
|
| Back to top |
|
|
| zhanghz |
| Posted: Wed Oct 14, 2009 6:07 pm Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
Hi Bruce, my replies in RED.
| bruce2359 wrote: |
What version of WMQ on z/OS?
V6
Are you saying that there are only two qmgrs in this cluster (one AIX, one z/OS)?
And that one is an FR, and the other is a PR?
Yes, correct. Currently only 2 qmgrs in the cluster. AIX is FR, z/OS is PR.
Use the supplied browse utility to browse the SYSTEM.CLUSTER.COMMAND.QUEUE. Any messages in it?
I ran the MQ sample program to put message, and checked SYSTEM.CLUSTER.COMMAND.QUEUE, no messages inside.
Use the supplied browse utility to browse the
SYSTEM.CLUSTER.REPOSITORY.QUEUE. Be absolutely certain that you have set caps OFF. Search for the cluster queue. Does it exist there? Look carefully for the the queue name and cluster name.
Yes, several places.
| Code: |
.C.WQR .......}....CLUSQB
..E.RFSB............CLUSQB
..F.RFSB............CLUSQB
..E.RFSB............CLUSQB
..E.RFSB............CLUSQB
..F.RFSB............CLUSQB
..F.RFSB............CLUSQB
..D.WQR .......}....CLUSQB
..E.RFSB............CLUSQB
..E.RFSB............CLUSQB
..F.RFSB............CLUSQB
..E.RFSB............CLUSQB
..F.RFSB............CLUSQB
..F.RFSB............CLUSQB
..C.WQR .......}....CLUSQB
..E.RFSB...........eCLUSQB
..E.RFSB............CLUSQB
..F.RFSB...........eCLUSQB
..D.WQR .......}....CLUSQB
..E.RFSB............CLUSQB
..F.RFSB............CLUSQB
..E.RFSB............CLUSQB
|
What programming language? COBOL? C?
COBOL
Please post the source code of MQOPEN call. Include the source code that populates the MQOD.
| Code: |
01 MQM-OBJECT-DESCRIPTOR.
COPY CMQODV.
EJECT
...
...
MOVE MQOO-OUTPUT TO W1-OPENOPTIONS
MOVE W-QNAME TO MQOD-OBJECTNAME.
PERFORM R0000-OPEN-MQUEUE THRU
R0000-OPEN-MQUEUE-EXIT.
...
...
R0000-OPEN-MQUEUE.
CALL 'MQOPEN' USING W1-HCONN
MQOD
W1-OPENOPTIONS
W1-HOBJ
W1-COMPCODE
W1-REASON.
|
|
|
|
| Back to top |
|
|
| fjb_saper |
| Posted: Thu Oct 15, 2009 12:46 am Post subject: |
|
|
Grand High Poobah
Joined: 18 Nov 2003
Posts: 20756
Location: LI,NY
|
Can you please provide the content of:
dis clusqmgr(*) on both AIX and MF
The correlationID in text form (i.e. we want the channel) of the messages stuck in SYSTEM.CLUSTER.TRANSMIT.QUEUE on the MF.
Thanks 
_________________
MQ & Broker admin |
|
| Back to top |
|
|
| zhanghz |
| Posted: Thu Oct 15, 2009 1:30 am Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| AIX created a CLUSQB2. I am able to put messages to CLUSQB2 using sample program. |
|
| Back to top |
|
|
| exerk |
| Posted: Thu Oct 15, 2009 1:36 am Post subject: |
|
|
Jedi Council
Joined: 02 Nov 2006
Posts: 6339
|
Do a full dump of all attributes of CLUSQB and CLUSQB2, and minutely examine them for any differences.
_________________
It's puzzling, I don't think I've ever seen anything quite like this before...and it's hard to soar like an eagle when you're surrounded by turkeys. |
|
| Back to top |
|
|
| zhanghz |
| Posted: Thu Oct 15, 2009 1:59 am Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| fjb_saper wrote: |
Can you please provide the content of:
dis clusqmgr(*) on both AIX and MF
The correlationID in text form (i.e. we want the channel) of the messages stuck in SYSTEM.CLUSTER.TRANSMIT.QUEUE on the MF.
Thanks |
DIS CLUSQMGR(*) on AIX:
| Code: |
AMQ8441: Display Cluster Queue Manager details.
CLUSQMGR(AIX) ALTDATE( )
ALTTIME( ) BATCHHB(0)
BATCHINT(0) BATCHSZ(50)
CHANNEL(SCBIMVA.AIX.C1) CLUSDATE(2009-10-06)
CLUSTER(MQCSCBIMVA) CLUSTIME(16.36.05)
CLWLPRTY(0) CLWLRANK(0)
CLWLWGHT(50) COMPHDR(NONE)
COMPMSG(NONE) CONNAME(AIX(1414))
CONVERT(NO) DEFTYPE(CLUSRCVR)
DESCR( ) DISCINT(6000)
HBINT(300) KAINT(AUTO)
LOCLADDR( ) LONGRTY(999999999)
LONGTMR(1200) MAXMSGL(4194304)
MCANAME( ) MCATYPE(THREAD)
MCAUSER( ) MODENAME( )
MRDATA( ) MREXIT( )
MRRTY(10) MRTMR(1000)
MSGDATA( )
MSGEXIT( ) NETPRTY(0)
NPMSPEED(FAST) PASSWORD( )
PUTAUT(DEF) QMID(AIX_2009-10-06_15.56.50)
QMTYPE(REPOS)
RCVDATA( )
RCVEXIT( ) SCYDATA( )
SCYEXIT( )
SENDDATA( )
SENDEXIT( ) SEQWRAP(999999999)
SHORTRTY(10) SHORTTMR(60)
SSLCAUTH(REQUIRED) SSLCIPH( )
SSLPEER( ) STATUS(RUNNING)
SUSPEND(NO) TPNAME( )
TRPTYPE(TCP) USERID( )
AMQ8441: Display Cluster Queue Manager details.
CLUSQMGR(MF) ALTDATE(2009-10-14)
ALTTIME(22.58.25) BATCHHB(0)
BATCHINT(0) BATCHSZ(50)
CHANNEL(SCBIMVA.MF.C1) CLUSDATE(2009-10-14)
CLUSTER(MQCSCBIMVA) CLUSTIME(23.10.50)
CLWLPRTY(0) CLWLRANK(0)
CLWLWGHT(50) COMPHDR(NONE)
COMPMSG(NONE) CONNAME(MF(31416))
CONVERT(YES) DEFTYPE(CLUSSDRA)
DESCR(Finacle-Merva interface UAT) DISCINT(6000)
HBINT(300) KAINT(AUTO)
LOCLADDR( ) LONGRTY(999999999)
LONGTMR(1200) MAXMSGL(4194304)
MCANAME( ) MCATYPE(THREAD)
MCAUSER(MUSER) MODENAME( )
MRDATA( ) MREXIT( )
MRRTY(0) MRTMR(1000)
MSGDATA( ) MSGEXIT( )
NETPRTY(0) NPMSPEED(FAST)
PASSWORD(************) PUTAUT(DEF)
QMID(MF.BF65C009214FFC20) QMTYPE(NORMAL)
RCVDATA( ) RCVEXIT( )
SCYDATA( ) SCYEXIT( )
SENDDATA( ) SENDEXIT( )
SEQWRAP(999999999) SHORTRTY(10)
SHORTTMR(60) SSLCAUTH(REQUIRED)
SSLCIPH( ) SSLPEER( )
STATUS(INACTIVE) SUSPEND(NO)
TPNAME( ) TRPTYPE(TCP)
USERID( )
|
DIS CLUSQMGR(*) on MF:
| Code: |
DISPLAY CLUSQMGR(*) CLUSTER(MQCSCBIMVA) ALL
10.15.10 STC24732 CSQM201I +MF CSQMDRTC DISPLAY CLUSQMGR DETAILS 084
084 CLUSQMGR(AIX)
084 CLUSTER(MQCSCBIMVA)
084 CHANNEL(SCBIMVA.AIX.C1)
084 QMID(AIX_2009-10-06_15.56.50)
084 DEFTYPE(CLUSSDRB)
084 QMTYPE(REPOS)
084 CLUSDATE(2009-10-14)
084 CLUSTIME(23.00.54)
084 SUSPEND(NO)
084 STATUS(INACTIVE)
084 TRPTYPE(TCP)
084 CONNAME(AIX(1414))
084 DESCR( )
084 MCANAME( )
084 MODENAME( )
084 TPNAME( )
084 DISCINT(6000)
084 SHORTRTY(10)
084 SHORTTMR(60)
084 LONGRTY(999999999)
084 LONGTMR(1200)
084 SCYEXIT( )
084 SCYDATA( )
084 MSGEXIT( )
084 MSGDATA( )
084 SENDEXIT( )
084 SENDDATA( )
084 RCVEXIT( )
084 RCVDATA( )
084 SEQWRAP(999999999)
084 CONVERT(NO)
084 BATCHINT(0)
084 BATCHHB(0)
084 KAINT(AUTO)
084 NETPRTY(0)
084 CLWLRANK(0)
084 CLWLPRTY(0)
084 CLWLWGHT(50)
084 MCATYPE(THREAD)
084 MONCHL(QMGR)
084 ALTDATE( )
084 ALTTIME( )
084 SSLCIPH( )
084 SSLPEER( )
084 MCAUSER( )
084 LOCLADDR( )
084 BATCHSZ(50)
084 MAXMSGL(4194304)
084 COMPHDR(
084 NONE
084 )
084 COMPMSG(
084 NONE
084 )
084 HBINT(300)
084 NPMSPEED(FAST)
084 END CLUSQMGR DETAILS
10.15.10 STC24732 CSQM201I +MF CSQMDRTC DISPLAY CLUSQMGR DETAILS 085
085 CLUSQMGR(MF)
085 CLUSTER(MQCSCBIMVA)
085 CHANNEL(SCBIMVA.MF.C1)
085 QMID(MF.BF65C009214FFC20)
085 DEFTYPE(CLUSRCVR)
085 QMTYPE(NORMAL)
085 CLUSDATE(2009-10-14)
085 CLUSTIME(22.58.24)
085 SUSPEND(NO)
085 TRPTYPE(TCP)
085 CONNAME(MF(31416))
085 DESCR(Finacle-Merva interface UAT)
085 MCANAME( )
085 MODENAME( )
085 TPNAME( )
085 DISCINT(6000)
085 SHORTRTY(10)
085 SHORTTMR(60)
085 LONGRTY(999999999)
085 LONGTMR(1200)
085 SCYEXIT( )
085 SCYDATA( )
085 MSGEXIT( )
085 MSGDATA( )
085 SENDEXIT( )
085 SENDDATA( )
085 RCVEXIT( )
085 RCVDATA( )
085 MREXIT( )
085 MRDATA( )
085 MRRTY(0)
085 MRTMR(1000)
085 PUTAUT(DEF)
085 SEQWRAP(999999999)
085 CONVERT(YES)
085 BATCHINT(0)
085 BATCHHB(0)
085 KAINT(AUTO)
085 NETPRTY(0)
085 CLWLRANK(0)
085 CLWLPRTY(0)
085 CLWLWGHT(50)
085 MCATYPE(THREAD)
085 MONCHL(QMGR)
085 ALTDATE(2009-10-14)
085 ALTTIME(22.58.25)
085 SSLCAUTH(REQUIRED)
085 SSLCIPH( )
085 SSLPEER( )
085 MCAUSER(MUSER)
085 LOCLADDR( )
085 BATCHSZ(50)
085 MAXMSGL(4194304)
085 COMPHDR(
085 NONE
085 )
085 COMPMSG(
085 NONE
085 )
085 HBINT(300)
085 NPMSPEED(FAST)
085 END CLUSQMGR DETAILS
|
There is no mesage in SYSTEM.CLUSTER.TRANSMIT.QUEUE on the MF. |
|
| Back to top |
|
|
| Mr Butcher |
| Posted: Thu Oct 15, 2009 2:41 am Post subject: |
|
|
Padawan
Joined: 23 May 2005
Posts: 1716
|
looks like you have incactive cluster channels. verify all clussdr and clusrcvr for this cluster are running, both on AIX and MF, then try again.
did you check amqerr log files and chin address space logs for any errors or suspicious log messages ?!?
_________________
Regards, Butcher |
|
| Back to top |
|
|
| fjb_saper |
| Posted: Thu Oct 15, 2009 6:38 am Post subject: |
|
|
Grand High Poobah
Joined: 18 Nov 2003
Posts: 20756
Location: LI,NY
|
moving to cluster forum
_________________
MQ & Broker admin |
|
| Back to top |
|
|
| zhanghz |
| Posted: Thu Oct 15, 2009 4:30 pm Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| Mr Butcher wrote: |
looks like you have incactive cluster channels. verify all clussdr and clusrcvr for this cluster are running, both on AIX and MF, then try again.
did you check amqerr log files and chin address space logs for any errors or suspicious log messages ?!? |
The inactive cluster channel was because it was past DISCINT.
No suspicious CHIN log entries. AIX SA did not report any errors in its amqerr logs.. |
|
| Back to top |
|
|
| Mr Butcher |
| Posted: Thu Oct 15, 2009 10:08 pm Post subject: |
|
|
Padawan
Joined: 23 May 2005
Posts: 1716
|
again.... are you able to start all these channels so they get into running state?
_________________
Regards, Butcher |
|
| Back to top |
|
|
| zhanghz |
| Posted: Thu Oct 15, 2009 11:05 pm Post subject: |
|
|
Disciple
Joined: 17 Jun 2008
Posts: 186
|
| Mr Butcher wrote: |
| again.... are you able to start all these channels so they get into running state? |
Yes, all channels are in running status. And MQOPEN 2085 still.. |
|
| Back to top |
|
|
| Mr Butcher |
| Posted: Thu Oct 15, 2009 11:25 pm Post subject: |
|
|
Padawan
Joined: 23 May 2005
Posts: 1716
|
This seems to be very tricky 
i'd try this one
on aix
DEFINE QLOCAL(CLUSQ1) like(CLUSQA)
DEFINE QLOCAL(CLUSQ2) like(CLUSQB)
then try the sample program on z/OS on CLUSQ1 and CLUSQ2
Also ... did you try to delete / redefine CLUSQB ?
if all that does not work or help, it is either something very obvious everybody is not seeing, or it is a bug so opening a PMR is recommendet...... a t least i am running out of ideas.......
_________________
Regards, Butcher |
|
| Back to top |
|
|
|
|
