ASG
IBM
Zystems
Cressida
Icon
Netflexity
 
  MQSeries.net
Search  Search       Tech Exchange      Education      Certifications      Library      Info Center      SupportPacs      LinkedIn  Search  Search                                                                   FAQ  FAQ   Usergroups  Usergroups
 
Register  ::  Log in Log in to check your private messages
 
RSS Feed - WebSphere MQ Support RSS Feed - Message Broker Support

MQSeries.net Forum Index » IBM MQ API Support » Cobol & MQPCF z/OS

Post new topic  Reply to topic
 Cobol & MQPCF z/OS « View previous topic :: View next topic » 
Author Message
offshore
PostPosted: Fri Jun 25, 2004 9:20 am    Post subject: Cobol & MQPCF z/OS Reply with quote

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
View user's profile Send private message Send e-mail
kevinf2349
PostPosted: Fri Jun 25, 2004 9:58 am    Post subject: Reply with quote

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
View user's profile Send private message
offshore
PostPosted: Fri Jun 25, 2004 10:03 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail
EddieA
PostPosted: Fri Jun 25, 2004 10:58 am    Post subject: Reply with quote

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
View user's profile Send private message
kevinf2349
PostPosted: Fri Jun 25, 2004 11:22 am    Post subject: Reply with quote

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
View user's profile Send private message
Display posts from previous:   
Post new topic  Reply to topic Page 1 of 1

MQSeries.net Forum Index » IBM MQ API Support » Cobol & MQPCF z/OS
Jump to:  



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
Protected by Anti-Spam ACP
 
 


Theme by Dustin Baccetti
Powered by phpBB © 2001, 2002 phpBB Group

Copyright © MQSeries.net. All rights reserved.