|
RSS Feed - WebSphere MQ Support
|
RSS Feed - Message Broker Support
|
 |
|
Cobol & MQPCF z/OS |
« View previous topic :: View next topic » |
Author |
Message
|
offshore |
Posted: Fri Jun 25, 2004 9:20 am Post subject: Cobol & MQPCF z/OS |
|
|
 Master
Joined: 20 Jun 2002 Posts: 222
|
All,
Need some help with Cobol and adding MQPCF & Escape command to a program. Any help w/ applications programming would be greatly appreciated.
My goal is to issue a MQSC command from z/OS to Windows using a programe
What I've done so far:
In the "PERFORM XXXX" put message section I added the following line:
MOVE MQFMT-PCF TO MQMD-FORMAT.
I believe this gives the message the format of MQPCF.
This still didn't work correctly (well at least I didn't think so.. ), and I read some more after some guidance from other members of the board about adding the "ESCAPE" command to the program.
It looks at though I need to add the EscapeType & EscapeText.
The parameter id for EscapeType is MQIACF-ESCAPE-TYPE with a value of MQET-MQSC. The parmater id for EscapeText is MQCACF-ESCAPE-TEXT that holds the actual string command.
1.] Where do I put these values in the program?
2.] Is there anything I must declare?
I realize this is a lot of info and perhaps doesn't make the most of sense, but I'm attempting to learn/remember cobol.
Any examples or places I could go to look @ examples would help tremedously.
Thanks,
Offshore |
|
Back to top |
|
 |
kevinf2349 |
Posted: Fri Jun 25, 2004 9:58 am Post subject: |
|
|
 Grand Master
Joined: 28 Feb 2003 Posts: 1311 Location: USA
|
Just moving MQFMT-PCF to the MD isn't going to do it sadly.
The format of a PCF command isn't just the command. Ther eis a lot more to it than that, you have to set up all the different values and settings as described in the Programmable Command Formats manual.
z/OS currently doesn't support PCF messages so you have to do the work for it. I understand that version 6 of MQ for z/OS is going to support PCF commands.
I was getting into all kinds of trouble trying to get the right "endian-ness" built in, so I gave up and went about it in a different manner.
Sorry if this isn't much help, but as I said...I eventually fulfilled our requirement a different way and I never did get the PCF command to be successfully issued from z/OS. |
|
Back to top |
|
 |
offshore |
Posted: Fri Jun 25, 2004 10:03 am Post subject: |
|
|
 Master
Joined: 20 Jun 2002 Posts: 222
|
Kevin,
thanks for the reply.
I understand that z/OS MQ doesn't support PCF. I was just trying the first step to get the msg format correct. Which I have successfully done.
I need to figure out the escapetext/type values, which after reading the manual still isn't much help, at least to me.
Anyways, may I ask how you went about accomplishing this task?
Thanks. |
|
Back to top |
|
 |
EddieA |
Posted: Fri Jun 25, 2004 10:58 am Post subject: |
|
|
 Jedi
Joined: 28 Jun 2001 Posts: 2453 Location: Los Angeles
|
The fact that z/OS doesn't support PCF has nothing to do with the ability to build, or read, a PCF message on that platform.
As well as setting the Format, you need to build a correctly formatted PCF message.
First, you will need an MQCFH (the PCF header). This is then followed by one, or more, blocks that describe the PCF commands you are sending. For an "escape" sequence, I think you'll only need a single MQCFST (PCF String parameter).
Then, when you get your reply back, you'll have to interpret the PCF responses.
As was pointed out. You'll get the layout of all these blocks in the PCF manual.
You shouldn't have to worry about the endian-ness of the values, as MQ should sort all that out. Provided you have the right Formats set, and always GET with CONVERT.
Cheers, _________________ Eddie Atherton
IBM Certified Solution Developer - WebSphere Message Broker V6.1
IBM Certified Solution Developer - WebSphere Message Broker V7.0 |
|
Back to top |
|
 |
kevinf2349 |
Posted: Fri Jun 25, 2004 11:22 am Post subject: |
|
|
 Grand Master
Joined: 28 Feb 2003 Posts: 1311 Location: USA
|
EddieA
I didn't say that the fact the z/OS doesn't support PCF meant that you couldn't do it. What I said was that you would have to do the work for it.
I know it can be done, I just never got it to work (it kept complaining about the endian values ont he integers) and we developed an entirely different method in the end.
The solution we developed comprised of combining several requirements into one windows service that acts as a trigger monitor and a 'communication' interface between different queue managers. |
|
Back to top |
|
 |
|
|
 |
|
Page 1 of 1 |
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|
|
|