Нашли ошибку? Выделите
текст с ошибкой и нажмите кнопку "Сообщить об ошибке"
или CTRL+ENTER.
Справочная
система на версию 10.1
от 27/06/2023,
© ООО «ФОРСАЙТ»,
EventId: String;
Свойство EventId определяет событие, по наступлению которого будет выполнена задача.
Событие должно быть определено на вкладке «Пользовательские метаданные > События» диалога настройки параметров репозитория.
Для выполнения примера предполагается наличие:
контейнера запланированных задач с идентификатором «TASK_CONTAINER», содержащего задачу;
события с идентификатором «CUSTOM_EVENT».
Для задачи должны быть заданы настройки на вкладке «Расписание»:
установлен флажок «Выполнять задачу»;
выбран вариант периодичности выполнения задачи «Не задано».
Добавьте ссылки на системные сборки Metabase, Fore.
Sub UserProc;
Var
MB: IMetabase;
cont: IScheduledTasksContainer;
task: IScheduledTask;
prop: IScheduledTaskProperties;
alerts: IScheduledTaskAlerts;
EventId: String;
alert: IScheduledTaskAlert;
CustomAlert: IScheduledTaskCustomAlert;
Begin
MB := metabaseClass.Active;
cont := MB.ItemById("TASK_CONTAINER").Edit As IScheduledTasksContainer;
task := cont.Tasks.Item(0).Edit As IScheduledTask;
prop := task.Properties;
alerts := prop.Alerts;
EventId := prop.EventId;
EventId := "CUSTOM_EVENT";
alert := alerts.Add(ScheduledTaskAlertType.Custom);
CustomAlert := alert As IScheduledTaskCustomAlert;
CustomAlert.EventId := EventId;
(task As IMetabaseObject).Save;
End Sub UserProc;
В результате выполнения примера для задачи будет установлен вариант периодичности выполнения задачи «По наступлению настраиваемого события» и выбрано событие «Начало загрузки».
См. также: