RE: Send Message Reply (SNDRPY)

[Bob Crothers <bob@xxxxxxxxxxxxxx>]

How about:

RCVMSG MSGQ(fred) msgtype(*inq) keyvar(&msgkey) rmv(*no) msg(&msgtext) 
msgid(&msgid) rtntype(&type)

if (&type *eq '05') then(do) /* Inquiry */
sndrpy msgkey(&msgkey) msgq(fred) rpy('Some Reply")
enddo

It has been a very long time since I attempted to do this sort of 
thing, but I think the above will do what you are looking for.

What you are trying to do (if I understand correctly) is possible...I 
have done it in the past.

-----Original Message-----
From:   MCPARTLAND, Stan [SMTP:stanley.mcpartland@bently.com]
Sent:   Tuesday, August 10, 1999 10:48 AM
To:     'MIDRANGE-L@midrange.com'
Subject:        RE: Send Message Reply (SNDRPY)

I am trying to reply to or remove a message on a non-program message 
queue.
Unfortunately, I have come to the conclusion that the message key 
(KEYVAR)
processing only works when the message queue is the program message 
queue.
The message key returned on the SNDPGMMSG command is the key of the 
sender's
copy of the message which is in the program message queue.  If you do 
a
RCVMSG on a message in a non-program message queue, the KEYVAR 
returned is
blank.  The SNDRPY command requires a message key and a non-program 
message
queue.  Based on my tests with SNDPGMMSG, RCVMSG and SNDRPY, the 
SNDRPY
command cannot work.

Regards,
Stan


-----Original Message-----
From: Bob Crothers [mailto:bob@cstoneindy.com]
Sent: Tuesday, 10 August, 1999 5:24 AM
To: 'MIDRANGE-L@midrange.com'
Subject: RE: Send Message Reply (SNDRPY)


I must confess.  I have not been following this thread so don't really 
know what it is about.  Perhaps before I hit the reply button, I
should have found out what you where trying to do.

Humbly,
Bob

-----Original Message-----
From:   Brendan Bispham [SMTP:midrangel@black-and-blue.com]
Sent:   Monday, August 09, 1999 4:21 PM
To:     MIDRANGE-L@midrange.com
Subject:        RE: Send Message Reply (SNDRPY)

You would have thought so - does that work on your system? On mine and
apparently on Stan's it doesnt work - or are we both overlooking
something
obvious?

Brendan Bispham
~ On the SNDPGMMSG command, there is a parm KEYVAR...specify this and
~ you will get the Message Key when you do the send...no need to do
any
~ RcvMsg.
~
~ Bob


+---
| 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@midr
ange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---

+---
| 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
+---
+---
| 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
+---

+---
| 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
+---