#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
#Область ПрограммныйИнтерфейс
Функция ТекстЗапросаКонтрольДатыЗапрета(Запрос) Экспорт
ИмяРегистра = Метаданные.РегистрыНакопления.НДСПредъявленный.Имя;
ИмяТаблицыИзменений = "НДСПредъявленныйИзменение";
СтруктураТекстовЗапросов = ПроведениеДокументов.ШаблонТекстЗапросаКонтрольДатыЗапрета(Запрос,
ИмяРегистра,
ИмяТаблицыИзменений,
"ФинансовыйКонтур");
Возврат СтруктураТекстовЗапросов
КонецФункции
#Область ДляВызоваИзДругихПодсистем
Процедура ПриЗаполненииОграниченияДоступа(Ограничение) Экспорт
Ограничение.Текст =
"РазрешитьЧтениеИзменение
|ГДЕ
| ЗначениеРазрешено(Организация)";
КонецПроцедуры
Функция ПараметрыОтраженияДвиженийВФинансовомУчете(МетаданныеРегистра = Неопределено, РегистрацияКОтражению = Ложь) Экспорт
ПараметрыОтражения = ФинансовыйУчетПоДаннымБалансовыхРегистров.ПараметрыОтраженияДвиженийВФинансовомУчете(РегистрацияКОтражению);
Если РегистрацияКОтражению Тогда
Возврат ПараметрыОтражения;
КонецЕсли;
ПараметрыОтражения.ПутьКДаннымОбъектНастройки = "ВидДеятельностиНДС";
ПараметрыОтражения.ПутьКДаннымМестоУчета = "ВидЦенности";
ПараметрыОтражения.ПутьКДаннымНаправлениеДеятельности = "НаправлениеДеятельности";
ПараметрыОтражения.ПутьКДаннымПодразделение = "Подразделение";
ПараметрыОтражения.РесурсыУпр.Добавить("НДСУпр");
ПараметрыОтражения.РесурсыРегл.Добавить("НДС");
Если МетаданныеРегистра = Неопределено Тогда
МетаданныеРегистра = СоздатьНаборЗаписей().Метаданные();
КонецЕсли;
ФинансовыйУчетПоДаннымБалансовыхРегистров.ЗаполнитьПараметрыОтраженияПоМетаданнымРегистра(ПараметрыОтражения, МетаданныеРегистра);
Возврат ПараметрыОтражения;
КонецФункции
#КонецОбласти
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
#КонецОбласти
#КонецЕсли