Как вы отправляете электронное письмо в список пользователей в CL?

Как следует из названия. Мне нужно модифицировать различные программы для отправки отчетов по электронной почте в списки пользователей, где они жестко закодированы для отправки определенным пользователям, большое количество которых является clles. В принципе, каков синтаксис функциональности списка пользователей в cl?


ibm-midrange control-language
person Chuckles    schedule 27.12.2017    source источник
comment
Ваш вопрос слишком широк.   -  person Lexib0y    schedule 27.12.2017
comment
Я не знаю, что еще я бы попросил. Мне просто нужен пример синтаксиса для списка пользователей.   -  person Chuckles    schedule 27.12.2017
comment
Например, что такое cl? Я почти уверен, что вы не говорите о компиляторе и компоновщике C++.   -  person Avner Shahar-Kashtan    schedule 27.12.2017
comment
Ну тогда вам придется искать пример. Возможно, это поможет: stackoverflow.com/questions/3665537/   -  person Lexib0y    schedule 27.12.2017
comment
Я говорю о clle (программы на языке управления ILE (CL)). Похож на КЛП. Программирую в основном в rpgle и rpg free.   -  person Chuckles    schedule 27.12.2017
comment
Видите ли, это может быть хорошим началом, вместо того, чтобы использовать только инициалы малоизвестного языка, ни в коем случае не указывая технологию, которую вы используете, и не помечая ее тегом для другой технологии с те же инициалы.   -  person Avner Shahar-Kashtan    schedule 27.12.2017
comment
Как вы отправляете электронную почту в своей программе CLP? Вы используете команду SNDDST? Используете сторонний продукт?   -  person David G    schedule 27.12.2017
comment
Я подозреваю, что если бы вы могли определить свою проблему, вы были бы близки к своему ответу.   -  person Richard Evans    schedule 27.12.2017
comment
Спасибо за лекцию Авнер. Это файл .clle, написанный на RDi как часть базы данных AS400 mod 8. В настоящее время это жестко закодировано так:   -  person Chuckles    schedule 27.12.2017
comment
DCL VAR(&EMAIL1) TYPE(*CHAR) LEN(40) + VALUE('[email protected]')   -  person Chuckles    schedule 27.12.2017
comment
IF COND(&RECORDS *GT 0) THEN(DO) IF COND(&EMAIL1 *NE ' ') THEN(DO) CALL PGM(RHPEMAIL) PARM(&EMAIL1 'PGMNAME' + 'PGMNAME' &SUBJECT) ENDDO IF COND(&EMAIL2 *EQ ' ') THEN(DO) CHGVAR VAR(&EMAIL2) VALUE('[email protected]') ENDDO   -  person Chuckles    schedule 27.12.2017
comment
Итак, RHPEMAIL вызывается для отправки почты? Я бы предложил связаться с тем, кто написал эту программу, чтобы узнать, как ее использовать.   -  person David G    schedule 28.12.2017
comment
Я просто прошу сотрудника службы технической поддержки по электронной почте создать дистрибутив, а затем обращаться с ним как с обычным адресом электронной почты.   -  person danny117    schedule 28.12.2017

Ответы (1)


arrow_upward
2
arrow_downward

Основная команда для электронной почты это...

SNDSMTPEMM RCP(([email protected])) +            
             SUBJECT(&SUBJECT) NOTE(&NOTE) +        
             ATTACH((&ATTACH *EXCEL)) CONTENT(*HTML)

Профессиональное деловое электронное письмо необходимо отправлять из списка рассылки, чтобы ответы на электронные письма попадали в список рассылки, а не на адрес [email protected].

  1. Создайте cl, который отправляет электронные письма с полномочиями *OWNER.
  2. Создайте профиль пользователя «myuser», который будет использоваться для рассылки по электронной почте.
  3. Создайте псевдоним для «myuser» с помощью WRKNAMSMTP.

Идентификатор/адрес пользователя. . . . . : мой пользователь msystem

Идентификатор пользователя SMTP. . . . . . : mydl
SMTP-домен . . . . . . . : мойдомен.COM

затем отправьте CL для пользователя myuser. оно будет выглядеть так, как будто оно исходит из списка рассылки, и ответы будут поступать в список рассылки.

SBMJOB     CMD(CALL PGM(myemailc) PARM(&mparm1 &mparm2)) +
             JOB(myemailc) JOBD(mylib/myjobd) +            
             JOBQ(qsysnomax) USER(myuser)
person danny117    schedule 28.12.2017