MailRecipients: IArrayList;
MailRecipients: Prognoz.Platform.Interop.ForeCollections.ArrayList;
Свойство MailRecipients определяет коллекцию электронных адресов, по которым будет осуществляться отправка уведомления о выполнении задачи.
Коллекция может содержать следующие значения:
Адрес электронной почты в строковом виде.
Ссылка на пользователя репозитория, описываемого интерфейсом ISecuritySubject.
Если в коллекцию добавлены пользователи репозитория, то в настройках также необходимо задать свойство MailTargetType.
Для выполнения примера предполагается наличие в репозитории контейнера запланированных задач с идентификатором «TASK_CONTAINER». В контейнере создана минимум одна задача.
Sub UserProc;
Var
MB: IMetabase;
Cont: IScheduledTasksContainer;
Task: IScheduledTask;
Props: IScheduledTaskProperties;
Mails: IArrayList;
Begin
MB := MetabaseClass.Active;
Cont := MB.ItemById("TASK_CONTAINER").Bind As IScheduledTasksContainer;
Task := Cont.Tasks.Item(0).Edit As IScheduledTask;
Props := Task.Properties;
Mails := Props.MailRecipients;
//Фиксированная электронная почта
Mails.Add("User@Example.ru");
//Электронная почта, указанная в профиле пользователя
Mails.Add(MB.LogonSession.User);
Props.MailTargetType := ScheduledTaskMailTarget.Personal Or ScheduledTaskMailTarget.Work;
Props.MailRecipients := Mails;
(Task As IMetabaseObject).Save;
End Sub UserProc;
При выполнении примера будут изменены параметры первой задачи, созданной в контейнере. В параметрах задачи будут указаны адреса электронной почты, на которые будет отправлен отчет о результатах выполнения задачи.
Для выполнения примера предполагается наличие в репозитории контейнера запланированных задач с идентификатором «TASK_CONTAINER». В контейнере создана минимум одна задача.
Imports Prognoz.Platform.Interop.ForeCollections;
Imports Prognoz.Platform.Interop.KeFore;
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Cont: IScheduledTasksContainer;
Task: IScheduledTask;
Props: IScheduledTaskProperties;
Mails: ArrayList;
Begin
MB := Params.Metabase;
Cont := MB.ItemById["TASK_CONTAINER"].Bind() As IScheduledTasksContainer;
Task := Cont.Tasks.Item[0].Edit() As IScheduledTask;
Props := Task.Properties;
Mails := Props.MailRecipients;
//Фиксированная электронная почта
Mails.Add("User@Example.ru");
//Электронная почта, указанная в профиле пользователя
Mails.Add(MB.LogonSession.User);
Props.MailTargetType := ScheduledTaskMailTarget.stmtPersonal Or ScheduledTaskMailTarget.stmtWork;
Props.MailRecipients := Mails;
(Task As IMetabaseObject).Save();
End Sub;
При выполнении примера будут изменены параметры первой задачи, созданной в контейнере. В параметрах задачи будут указаны адреса электронной почты, на которые будет отправлен отчет о результатах выполнения задачи.
См. также: