Отсылка файла на почту в JCL

Сегодня предлагаю поговорить про простой способ отсылки содержимого текстового файла на почтовый ящик.

Решение этой задачи возложим на JCL. Шаг задания, выполняющий требуемое действие выглядит следующим образом:

//STEP010 EXEC PGM=IEBGENER
//SYSIN     DD DUMMY
//SYSPRINT  DD SYSOUT=*
//SYSUT1    DD DSN=USERID.MAILHEAD,DISP=SHR
//          DD DSN=USERID.TEXTFILE,DISP=SHR
//SYSUT2    DD SYSOUT=(B,SMTP)

IEBGENER - стандартная утилита;
USERID.TEXTFILE - файл с текстом письма;
USERID.MAILHEAD - файл с SMTP командами (в конце строк я оставил комментарии, в реальном файле их нужно удалить):

HELO CONFIRMATION
MAIL FROM:<sender@domain.com>           - email отправителя
RCPT TO:<email1@domain.com>             - email первого адресата
RCPT TO:<email2@domain.com>             - email второго адресата
DATA
TO: email1@domain.com                   - email первого адресата
CC: email2@domain.com                   - email первого адресата
SUBJECT:Hello                           - заголовок письма

Обращаю Ваше внимание, что отправитель письма может быть любым, а это значит, что у Вас есть возможность пошутить над коллегами, отправив им письмо с адреса любимого босса =)