1С расширения конфигурации перед

1С расширения конфигурации перед

Настройка системы 15.01.2018 13:55 8912

Основная информация о механизме расширений описана в статье Расширения конфигураций 1С для платформы 8.3.6.

Переопределение процедур и функций (событий)

При переопределении событий, имя процедуры состоит из:
Расш1_ (Наименование расширения)
ПриОткрытии (Наименование переопределяемого события)
Перед, После, Вместо (Порядок выполнения)

Переопределение процедур и функций (не событий)

Начиная с версии платформы 8.3.9 в расширениях модулей стало доступно переопределение процедур и функций. Для переопределения существуют специальные конструкции (Аннотации) встроенного языка, которые задают порядок вызова методов.

Метод расширения ПродолжитьВызов() — вызывает процедуру или функцию основной конфигурации, которая в данный момент переопределяется и может принимать на вход параметры и возвращать значение переопределяемой процедуры или функции.

&Перед — означает что процедура "РассчитатьОстаткиСвоя" будет выполнена перед вызовом "РассчитатьОстатки".

&После — означает что процедура "РассчитатьОстаткиСвоя" будет выполнена после вызова "РассчитатьОстатки".

&Вместо — означает что процедура "РассчитатьОстаткиСвоя" будет выполнена вместо "РассчитатьОстатки".

Функции отличаются от процедур тем свойством, что могут возвращать значение. Поэтому для функций может
использоваться только анотация &Вместо и метод ПродолжитьВызов().

Для того чтобы добавить сообщение, необходимо Войти или Зарегистрироваться

В этой статье я разберу некоторые механизмы расширений конфигураций 1С. А именно «перехваты» методов модуля объекта и «перехваты» событий формы и элементов формы. Данная статья написана с учебными целями, что бы показать, как при помощи расширений конфигурации можно делать такие доработки, ради которых раньше приходилось снимать конфигурацию с поддержки.

Если кто не знаком с технологией расширений, то основную информацию можно получить из моих видео-уроков.

Все примеры я показываю на демонстрационной конфигурации «Управляемое приложение 1С», априори предполагается, что её нельзя изменять.

Имейте в виду, что перехват событий и методов работает только тогда, когда режим совместимости установлен в «Не использовать» (так было для платформы 8.3.10.1981), по сути это единственное изменения конфигурации «Управляемое приложение», которое я сделал…

В расширении можно перехватывать типовые процедуры модуля объекта. Имеется возможность сделать три варианта перехвата «типовой» процедуры: «перехватить» событие перед выполнением метода (с помощью аннотации &Перед), «перехватить» событие после выполнения метода (с помощью аннотации &После), а так же выполнить вместо типовой процедуры процедуру расширения (с помощью аннотации &Вместо).

В задачах ниже мы разберем работу «перехватчиков»

Задача: В расширении создадим собственный макет печати документа «Расход товара». И добавим команду на форму расходной накладной «Печать расходной накладной (расширение)» при выполнении которой будет печататься макет из расширения.

Для этого создадим расширение конфигурации «ДляРасходаТовара», заимствуем в это расширение документ «Расход товара», а так же форму.

Скопируем (именно скопируем, а не заимствуем) из расширяемой конфигурации макет «МакетПечати», переименуем его и изменим сам макет, что бы можно было отличать.

Теперь нам нужно скопировать (тоже именно скопировать, а не заимствовать) команду документа «Печать расходной накладной», но группа, в которую входит команда у нас не скопируется, поэтому перед этим необходимо заимствовать группу «Печать»

После этого копируем команду «Печать расходной накладной», и так же переименовываем, и не забудем указать тип параметра команды – ссылку на документ «Расход товаров»

Если мы на этом этапе сохраним расширение и обновим базу данных, то при открытии формы документа, увидим, что команда добавилась.

Но, если мы сейчас попробуем её выполнить, то выйдет обычная печатная форма, не из расширения.

Всё из-за того, что в команде расширения используется метод документа ПечатнаяФорма, в котором и «подтягивается» нужный макет.

Перехватим процедуру ПечатнаяФорма модуля объекта, и переделаем её. Для того что бы понимать, что мы используем табличный документ из расширения, будем, когда вызываем процедуру из команды расширения, передавать в неё структуру с табличным документом. А потом в перехваченной процедуре ПечатнаяФорма в зависимости от типа параметра будем использовать тот или иной макет: если параметр имеет тип ТабличныйДокумент, то будем использовать типовой макет, а если параметр имеет тип Структура, то будем использовать макет из расширения. Для того, что бы перехватить процедуру или функцию в модуле объекта необходимо написать аннотацию &Вместо и после неё в скобочках название перехваченного метода.

Читайте также:  Failover серверы предназначены для

Напишем в модуле расширения следующий код:

&Вместо(«ПечатнаяФорма»)
Процедура РТ_ПечатнаяФорма ( ТабличныйДокумент )
///
КонецПроцедуры // ПечатнаяФорма(ТабличныйДокумент)

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

Теперь скопируем код из процедуры ПечатнаяФорма расширенной конфигурации, и переделаем, как описано выше.

&Вместо(«ПечатнаяФорма»)
Процедура РТ_ПечатнаяФорма ( ТабличныйДокумент )
Если ТипЗнч ( ТабличныйДокумент ) = тип ( «Структура» ) Тогда
ТабличныйДокумент = ТабличныйДокумент . ТабДок ;
Макет = Документы . РасходТовара . ПолучитьМакет ( «РТ_МакетПечати» );
иначе
Макет = Документы . РасходТовара . ПолучитьМакет ( «МакетПечати» );
КонецЕсли;
//—————-основной код из расширенной конфигурации—————///
// Заголовок
Область = Макет . ПолучитьОбласть ( «Заголовок» );
ТабличныйДокумент . Вывести ( Область );
// Шапка
Шапка = Макет . ПолучитьОбласть ( «Шапка» );
Шапка . Параметры . Заполнить ( ЭтотОбъект );
ТабличныйДокумент . Вывести ( Шапка );
// Товары
Область = Макет . ПолучитьОбласть ( «ТоварыШапка» );
ТабличныйДокумент . Вывести ( Область );
ОбластьТовары = Макет . ПолучитьОбласть ( «Товары» );
//Обход ТЧ
Для каждого ТекСтрокаТовары Из Товары Цикл
ОбластьТовары . Параметры . Заполнить ( ТекСтрокаТовары );
ТабличныйДокумент . Вывести ( ОбластьТовары );
КонецЦикла;
КонецПроцедуры // ПечатнаяФорма(ТабличныйДокумент)

Нам осталось переделать код в команде расширения РТ_ПечатьРасходнойНакладной

&НаСервере
Функция ПечатнаяФорма ( ПараметрКоманды )
ТабличныйДокумент = Новый ТабличныйДокумент ;
ТабличныйДокумент . ОтображатьСетку = Ложь;
ТабличныйДокумент . Защита = Ложь;
ТабличныйДокумент . ТолькоПросмотр = Ложь;
ТабличныйДокумент . ОтображатьЗаголовки = Ложь;
Сформирован = Ложь;
///создаем струкутуру, для передачи в процедуру
СтруктураПередачи = Новый Структура ( «ТабДок» , ТабличныйДокумент );
Для каждого Ссылка Из ПараметрКоманды Цикл
Документ = Ссылка . ПолучитьОбъект ();
Если НЕ Документ . Проведен Тогда
Сообщение = Новый СообщениеПользователю ();
Сообщение . Текст = «Документ не проведен : » + Строка ( Документ );
Сообщение . КлючДанных = Ссылка ;
Сообщение . Сообщить ();
Продолжить;
КонецЕсли;
Документ . ПечатнаяФорма ( СтруктураПередачи ); //передали структуру
Сформирован = Истина;
КонецЦикла;
Если Сформирован Тогда
Возврат ТабличныйДокумент ;
Иначе
Возврат Неопределено;
КонецЕсли;
КонецФункции
&НаКлиенте
Процедура ОбработкаКоманды ( ПараметрКоманды , ПараметрыВыполненияКоманды )
ТабличныйДокумент = ПечатнаяФорма ( ПараметрКоманды );
Если ТабличныйДокумент <> Неопределено Тогда
ТабличныйДокумент . Показать ();
КонецЕсли;
КонецПроцедуры

Сейчас, после того, как сохраним расширение, то спокойно сможем распечатать макет расширения.

Задача: Перед проведением документа «Расход товара» будем проверять, внес ли контрагент аванс (должен быть больше суммы продажи), если нет, то не проведем документ.

Для решения этой задачи так же будем использовать аннотацию &Вместо, но в этот раз нам нужно продолжить выполнения основного метода (в нашем случае процедура ОбработкаПроведения).

Напишем в модуле документа «Расход товара» следующий код

&Вместо(«ОбработкаПроведения»)
Процедура РТ_ОбработкаПроведения ( Отказ , Режим )
Запрос = Новый Запрос ;
Запрос . Текст = «ВЫБРАТЬ
| ВзаиморасчетыОстатки.СуммаОстаток КАК СуммаОстаток
|ИЗ
| РегистрНакопления.Взаиморасчеты.Остатки(
| &МоментВремени,
| Контрагент = &Контрагент
| И Валюта = &Валюта) КАК ВзаиморасчетыОстатки»;
Запрос . УстановитьПараметр ( «МоментВремени» ,?( Режим = РежимПроведенияДокумента . Оперативный , ТекущаяДата (), МоментВремени ()));
Запрос . УстановитьПараметр ( «Контрагент» , Ссылка . Покупатель );
Запрос . УстановитьПараметр ( «Валюта» , Ссылка . Валюта );
//устанавливаем блокировки
Блокировка = Новый БлокировкаДанных ;
ЭлБлокировки = Блокировка . Добавить ( «РегистрНакопления . Взаиморасчеты» );
ЭлБлокировки . Режим = РежимБлокировкиДанных . Исключительный ;
ЭлБлокировки . УстановитьЗначение ( «Контрагент» , Ссылка . Покупатель );
ЭлБлокировки . УстановитьЗначение ( «Валюта» , Ссылка . Валюта );
Блокировка . Заблокировать ();
///
Результат = Запрос . Выполнить ();
Выборка = Результат . Выбрать ();
Выборка . Следующий ();
Если Ссылка . Товары . Итог ( «Сумма» ) > Выборка . СуммаОстаток Тогда
СуммаНеДобора = Ссылка . Товары . Итог ( «Сумма» ) + Выборка . СуммаОстаток ;
Сообщение = Новый СообщениеПользователю ;
Сообщение . Текст = «Авансов у покупателя недостаточно!» + Символы . ПС + «Не хватает » + СуммаНеДобора ;
Сообщение . Поле = «Покупатель» ;
Сообщение . УстановитьДанные ( ЭтотОбъект );
Сообщение . Сообщить ();
Отказ = Истина;
КонецЕсли;
ПродолжитьВызов ( Отказ , Режим );
КонецПроцедуры

В этом коде мы получаем остаток по регистру взаиморасчетов по покупателю в разрезе валюты. И если в документе сумма всех товаров больше чем остаток по взаиморасчету, то присваиваем параметру Отказ значение истина и выводим сообщение. А в конце процедуры вызываем метод ПродолжитьВызов с теми же параметрами, что и у нашей процедуры. Подробно про метод ПродолжитьВызов можно прочитать в синтаксис-помощнике, отмечу только: что бы не путаться, лучше называть параметры в методе-перехватчике, так же как и в методе расширенной конфигурации.

Читайте также:  Asus gtx 660 top

Посмотрим, как сработает наш перехват события

Кроме того, что мы можем написать метод, который сработает взамен метода расширенной конфигурации, мы можем написать процедуру (функцию), которая выполниться перед или после какой-нибудь «типового» метода модуля объекта. Для этого нужно использовать аннотации &Перед и &После.

Решим следующую задачу: в конфигурации «Управляемое приложение 1С» на основании контрагента нужно можно создать документ «Расход товара», в котором заполнится Контрагент и поле «Вид цены». Допустим нам не нужно автоматическое заполнение вида цены, поэтому мы перехватим событие после выполнения процедуры ОбработкаЗаполнения в модуле документа «Расход товара», где присвоим полю Вид цены пустую ссылку. Получиться вот такой код

Если мы сейчас создадим на основании контрагента документ «Продажи», то поле «Вид Цены» будет пустое

Теперь перейдем к формам.

Платформа позволяет перехватывать в расширении события формы и элементов формы. Так же как и для модуля объекта существует три варианта перехвата события: перед событием, после события и вместо события. Но задаются они по другому: по средством указания типа вызова при создании обработчика

Разберем работу перехвата событий форм на ряде примеров.

Задача: В документе «Расход товара» после выбора контрагента в окно «Обоснование отгрузки» будем записывать информацию из реквизита контрагента «Дополнительная информация».

Для этого перехватим событие после изменения поля «Покупатель». Зайдем в палитру свойств поля «Покупатель» формы документа «Расход товара» нашего расширения. И нажмем на пиктограмму «Лупа» рядом с событием «При изменении», после этого выйдет форма, где по мимо знакомых вариантов клиент, сервер и т.д., появятся варианты вызова события: перед, после и вместо.

Выберем на клиенте и после.

После выбора в палитре свойств рядом с созданным событием появилась соответствующая пиктограмма.

В модуле формы обработка создалась. Напишем следующий код.

Теперь, если мы выберем контрагента, то заполнится информация в поле документа «Обоснование отгрузки»

И последняя задача будет немного поинтереснее: в документе «Расход товара» в табличной части Товары сделаем возможность выбора только номенклатуры с видом Товар. В демонстрационной конфигурации есть товары с видом услуга. Они показаны на этом рисунке

Доработаем расширение конфигурации таким образом, что бы в форме документа «Расход товара» при выборе товара в табличной части, выходила форма выбора справочника «Товары» с отбором по виду товара. Для этого я заимствую форму выбора справочника товары в мое расширение.

И у этой формы создам обработчик события ПриСозданииНаСервере, который будет выполняться вместо типового.

Почему вместо типового? Потому что типового обработчика события ПриСозданииНаСервер формы выбора справочника Товары нет, и я решил сделать вместо. Хотя можно сделать после.

Теперь напишем код, в котором будем устанавливать отбор на динамический список «Список» формы выбора.

&НаСервере
Процедура РТ_ПриСозданииНаСервереВместо ( Отказ , СтандартнаяОбработка )
Если Параметры . Свойство ( «Вид» ) Тогда
Отбор = Список . Отбор ;
НовыйЭлОтбора = Отбор . Элементы . Добавить ( Тип ( «ЭлементОтбораКомпоновкиДанных» ));
НовыйЭлОтбора . ЛевоеЗначение = Новый ПолеКомпоновкиДанных ( «Вид» );
НовыйЭлОтбора . ВидСравнения = ВидСравненияКомпоновкиДанных . Равно ;
НовыйЭлОтбора . ПравоеЗначение = Параметры . Вид ;
КонецЕсли;
КонецПроцедуры

Все. С формой выбора мы покончили, и можем начать работать с формой документа «Расход товара». Первым делом, создадим событие НачалоВыбора поля Товар таблицы Товары, которое будем выполнять в место типового.

В этом обработчике мы напишем код, в результате которого будет открываться формы выбора справочника товары, и при открытии в эту форму будем передавать в качестве параметра вид товара – товар.

Читайте также:  Asus geforce gtx 1060 dual 3гб

&НаКлиенте
Процедура РТ_ТоварыТоварНачалоВыбораВместо ( Элемент , ДанныеВыбора , СтандартнаяОбработка )
//отменим стандартный вызов
СтандартнаяОбработка = Ложь;
//передадим параметры на форму
ПараметрыОткрытия = Новый Структура ;
ПараметрыОткрытия . Вставить ( «Вид» , ПредопределенноеЗначение ( «Перечисление . ВидыТоваров . Товар» ));
//опишем оповещение о закрытии
ОповещениеОЗакрытииВыбораТовара = Новый ОписаниеОповещения ( «ВыполнитьПослеЗакрытияВыбораТовара» , ЭтотОбъект );
ОткрытьФорму ( «Справочник . Товары . ФормаВыбора» , ПараметрыОткрытия
, ЭтаФорма
, УникальныйИдентификатор
.
ОповещениеОЗакрытииВыбораТовара ,);
КонецПроцедуры

Не забудем написать процедуру, которая должна сработать после закрытия формы выбора

Теперь при выборе товаров из документа «Расход товара» каталог «Услуги» будет пуст.

Но, заметьте, можно будет подобрать услугу, вводя вручную её название в поле товар.

Что бы такого не было, мы перехватим событие формы АвтоПодбор, наше событие будет выполняться вместо события расширенной конфигурации.

В этом обработчике будем накладывать отбор в параметрах получения данных

Теперь при подборе с клавиатуры услуги не будут выходить.

На этом всё. Надеюсь, эта статья принесла Вам пользу, и помогла понять, как можно перехватывать «Типовые» события при помощи расширений конфигурации.

В книге «Азбука расширений конфигураций 1С» в доступной форме подробно шаг за шагом даются основы работы с этим механизмом расширений конфигураций 1С.

После её прочтения Вы сможете самостоятельно использовать технологию расширения конфигураций 1С в своей работе. Вы окажите своим клиентам более высокий уровень сервис и выведете свой профессионализм на новый уровень!

Изучайте программирование в 1С в месте с моей книги «Программировать в 1С за 11 шагов»

  1. Книга написана понятным и простым языком — для новичка.
  2. Научитесь понимать архитектуру 1С;
  3. Станете писать код на языке 1С;
  4. Освоите основные приемы программирования;
  5. Закрепите полученные знания при помощи задачника;

Отличное пособие по разработке в управляемом приложении 1С, как для начинающих разработчиков, так и для опытных программистов.

  1. Очень доступный и понятный язык изложения
  2. Книга посылается на электронную почту в формате PDF. Можно открыть на любом устройстве!
  3. Поймете идеологию управляемого приложения 1С
  4. Узнаете, как разрабатывать управляемое приложение;
  5. Научитесь разрабатывать управляемые формы 1С;
  6. Сможете работать с основными и нужными элементами управляемых форм
  7. Программирование под управляемым приложением станет понятным

Промо-код на скидку в 15% — 48PVXHeYu


Если Вам помог этот урок решить какую-нибудь проблему, понравился или оказался полезен, то Вы можете поддержать мой проект, перечислив любую сумму:

можно оплатить вручную:

Яндекс.Деньги — 410012882996301
Web Money — R955262494655

Давайте разберем пример использования аннотации &ИзменениеИКонтроль (изменение и контроль). Для начала работы Вам потребуется создать расширение конфигурации. Для этого откройте список расширений и добавьте в него новое расширение. При этом обратите внимание на правильный выбор варианта назначения расширения конфигурации .

Возможность использования аннотации ИзменениеИКонтроль появилась начиная с версии платформы 8.3.15. В отличии от аннотаций &Перед, &После, &Вместо ​с помощью аннотации &ИзменениеИКонтроль ​Вы сможете делать точечные вставки в код типовой конфигурации. Основная проблема при изменении кода в больших процедурах и функциях с помощью расширений конфигурации — это постоянный контроль за постоянством этого кода. А в случае, если часть кода изменилась — необходимо сразу обновлять расширение. Использование аннотации &ИзменениеИКонтроль​ частично упрощает обновление расширений — теперь платформа будет контролировать неизменность кода в вынесенной в расширение процедуры.

Давайте разберем основные вставки, которые Вы можете выполнять в процедурах с аннотацией &ИзменениеИКонтроль.

  1. Для удаления кода типовой конфигурации Вы используете вставки #Удаление и #КонецУдаления . Таким образом, весь код, который будет обрамлен этими вставками будет игнорироваться при компиляции модуля.
  2. Для добавления своего кода Вы используете вставки #Вставка и #КонецВставки .

Теперь давайте рассмотрим, как добавить процедуру в расширение. Для этого на нужной процедуре кликните правой клавишей мыши и вызовите контекстное меню:

Ссылка на основную публикацию
Adblock detector