Sending e-mail from an RPG program

["Joe Teff" <jteff19@xxxxxxx>]

Sending e-mail from an RPG program has been on my list and it finally
got close enough to the top that I started researching it. Now I'm not a
communications guru in any sense of the word. I found this article in the
Nov 98 News/400. It was written by David Morris and titled "Send SMTP
Mail from an RPG Program". David is using the MSF API QzmfCrtMailMsg
which bypasses SNADS and other earlier approaches and writes the
message directly to the Any Mail Framework. The article says I can
simply install his procedure in a service program, start a MSF server and
call his procedure. You can't beat the simplicity of that. The problem I'm
having is that it won't work. The procedure itself returns an error code of
'0' which means it was successful. The mail server though errors due to

  CPFAF8B Reserved  mail message identifier not valid

The error message goes on to say that "If the Create Mail Message
(QzmfCrtMailMsg) API was called and the Reserve Mail Message
Identifier (QzmfRsvMailMsgId) API is not being used, then the reserved
message identifier parameter must contain null characters." This differs
from the manual which says it must be blank. I've tried calling it with
blanks and I've tried using   Eval  APIRsvMailId = x'00'. Neither works.
I've also tried calling the API to reserve a mail identifier and passing
that, but I get an error saying the identifier was already used.

Can anyone shed some light here. I either haven't found the right
manual or I'm not understanding what I'm reading.

TIA.  Joe Teff

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