Категории в карточках

В Microsoft Outlook есть такая удобная функция как установка категорий письма. Кликаем кнопкой мыши и назначаем категорию, которая отображается в представлении.

Такой же функционал можно сделать и в DocsVision. Приведу простой способ (рассматривается версия DocsVision 4.1).

1. Создаем в карточке свойство типа "Строка" и с именем "Метка"
2. Делаем представление в котором выводим значение данного свойства. Пример
3. Создаем новую комманду Навигатора в справочнике дополнительных комманд Навигатора.
Назначаем команду на меню карточки, задаем название и иконку.


А в поле "Сценарий" указываем следующий скрипт.

Sub DoEvent(UserSession, CardHost, FolderType, FolderID, SelectionIDs)
On Error Resume Next
' Для каждой карточки из коллекции
For Each sID In SelectionIDs
' Получаем карточку Set oCard = UserSession.CardManager.CardData(sID)
' Получаем секцию Properties
Set oPRows = oCard.Sections(oCard.Type.Sections.GetByAlias("Properties").ID)
Set oRow=oPRows.FindRow("@Name='Метка'")
oRow.Value("Value")="Срочно" oRow.Value("DisplayValue")="Срочно"
Next
CardHost.Refresh
End Sub

Данный скрипт будет записывать всем выделенным в представлении карточкам, в строковое свойство "Метка" значение "Срочно". Свойство в карточке должно существовать.

Переоткрываем Навигатор. Теперь выделив карточку или группу карточек, можно установить им метку, которая отобразится в представлении (представление, которое отображает свойство должно быть уже назначено папке).


Можно усложнить этот пример - привязывать категории из справочника категорий, и т.д.
Реализация функционала, через дополнительные комманды Навигатора может существенно ускорить работу делопроизводителя.
Посмотрите пример, как можно выделить номер карточке, даже не открывая её. Читать дальше