MQ series and IDMS COBOL programs

gpowell382 · New User Joined: 25 Aug 2005 Posts: 31 Location: USA

I very new to MQ series (using it about one month), but I have been a COBOL (and other languages) for over 30 years. We are currently using Enterprise COBOL and IDMS 15.0.

I have a project (to be completed by Dec 2005) to use MQ series to send data to a system and that system would process the data and send it back within 20 seconds. We do not have the personnel to change all of application programs to use MQPUT and MQGET (about 30-40 programs).

I would like to write two generic MQ series programs.

One MQ series COBOL program would do a MQPUT and be called (dynamic) by various IDMS COBOL programs (program "A"). These programs that call the MQPUT would pass the needed data to do the MQPUT. This process I can get to work.

One MQ series COBOL program would do a MQGET and be executed when there is something in the receiving Queue.

When program "A" calls the MQPUT and is waiting for a response from the MQGET program How would program "A" receive the data from the MQGET program and continue processing from the CALLed MQGET program? Since program "A" did not call the MQGET program.

If you know of a better way to process, please let me know.

Gary

harvick29mdj · New User Joined: 06 Oct 2005 Posts: 3

Here's one way. May not be the most efficient.

Program "A" can do the MQPUT. Then program "A" would go into a looping process that uses the Browse functionality looking at the ReplyTo Queue searching for the response that matches the put.