Receiving a message in a module?

[David Gibbs <David.Gibbs@xxxxxxxxxxxxx>]

Folks:
 
I'm trying to program a receive message (RCVMSG) function in a CL module
that will receive a message generated in another module.... but I'm having
some problems.
 
The basic flow of my program is ...
 
Program A: Call Procedure X
Program A: Procedure X: Write record, generate message
Program A: Call Procedure Y (to receive message)
Program A: Procedure Y: Receive message
 
If I do a "RCVMSG RMV(*NO) MSGDTA(&MSGDTA) MSGID(&MSGID)", MSGID & MSGDTA
are returned as blanks.
The same goes for ""RCVMSG PGMQ(*PRV) RMV(*NO) MSGDTA(&MSGDTA)
MSGID(&MSGID)".
 
The message is being sent to program X, so I tried specifying call stack
entry "X", no joy.
 
Any suggestions on how I could receive this message?  The message type is
*NOTIFY.
 
Thanks!
 
david
 

--

David Gibbs
Sr. Software Engineer
Mortice Kern Systems US, Inc.
2500 S. Highland Ave., Suite 200
Lombard, IL  60148

phone: (630) 495-2108 x5004
http://www.mks.com <http://www.mks.com/> 
mailto:dgibbs@mks.com <mailto:dgibbs@mks.com> 


Opinions expressed are strictly my own and do 
not necessarily reflect those of my employer.

 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---