В очередной раз понадобилась доработка одного из документов 1С, а именно, чтобы при проведении документа, выводилось некое модальное окно, с вопросами менеджеру который этот документ проводит. А так как я противник какого либо изменения стандартной конфигурации (кушано достаточно с обновлениями) не по делу, то решил попробовать вариант с «расширениями».
Итак, сначала создаем регистр сведений, куда собственно будем заносить информацию которую будет заполнять менеджер. Привязка — к документу реализации:
Далее создадим расширение, через меню Конфигруация — Расширения конфигурации:
Переносим форму документа «Реализация товаров» в раширения:
В появившемся редакторе расширений, видим форму, с не заполненными действиями в командах формы. Если мы попробуем создать действие, выведется вопрос:
, когда вызывать данное действие, ДО, ПОСЛЕ ил ВМЕСТО. В моем случае, я выбрал ДО, и вписал в обработчик следующий код:
|
&НаКлиенте Процедура Расш1_ПровестиИзФормыПеред(Команда) Структура = Новый Структура("Документ", Объект.Ссылка); Массив = Новый Массив; Массив.Добавить(Структура); Ключ = Новый("РегистрСведенийКлючЗаписи.ДопИнформациОПродажеГрибов", Массив); ПараметрыФормы = Новый Структура("Ключ", Ключ); попытка ОткрытьФорму("РегистрСведений.ДопИнформациОПродажеГрибов.ФормаЗаписи", ПараметрыФормы); исключение Форма = ПолучитьФорму("РегистрСведений.ДопИнформациОПродажеГрибов.ФормаЗаписи"); Форма.Запись.Документ = Объект.Ссылка; Форма.Открыть(); конецпопытки КонецПроцедуры |
При нажатии кнопки «Провести» теперь выскакивает окно:
Ну и соответственно пишет в регистр информацию для размышления: