Постановка задачи
Необходимо выполнить поиск документов, созданных текущим пользователем за последнюю неделю.
Программный код
// Загрузить описание поиска и получить список критериев.
SearchFactory = Application.SearchFactory
SearchDesciption = SearchFactory.Load('EDOCUMENT_SEARCH')
Criteria = SearchDesciption.SearchCriteria
// Отобрать документы, автором которых является текущий пользователь.
AuthorCriterion = Criteria.Add('ISBEDocAuthor')
UserName = Application.Connection.UserName
AuthorCriterion.Add(ServiceFactory.GetUserByName(UserName).Code)
// Отобрать документы, созданные за последнюю неделю.
CreatedCriterion = Criteria.Add('ISBEDocCreateDate')
CreatedCriterion.AddRange(Today() - 7; Today())
// Выполнить поиск с запросом дополнительных критериев
// у пользователя.
SearchDesciption.Show(ssmBrowse; False)
Как разработать для веб-доступа
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |