Так сложилось, что мне вздумалось вводить счета от поставщика в БП 3.0. Да, можете считать это излишним, но это решение обернулось очень увлекательной задачей. Наш основной поставщик расходников указывает в счете только общую сумму НДС, когда строк в документе становится больше 3х, начинается квест по подбору ставок. Я решил это немного автоматизировать с помощью подключаемой обработки табличной части.
Когда написал обработку, хотел подглядеть шаблон, откуда содрать вызов. Наткнулся на древнюю статью 2018 года //infostart.ru/1c/articles/825702/ написанную Mirage78, и заметил, что интерес к ней проявляется до сих пор. Вариантов решения было предложено несколько. Не всё в них работало, или нравилось. Однако полезная информация там есть.
Эта же публикация создана для тех, кому нужно просто решение задачи, и для тех, кому пригодится конспект-шаблон для создания обработок табличной части.
Итак, приступим.
Задача. Имеем счет от поставщика, в строках счета указаны цены, в итогах счета общая сумма НДС.
Создадим обработку, в нее добавим:
- реквизит "Документ" - с типом ДокументСсылка.СчетНаОплатуПоставщика;
- табличную часть Товары - в ней будем отображать результат подбора ставок;
- табличную часть Варианты - в ней будем хранить подходящие варианты комбинаций ставок;
- табличную часть СтавкиВариантов - в ней будем хранить для каждой строки варианта ставки НДС для каждой строки табличной части Товары.
Заполним в модуле объекта функцию СведенияОВнешнейОбработке():
Создадим форму и накидаем на нее элементов
Через меню формы создаем процедуру "ПриСозданииНаСервере"
Так как отладка подключаемых обработок то ещё дело, здесь стоит упомянуть место, где можно тормознуться для просмотра передаваемых параметров открытия формы. Вызов зарегистрированной обработки идет из общего модуля ДополнительныеОтчетыИОбработкиКлиент в процедуре ОбработчикКомандыЗаполнения() строкой ОткрытьФорму("ВнешняяОбработка."+ ИмяВнешнегоОбъекта +".Форма", ПараметрыВызоваСервера, Форма);
На данный момент так, в дальнейшем вызов может, конечно, поменяться.
Так как обработка может быть подключённой, так и открываться интерактивно, то при открытии
обработки из формы документа сразу заполним документ источник. Интерактивное открытие, при заполнении владельца формы дает возможность простой отладки обработки.
Далее, в процедуре ПриОткрытии актуализируем информацию о документе источнике, вызвав процедуру обновления данных при смене документа.
На изменение документа источника отреагируем перезаполнением
Далее идут сервисные процедуры/функции заполнения и перерасчета строк документа при изменении ставки ндс интерактивно:
Теперь можно приступать к самой обработке подбора.
Найденные варианты сочетаний выводим на форму для выбора и пересчитываем по ним данные в текущей форме в табличной части "Товары"
По индексу варианта получаем ставки НДС для каждой строки, перезаполняем табличную часть "Товары" текущей формы
&НаКлиентеНаСервереБезКонтекста
Процедура ОбновитьИтоги(Форма)
Объект = Форма.Объект;
Форма.ИтогиВсего = Объект.Товары.Итог("Всего");
Форма.ИтогиВсегоНДС = Объект.Товары.Итог("СуммаНДС");
КонецПроцедуры
&НаКлиенте
Процедура ВариантыПриАктивизацииСтроки(Элемент)
Если НЕ Элементы.Варианты.ТекущиеДанные = Неопределено Тогда
МаксИндекс = Объект.Товары.Количество() - 1;
ИндексВарианта = Элементы.Варианты.ТекущаяСтрока;
МассивСтавок = ПолучитьМассивСтавокВарианта(ИндексВарианта);
Для Инд = 0 По МаксИндекс Цикл
Строка = Объект.Товары[Инд];
Строка.СтавкаНДС = МассивСтавок[Инд];
ОбщегоНазначенияБПКлиент.ПересчитатьСуммуНДС(Строка, СуммаДокументаВключаетНДС(Объект.Документ));
КонецЦикла;
КонецЕсли;
ОбновитьИтоги(ЭтаФорма);
КонецПроцедуры
&НаСервереБезКонтекста
Функция СуммаДокументаВключаетНДС(Документ)
Возврат Документ.СуммаВключаетНДС;
КонецФункции
&НаСервере
Функция ПолучитьМассивСтавокВарианта(ИндексВарианта)
МассивСтавок = Объект.СтавкиВариантов.Выгрузить(Новый Структура("ИндексСтрокиВарианта",ИндексВарианта)).ВыгрузитьКолонку("СтавкаНДС");
Возврат МассивСтавок;
КонецФункции
При выборе варианта, табличная часть обработки перезаполняется:
Когда мы получили устраивающий нас вариант, встает задача перенести результат в документ владелец формы. Для этого мы работаем с объектом формы владельца:
Таким образом, мы получили внешнюю обработку табличной части с возможностью отладки.
Проверено на следующих конфигурациях и релизах:
- Бухгалтерия предприятия, редакция 3.0, релизы 3.0.171.16
Вступайте в нашу телеграмм-группу Инфостарт