Создание и старт задачи

 

'Создать задачу
Dim Task = UserContext.Tasks.CreateTask()
'Обозначить тему задачи
Task.Subject = "Новая тема задачи"
'Добавить исполнителей в маршрут

Dim RouteStep = New NpoComputer.WebAccess.API.RouteStep()
With RouteStep
'Установить срок выполнения
 .Deadline = Nothing
'Выбрать тип задания
 .JobKind = NpoComputer.WebAccess.API.Job.JobKind.Notice
'Примечание
 .Note = "Примечание"
'Номер в маршруте
 .Number = 1
'Указать исполнителем текущего пользователя
 .Performer = UserContext.CurrentUser
'Задать условие старта
 .StartCondition = String.Empty
End With
'Добавить в маршрут
Task.RouteSteps.Add(RouteStep)
'Добавить наблюдателей, получая пользователей по ИД с помощью фабрики пользователей
Task.Observers.Add(UserContext.Users.GetUserByID(11111))
Task.Observers.Add(UserContext.Users.GetUserByID(22222))
'Сохранить задачу
Task.Save()
'Стартовать задачу
Task.Start()

 

Выполнение задания

 

'Получить задание по ИД
Dim Job = UserContext.Jobs.GetJobByID(123456)
'Заблокировать задание от изменений
Job.GlobalLock.TryLock()
'Пометить задание как прочитанное
Job.MarkAsRead()
'Внести изменения в текст задания
Job.ActiveText = "Новый текст задания"
'Выполнить задание
Job.Perform()
'Разблокировать задание
Job.GlobalLock.TryUnlock()

© 2016 Компания DIRECTUM

Сообщество пользователей DIRECTUM