Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

1C:Документооборот - настройка доступа к входящим документам

Роман Николаев
читатель
офлайн
Дата регистрации: 04.07.2019
Сообщений: 3
Пост №1
 
04.07.2019 13:33

Коллеги, прошу у вас помощи, совета.

Ситуация следующая:

имею 1с:документооборот 8 КОРП.
Настраиваю права к документам. С внутренними проблем нет. Но с входящими засада: либо дать доступ всем (или определенным лицам, группам) на чтение/редактирование/регистрацию, либо не давать и тогда никто документы не увидит.
Мне же нужно настроить по следующей схеме: обычные пользователи должны видеть входящие документы те, которые им направили по процессу. И не более.
Если кто знает как это сделать, заранее благодарен.

diablo05
читатель
офлайн
Дата регистрации: 23.06.2010
Сообщений: 1435
Пост №2
 
05.07.2019 15:07

Я убегаю с работы.. в понедельник с утра, напишу вам подробно как сделать.
У самих стоит 1с Док 8 корп и настроена так как вы хотите.

Ответили: пост №3 , пост №4
Роман Николаев
читатель
офлайн
Дата регистрации: 04.07.2019
Сообщений: 3
Пост №3
 
05.07.2019 15:46
Ответ на пост №2

diablo05, Спасибо. Очень жду

Роман Николаев
читатель
офлайн
Дата регистрации: 04.07.2019
Сообщений: 3
Пост №4
 
08.07.2019 16:51
Ответ на пост №2

diablo05, не получилось ответить?

Максим Б
читатель
офлайн
Дата регистрации: 05.07.2019
Сообщений: 5
Пост №5
 
15.07.2019 08:46

Я бы в процесс добавил обработчик, типа такого:

УстановитьПривилегированныйРежим(Истина);
текЗаявка = Процесс.Предметы[0].Предмет.Ссылка;
текОтветственныйМенеджер = текЗаявка.Контрагент.Ответственный;
Если ЗначениеЗаполнено(текОтветственныйМенеджер) Тогда

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| РабочиеГруппы.Участник
|ИЗ
| РегистрСведений.РабочиеГруппы КАК РабочиеГруппы
|ГДЕ
| РабочиеГруппы.Объект = &Объект
| И РабочиеГруппы.Участник = &Участник
| И РабочиеГруппы.Изменение = ИСТИНА";
Запрос.УстановитьПараметр("Объект", текЗаявка);
Запрос.УстановитьПараметр("Участник", текОтветственныйМенеджер);

РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда

Набор = РегистрыСведений.РабочиеГруппы.СоздатьНаборЗаписей();
Набор.Отбор.Объект.Установить(текЗаявка);
Набор.Отбор.Участник.Установить(текОтветственныйМенеджер);

Запись = Набор.Добавить();
Запись.Объект = текЗаявка;
Запись.Участник = текОтветственныйМенеджер;
Запись.Изменение = ИСТИНА;
РегистрыСведений.РабочиеГруппы.ЗаполнитьУстаревшиеИзмерения(Запись);

Набор.Записать(Истина);

КонецЕсли;

КонецЕсли;
Если ДокументооборотПраваДоступаПовтИсп.ВключеноИспользованиеПравДоступа() Тогда
ДокументооборотПраваДоступа.ОпределитьДескрипторыОбъекта(текЗаявка);
КонецЕсли;
УстановитьПривилегированныйРежим(Ложь);

И настраивал бы доступ по рабочим группам.

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация