email messages in rpg

20 pts.
Lotus Domino
Hi! I need to send an email message to a Lotus Notes Server. The information contained in this email will be sent by an RPG program. The big question is, how do I do that? Can anyone help me, please? Thanx in advance Melissa

Answer Wiki

Thanks. We'll let you know when a new response is added.

Your email needs to be sent to a database located on the server, rather than to the server itself. You can create a new mail db based on the default mail template, give it any name you like(for example, servermail.nsf, and designate it as a mail-in database, with a name like “Server”. Then your RPG program would send the email to, where maildomain is your email domain.

Discuss This Question: 2  Replies

There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • JPLamontre
    first, check if you as400 is configured to send email. something like this : SNDDST TYPE(*LMSG) TOINTNET((&TOINTNET *PRI)) + DSTD(&SUBJECT) LONGMSG(&LONGMSG) + CFMDEL(*YES) PTY(*HIGH) if it does not work look in search400 for a configuration, there are some (i have used it a fex years ago) when it works, then insert your SNDDST in your rpg : D QCmdExec PR EXTPGM('QCMDEXC') D cmd 5000A CONST D cmdlen 15P 5 CONST d AS400Cde s 5000 varying c eval as400cde = 'SNDDST TYPE(*LMSG) ' c + 'CFMDEL(*YES) ' c*********************** + 'IMPORTANCE(*HIGH) ' c*********************** + 'PTY(*HIGH) ' c + 'TOINTNET(' + emailTo + ') ' c + 'DSTD(' c + quote(%subst(emailsubject: 1: 44)) c + ') ' c + 'LONGMSG(' + quote(emailtexte c ) + ')' C Callp(e) qcmdexec(AS400cde : C %len(AS400CDE)) c if %error c exsr *pssr c endif c
    0 pointsBadges:
  • Alasdair727
    Just as an addendum to the above, SNDDST TYPE(*LMSG) lets you send up to 5000 characters, SNDDST TYPE(*MSG) only sends 256 characters. If you need to send more than that or indeed append files, it might be worth looking at MMAIL, a free sofware utility that can send spool files, database files or IFS stream files (ASCII or HTML) as attachments. It even manages basic PDF conversion if you want it. Details are at We use it to send acknowledgments to customers and it works very well. It also includes some useful hints on what you need to configure to get your AS/iSeries sending SMTP mail in the first place.
    0 pointsBadges:

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.


Share this item with your network: