Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
17 апр 2024, 00:46

Подстановка имени

Автор Smokez, 26 мая 2015, 15:06

0 Пользователей и 1 гость просматривают эту тему.

Smokez

Доброго времени суток, пишу конфигурацию и интересует такой вопрос.
Есть документ "Приходная накладная",
как сделать чтобы в поле "Автор" автоматический подставлялось имя бухгалтера который создал этот документ.
Имя прописано в роли Бухгалтер под которой зашел пользователь.
Если можно развернутый ответ, а то я новичек.

Rasty

ПользователиИнформационнойБазы.ТекущийПользователь()
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

Smokez

В если поточнее можно, код при создании документа нужно или как?

Rasty

ПриСоздании ПередЗаписью ПослеЗаписи,как угодно, но &НаСервере
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

cska-fanat-kz

обычно существует:
1. справочник Пользователи, каждому элементу которого соответствует пользователь информационной базы.
2. параметр сеанса ТекущийПользователь типа СправочникСсылка.Пользователи куда при начале работы системы помещается ссылка на справочник, которая соответствует текущему пользователю ИБ.
3. в самом документе реквизит Автор можно заполнить например в ОбработкаЗаполнения()

хотя на самом деле вариантов реализации - масса.
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Rasty

cska-fanat-kz, вариантов правда масса, но у автора вроде конфа самописная
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

cska-fanat-kz

Цитата: Rasty от 27 мая 2015, 11:05
cska-fanat-kz, вариантов правда масса, но у автора вроде конфа самописная

вот поэтому и есть место для полета фантазии )
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Smokez

Большое спасибо, буду думать
Добавлено: 28 мая 2015, 16:21


Воспользовался вашим советом

Создал справочник пользователи,
Создал параметр сеанса "ТекущийПользователь" с кодом:


Процедура УстановкаПараметровСеанса(ТребуемыеПараметры)
   ТекПользователь = Справочники.Пользователи.НайтиПоНаименованию(ИмяПользователя());
Если ТекПользователь.Пустая() Тогда
   НовПользователь = Справочники.Пользователи.СоздатьЭлемент();
   НовПользователь.Наименование = ИмяПользователя();
   НовПользователь.Записать();
   ТекПользователь = НовПользователь.Ссылка;
КонецЕсли;
   ПараметрыСеанса.ТекущийПользователь = ТекПользователь;
КонецПроцедуры

После в документе "Приходная накладная" в форме

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Объект.Автор = ПараметрыСеанса.ТекущийПользователь();
КонецПроцедуры

Но реквизит автор все равно не заполняется
Добавлено: 28 мая 2015, 16:43


и ошибок не выдает

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск