Author |
Message
|
Woo-Shoo, Jeong |
Posted: Wed Feb 08, 2006 1:05 am Post subject: How can I know Qmangager status? |
|
|
Newbie
Joined: 18 Nov 2005 Posts: 5
|
Hello.
How can I know whether Qmanager lives or not periodically? |
|
Back to top |
|
 |
vennela |
Posted: Wed Feb 08, 2006 1:07 am Post subject: |
|
|
 Jedi Knight
Joined: 11 Aug 2002 Posts: 4055 Location: Hyderabad, India
|
dspmq
Code: |
C:\Documents and Settings\admin>dspmq
QMNAME(QM1) STATUS(Running)
QMNAME(WBRK_QM) STATUS(Running)
C:\Documents and Settings\admin> |
|
|
Back to top |
|
 |
Woo-Shoo, Jeong |
Posted: Wed Feb 08, 2006 1:40 am Post subject: |
|
|
Newbie
Joined: 18 Nov 2005 Posts: 5
|
Thank you for your reply.
dspmq() is DOS command, But I want to know a fuction or API. |
|
Back to top |
|
 |
vennela |
Posted: Wed Feb 08, 2006 1:55 am Post subject: |
|
|
 Jedi Knight
Joined: 11 Aug 2002 Posts: 4055 Location: Hyderabad, India
|
Woo-Shoo, Jeong wrote: |
Thank you for your reply.
dspmq() is DOS command, But I want to know a fuction or API. |
Not available |
|
Back to top |
|
 |
jefflowrey |
Posted: Wed Feb 08, 2006 5:30 am Post subject: |
|
|
Grand Poobah
Joined: 16 Oct 2002 Posts: 19981
|
vennela wrote: |
Woo-Shoo, Jeong wrote: |
Thank you for your reply.
dspmq() is DOS command, But I want to know a fuction or API. |
Not available |
Other than through the same language standard way of invoking an external program, like the system function in C/Perl/etc. _________________ I am *not* the model of the modern major general. |
|
Back to top |
|
 |
mvic |
Posted: Wed Feb 08, 2006 5:55 am Post subject: |
|
|
 Jedi
Joined: 09 Mar 2004 Posts: 2080
|
|
Back to top |
|
 |
wschutz |
Posted: Wed Feb 08, 2006 6:47 am Post subject: |
|
|
 Jedi Knight
Joined: 02 Jun 2005 Posts: 3316 Location: IBM (retired)
|
Quote: |
Hello.
How can I know whether Qmanager lives or not periodically? |
or..write a simple program to try and MQCONN to the qmgr in question.... if it works, its "alive"  _________________ -wayne |
|
Back to top |
|
 |
JT |
Posted: Wed Feb 08, 2006 7:09 am Post subject: |
|
|
Padawan
Joined: 27 Mar 2003 Posts: 1564 Location: Hartford, CT.
|
........but conversely, if it doesn't work, it doesn't necessarily mean its "dead".  |
|
Back to top |
|
 |
wschutz |
Posted: Wed Feb 08, 2006 7:19 am Post subject: |
|
|
 Jedi Knight
Joined: 02 Jun 2005 Posts: 3316 Location: IBM (retired)
|
...of course, it depends on what you get back.. but 2059 is usually a good sign that its "not alive".....
since we don't know exactly why Jeong wants to know this info, all solutions are open for consideration .... _________________ -wayne |
|
Back to top |
|
 |
kevinf2349 |
Posted: Wed Feb 08, 2006 4:25 pm Post subject: |
|
|
 Grand Master
Joined: 28 Feb 2003 Posts: 1311 Location: USA
|
On Windows you can get the status from the registry. You just read the registry like you would for any other value.
On z/OS you can inquire of the subsystem Interface. I believe the code I put here (http://www.angelfire.com/ga/bowstore/MQ.html) shows the status on z/OS
On the Unix platforms and As/400 I have no idea
Hope this helps.
Edit:
Here is the registry code (in VB.Net)
Code: |
qmgrlist = vbCrLf & vbCrLf & "QMGR Status" & vbCrLf & "------------------------" & vbCrLf
Dim dir As DirectoryInfo = New DirectoryInfo(DirName)
QmgrRegistryPath = "Software\IBM\MQSeries\currentversion\status\queuemanager"
For Each DirInfo In dir.GetDirectories
Try
Key = Registry.LocalMachine.OpenSubKey(QmgrRegistryPath & "\" & DirInfo.Name & "\queuemanagerstatus", True)
If Key Is Nothing Then 'if the key doesn't exist
Throw New Exception("The registry key doesn't exist")
End If
CurrentStatus = Key.GetValue("CurrentStatus")
Catch eh As Exception
MsgBox(" Error occurs in ReadRegistry for Version " & vbCrLf & vbCrLf & eh.Message)
End Try
qmgrlist = qmgrlist & DirInfo.Name.Replace("!", ".") & " " & CurrentStatus & vbCrLf
Next |
|
|
Back to top |
|
 |
|