Re: sndemail command

Change the program to only send the e-mail if ALL of the variables are not
blank


Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill


midrange-l-bounces@xxxxxxxxxxxx wrote on 02/19/2008 12:16:02 PM:

Hi All,

I have a situation in which I loop a a file in CLE and use the SNDEMAIL
command as such:

READLOOP: RCVF RCDFMT(METEMLFR)

* monitor for end of file
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(END))

SNDEMAIL TYPE(*IFS) SMTPID(&EMLADREM1 &EMLADREM2 +

&EMLADREM3 &EMLADREM4) SUBJECT('MetCash +
Orders') +
IFS(('/kunip/' *CAT *FILE))

GOTO CMDLBL(READLOOP)

The problem I encounter is if any one of the variables are blank, the
command fails. Is there a way around this?

Thanks


Prevesh Kuni
RPG Developer
Smollan Group SA (Pty) Ltd
(011) 640 8154
kunip@xxxxxxxxxxxxx

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.