Объекты DIRECTUM

 

Объект IWorkAccessRights

 

Метод CanParticipantsReadAttachments – наличие прав участников задачи на вложения

Синтаксис:

function CanParticipantsReadAttachments(

  out ErrorMessage: WideString;

  const Attachments: IAttachmentList;

  [optional] MinAttachmentAccessType: TDeaAccessRights): WordBool;

Параметры:

ErrorMessage – текст предупреждения об отсутствии у участников задачи необходимых прав на вложения;

Attachments – список вложений в задачу;

MinAttachmentAccessType – минимальный уровень прав доступа к вложениям, который должен быть у всех участников задачи. Если этот параметр не указан, то проверяются права на просмотр arView.

Возвращаемое значение:

Признак наличия прав на вложения у всех участников задачи: True, если все участники имеют права MinAttachmentAccessType вложения или, если этот параметр не указан, права на просмотр вложений, иначе False.

Описание:

Метод проверяет, все ли участники задачи имеют права MinAttachmentAccessType на вложения, указанные в параметре Attachments. Если параметр MinAttachmentAccessType не указан, то проверяются права на просмотр вложений. Метод проверяет наличие прав на вложения у инициатора, исполнителей и наблюдателей задачи.

 

Примечание. Параметр ErrorMessage является выходным параметром. Значение выходного параметра доступно после выполнения метода. Для его получения в параметре ErrorMessage следует передавать указатель на строковую переменную. В вычислениях ISBL для этого нужно:

инициализировать переменную строковым значением;

в вызове метода после имени переменной указать символ «^».

Пример использования:

 

// Проверить наличие прав на вложения у всех участников задачи.

// Task– задача.

// ErrorMessage – сообщение об ошибке.

ErrorMessage =''

Attachments = Task.GetAttachments(True)

AccessRights = Task.AccessRights

if not AccessRights.CanParticipantsReadAttachments(ErrorMessage^;

  Attachments; arEdit)

  Exit(ErrorMessage)

endif