Thanks to Scott Klement
I guess Id better make this a bit clearer..
You can attach any physical file on the iseries and
email it as a .csv file to anyone, anywhere.........
Start by downloading BASE64 from Scott Klement
Get the text files to your system in a source member
CRTLIB EMAIL
ADDLIBLE EMAIL
CRTRPGMOD BASE64R4 SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTSRVPGM SRVPGM(EMAIL/BASE64R4) SRCFILE(EMAIL/QSRVSRC)
CRTBNDDIR BNDDIR(EMAIL/BASE64)
ADDBNDDIRE BNDDIR(EMAIL/BASE64) OBJ((EMAIL/BASE64R4 *SRVPGM))
Create the send html email program
CRTRPGMOD MODULE(EMAIL/HTML) SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTPGM PGM(EMAIL/HTML) MODULE(EMAIL/HTML) BNDSRVPGM(QTCP/QTMMSNDM)
CALL PGM(HTML) PARM('jamie@code400.com')
Please pass your email or i will get it
**Thats it for that**
Now sending an attachment
CRTRPGMOD MODULE(EMAIL/ATTACH) SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTPGM PGM(EMAIL/ATTACH) MODULE(EMAIL/ATTACH) BNDSRVPGM(QTCP/QTMMSNDM)
CALL ATTACH and wait for the email
I also saved library EMAIL @ V5R3 and attached to this
post.....its in the email folder email.sav
I guess Id better make this a bit clearer..
You can attach any physical file on the iseries and
email it as a .csv file to anyone, anywhere.........
Start by downloading BASE64 from Scott Klement
Get the text files to your system in a source member
CRTLIB EMAIL
ADDLIBLE EMAIL
CRTRPGMOD BASE64R4 SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTSRVPGM SRVPGM(EMAIL/BASE64R4) SRCFILE(EMAIL/QSRVSRC)
CRTBNDDIR BNDDIR(EMAIL/BASE64)
ADDBNDDIRE BNDDIR(EMAIL/BASE64) OBJ((EMAIL/BASE64R4 *SRVPGM))
Create the send html email program
CRTRPGMOD MODULE(EMAIL/HTML) SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTPGM PGM(EMAIL/HTML) MODULE(EMAIL/HTML) BNDSRVPGM(QTCP/QTMMSNDM)
CALL PGM(HTML) PARM('jamie@code400.com')
Please pass your email or i will get it
**Thats it for that**
Now sending an attachment
CRTRPGMOD MODULE(EMAIL/ATTACH) SRCFILE(EMAIL/SOURCE) DBGVIEW(*LIST)
CRTPGM PGM(EMAIL/ATTACH) MODULE(EMAIL/ATTACH) BNDSRVPGM(QTCP/QTMMSNDM)
CALL ATTACH and wait for the email
I also saved library EMAIL @ V5R3 and attached to this
post.....its in the email folder email.sav
Comment