Дополнительные обработки » История » Версия 5
« Предыдущее -
Версия 5/7
(Разница(diff)) -
Следующее » -
Текущая версия
Всеволод Дорофеев, 24.07.2019 10:01
Дополнительные обработки¶
1. Обработка заполнения данных формы без записи объекта¶
2. Сохраняемые параметры дополнительной обработки¶
При необходимости задать параметры для дополнительной обработки можно воспользоваться реквизитом ХранилищеНастроек справочника ДополнительныеОтчетыИОбработки. Например, для заполнения документа Распределение прочих затрат необходимо получать цены по определенному, специально созданному для этих целей виду цен. Этот вид цен можно задавать с помощью сохраняемого параметра. В общем виде в реквизите ХранилищеНастроек можно сохранять произвольные параметры дополнительной обработки .(например, в виде структуры). Для доступа к реквизиту ХранилищеНастроек в команду выполнения обработки передается ссылка на связанный с ней элемент справочника ДополнительныеОтчетыИОбработки.
Пример кода для чтения параметра:
ХранилищеНастроек = ОбщегоНазначения.ЗначениеРеквизита(ОбработкаСсылка,"ХранилищеНастроек"); НастройкиСтруктура = ХранилищеНастроек.Получить();
для записи:
ДополнительнаяОбработкаОбъект = Параметры.ДополнительнаяОбработкаСсылка.ПолучитьОбъект(); ДополнительнаяОбработкаОбъект.ХранилищеНастроек = НовыйХранилищеЗначения(НастройкиСтруктура); ДополнительнаяОбработкаОбъект.Записать();
3. Вызов процедуры модуля внешней обработки¶
&НаСервере Функция ПроверитьНДСНаСервере(Отказ) ИмОбработки = "Пересчет суммы НДС по итоговой сумме"; ОбработкаПроверки = Справочники.ДополнительныеОтчетыИОбработки.НайтиПоНаименованию(ИмОбработки); Если Не ЗначениеЗаполнено(ОбработкаПроверки) Тогда ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( НСтр("ru = 'Не найдена обработка " + ИмОбработки), КраткоеПредставлениеОшибки(ИнформацияОбОшибке())); Отказ = Истина; ВызватьИсключение ТекстСообщения; КонецЕсли; Если ОбработкаПроверки.Вид = Перечисления.ВидыДополнительныхОтчетовИОбработок.Отчет ИЛИ ОбработкаПроверки.Вид = Перечисления.ВидыДополнительныхОтчетовИОбработок.ДополнительныйОтчет Тогда Менеджер = ВнешниеОтчеты; Иначе Менеджер = ВнешниеОбработки; КонецЕсли; ИмяОбработки = ДополнительныеОтчетыИОбработки.ПодключитьВнешнююОбработку(ОбработкаПроверки); МенеджерОбработки = Менеджер.Создать(ИмяОбработки); МенеджерОбработки.ДокументДляОбработки = Объект.СсылкаНаОбъект; РазницаСумм = МенеджерОбработки.СуммаНДСКорректна(); //Менеджер.Создать(ИмяОбработки).ВыгрузитьВExcel(СтрокаКлиенты.НастройкиВыгрузки); возврат РазницаСумм; КонецФункции