Отключение ненужного контроля заявок ДС. УТ 11.5
Ранее я отключал обязательное заполнения заявок, чтобы можно было использовать платежный календарь. При проведении расхода со счета по операции «Перечисление на депозиты» выдается ошибка при любой сумме Х:
По договору Депозит ВТБ оплачивается больше, чем утверждено в заявке, на Х руб.
Поправляю патчем модуля РасчетыПоФинансовымИнструментам:
&Вместо("СообщитьОРезультатахКонтроляИзменений") Процедура дпк_СообщитьОРезультатахКонтроляИзменений(РезультатыКонтроля, Документ, Отказ) //Исключаем ошибку Если ПроведениеДокументов.ЕстьЗаписиВТаблице(Документ, "ДвиженияРасчетыПоФинансовымИнструментамИзменение") Тогда Для каждого СтрокаОшибки Из РезультатыКонтроля.ОшибкиРасчетыПоФинансовымИнструментам Цикл Если СтрокаОшибки.Оплачивается <> 0 Тогда СтрокаОшибки.Оплачивается = 0; КонецЕсли; КонецЦикла; КонецЕсли; ПродолжитьВызов(РезультатыКонтроля, Документ, Отказ); КонецПроцедуры
UPD 25.11.20: Для УТ 11.5.24.48 отключил контроль заполненности заявок в документах «Списание безналичных ДС», «Расходный ордер», «Операция по платежной карте» расширением модуля ОбщегоНазначенияКлиентСервер:
&Вместо("СообщитьПользователю") Процедура дпк_СообщитьПользователю(Знач ТекстСообщенияПользователю, Знач КлючДанных, Знач Поле, Знач ПутьКДанным, Отказ) //Отключаем контроль заявок Если Найти(ТекстСообщенияПользователю, "Поле ""Заявка на расходование денежных средств"" не заполнено") <> 0 Тогда Возврат; КонецЕсли; ПродолжитьВызов(ТекстСообщенияПользователю, КлючДанных, Поле, ПутьКДанным, Отказ); КонецПроцедуры
Но этот обход работает, только если в расшифровке платежа одна строка, нужно добавлять еще такой код в модуль СписаниеБезналичныхДенежныхСредствЛокализация:
&Вместо("ОбработкаПроверкиЗаполнения") Процедура дпк_ОбработкаПроверкиЗаполнения(Объект, Отказ, ПроверяемыеРеквизиты) МассивНепроверяемыхРеквизитов = Новый Массив(); МассивНепроверяемыхРеквизитов.Добавить("РасшифровкаПлатежа.ЗаявкаНаРасходованиеДенежныхСредств"); ОбщегоНазначения.УдалитьНепроверяемыеРеквизитыИзМассива(ПроверяемыеРеквизиты, МассивНепроверяемыхРеквизитов); ПродолжитьВызов(Объект, Отказ, ПроверяемыеРеквизиты); КонецПроцедуры
Среда: УТ 11.5.24.48 Объем: 0.5 час




Свежие комментарии