IScheduledTaskProperties.UseDynamicMailList

Синтаксис Fore

UseDynamicMailList: Boolean;

Синтаксис Fore.NET

UseDynamicMailList: Boolean;

Описание

Свойство UseDynamicMailList определяет, будет ли динамически формироваться список адресатов для отправки результатов выполнения задачи.

Комментарии

Допустимые значения:

• True. Формировать список адресатов динамически. Для формирования списка будет использоваться макрос, реализованный в Fore-модуле/форме/сборке DynamicMailListModule. Наименование макроса указывается в свойстве DynamicMailListMacro;

• False. Значение по умолчанию. Использовать статический список, заданный в свойстве MailRecipients.

Пример Fore

Для выполнения примера предполагается наличие в репозитории контейнера запланированных задач с идентификатором «TASK_CONTAINER». В контейнере должна быть создана какая-либо задача. Также в репозитории должен быть создан модуль с идентификатором «M_MAILLIST», в модуле реализована функция для формирования динамического списка адресатов «GetRecepients». Функция имеет примерно следующий синтаксис:

Синтаксис GetRecepients

Sub UserProc;
Var
    MB: IMetabase;
    Cont: IScheduledTasksContainer;
    Task: IScheduledTask;
    Props: IScheduledTaskProperties;
Begin
    MB := MetabaseClass.Active;
    Cont := MB.ItemById("TASK_CONTAINER").Bind As IScheduledTasksContainer;
    Task := Cont.Tasks.Item(0).Edit As IScheduledTask;
    Props := Task.Properties;
    //Динамический список адресатов
    Props.SendMail := True;
    Props.UseDynamicMailList := True;
    Props.DynamicMailListModule := MB.ItemById("M_MAILLIST");
    Props.DynamicMailListMacro := "GetRecepients";
    Props.MailTargetType := ScheduledTaskMailTarget.Personal Or ScheduledTaskMailTarget.Work;
    (Task As IMetabaseObject).Save;
End Sub UserProc;

При выполнении примера для первой задачи в контейнере запланированных задач будут изменены параметры уведомления о завершении задачи: список адресатов будет формироваться динамически с помощью указанного макроса.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

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;
Begin
    MB := Params.Metabase;
    Cont := MB.ItemById["TASK_CONTAINER"].Bind() As IScheduledTasksContainer;
    Task := Cont.Tasks.Item[0].Edit() As IScheduledTask;
    Props := Task.Properties;
    //Динамический список адресатов
    Props.SendMail := True;
    Props.UseDynamicMailList := True;
    Props.DynamicMailListModule := MB.ItemById["M_MAILLIST"];
    Props.DynamicMailListMacro := "GetRecepients";
    Props.MailTargetType := ScheduledTaskMailTarget.stmtPersonal Or ScheduledTaskMailTarget.stmtWork;
    (Task As IMetabaseObject).Save();
End Sub;

См. также:

IScheduledTaskProperties