Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Setting MQ open option

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
yogeshwar_ade

Active User


Joined: 31 Aug 2006
Posts: 103
Location: INDIA

PostPosted: Thu Jun 25, 2009 6:55 pm    Post subject: Setting MQ open option
Reply with quote

Hi Everybody,

Below fields are used to calculate MQ open option but could you please someone give pointer to significance of each field.

In my program, I got requirement to use MQOO-INPUT-AS-Q-DEF and
MQOO-FAIL-IF-QUIESCING field to set MQ open option .....but I didn't know on what basis these field are selected.



10 MQOO-INPUT-AS-Q-DEF PIC S9(9) BINARY VALUE 1.
10 MQOO-INPUT-SHARED PIC S9(9) BINARY VALUE 2.
10 MQOO-INPUT-EXCLUSIVE PIC S9(9) BINARY VALUE 4.
10 MQOO-BROWSE PIC S9(9) BINARY VALUE 8.
10 MQOO-OUTPUT PIC S9(9) BINARY VALUE 16.
10 MQOO-INQUIRE PIC S9(9) BINARY VALUE 32.
10 MQOO-SET PIC S9(9) BINARY VALUE 64.
10 MQOO-BIND-ON-OPEN PIC S9(9) BINARY VALUE 16384.
10 MQOO-BIND-NOT-FIXED PIC S9(9) BINARY VALUE 32768.
10 MQOO-BIND-AS-Q-DEF PIC S9(9) BINARY VALUE 0.
10 MQOO-SAVE-ALL-CONTEXT PIC S9(9) BINARY VALUE 128.
10 MQOO-PASS-IDENTITY-CONTEXT PIC S9(9) BINARY VALUE 256.
10 MQOO-PASS-ALL-CONTEXT PIC S9(9) BINARY VALUE 512.
10 MQOO-SET-IDENTITY-CONTEXT PIC S9(9) BINARY VALUE 1024.
10 MQOO-SET-ALL-CONTEXT PIC S9(9) BINARY VALUE 2048.
10 MQOO-ALTERNATE-USER-AUTHORITY PIC S9(9) BINARY VALUE 4096.
10 MQOO-FAIL-IF-QUIESCING PIC S9(9) BINARY VALUE 8192.
Back to top
View user's profile Send private message

yogeshwar_ade

Active User


Joined: 31 Aug 2006
Posts: 103
Location: INDIA

PostPosted: Thu Jun 25, 2009 7:24 pm    Post subject:
Reply with quote

The same issue with Close option. what is the significance of below fields.

10 MQCO-NONE PIC S9(9) BINARY VALUE 0.
10 MQCO-DELETE PIC S9(9) BINARY VALUE 1.
10 MQCO-DELETE-PURGE PIC S9(9) BINARY VALUE 2.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Jun 25, 2009 7:27 pm    Post subject:
Reply with quote

Quote:
but I didn't know on what basis these field are selected.


not sure what you are asking, but this is an example of how options are set:

Code:

COMPUTE MQPMO-OPTIONS     =  MQOO-INPUT-AS-Q-DEF
                           + MQOO-FAIL-IF-QUIESCING
END-COMPUTE
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Jun 25, 2009 7:50 pm    Post subject:
Reply with quote

Use this link to access whichever version you are using.
then when you pick the version, for example this is the vsn 7 library,
use the search window on the left side, enter your option and hit go.
The results will list many, look for the single word 'PROPERTIES', then
open this in a new tab. there will be explanations there.

you could download the manuals for easier searching (certainly quicker),
they are PDF's and PDF search is pretty good.
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Where is output from PARM ABEXIT (SNA... packerm CA Products 3 Thu Sep 28, 2017 4:06 pm
No new posts MQ command in option 6 of ISPF! Vignesh Sid All Other Mainframe Topics 3 Tue Sep 26, 2017 6:01 pm
No new posts Setting Font Type for XMIT satish.ms10 All Other Mainframe Topics 3 Fri Sep 15, 2017 10:01 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm
No new posts Finding IMS resource blocker after se... Hooman24 IMS DB/DC 1 Wed Aug 16, 2017 9:17 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us