Зачем в 7.7 поменяли тип налогового платежа

1. AndKovalchuk 195 11.06.20 09:04 Сейчас в теме
Вот в новом обновлении по 7.7 в обработке "ПредприятиеКлиент" в процедуре
ВыгрузитьПлатежныйДокумент(Документ) есть такой блок (стр 1021)
Если (Документ.ПеречислениеНалога > 0) Тогда
			
			ТаблицаДокументов.СтатусСоставителя   = ПолучитьПредставлениеНалоговогоРеквизита(Документ.СтатусСоставителяПлДок);
			ТаблицаДокументов.ПоказательКБК 	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.КодБК);
			ТаблицаДокументов.ОКАТО 			  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.КодОКАТО);
			ТаблицаДокументов.ПоказательОснования = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательОснования);
			ТаблицаДокументов.ПоказательПериода	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательПериода);
			ТаблицаДокументов.ПоказательНомера	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательНомера);
			ТаблицаДокументов.ПоказательДаты	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательДаты);
			
			Если Документ.ДатаДок >= '01.06.2020' Тогда 
				ТаблицаДокументов.ПоказательТипа  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательТипа);
				Если Метаданные.Документ(Документ.Вид()).РеквизитШапки("КодВыплат").Выбран() = 1 Тогда	
					Если Документ.КодВыплат > 0 Тогда
						ТаблицаДокументов.ПоказательТипа=СокрЛП(Документ.КодВыплат);
					КонецЕсли;
				КонецЕсли;
			ИначеЕсли Документ.ДатаДок >= '01.01.2014' Тогда
				ТаблицаДокументов.ПоказательТипа  = ?(Документ.ДатаДок >= '28.03.2016', "", "0");
			Иначе
				ТаблицаДокументов.ПоказательТипа  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательТипа);
			КонецЕсли;
						
			ТаблицаДокументов.ПолучательКПП	  	  = ПолучитьПредставлениеНалоговогоРеквизита(ТаблицаДокументов.ПолучательКПП);
			ТаблицаДокументов.ПлательщикКПП	  	  = ПолучитьПредставлениеНалоговогоРеквизита(ТаблицаДокументов.ПлательщикКПП);
			
			Если Документ.ДатаДок >= '31.03.2014' Тогда
				ТаблицаДокументов.Код 			  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ИдентификаторПлатежа);
			КонецЕсли; 
		Иначе
			Если ПустоеЗначение(Документ.ИдентификаторПлатежа) = 0 Тогда
				Если Документ.ДатаДок >= '31.03.2014' Тогда
					ТаблицаДокументов.Код = Строка(Документ.ИдентификаторПлатежа);
				КонецЕсли; 
			КонецЕсли;
			
		КонецЕсли; 
Показать


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

ТипНалогового платежа может быть либо пустым либо 1.

Пришлось закомментировать эти строки, тогда всё работает

	Если (Документ.ПеречислениеНалога > 0) Тогда
			
			ТаблицаДокументов.СтатусСоставителя   = ПолучитьПредставлениеНалоговогоРеквизита(Документ.СтатусСоставителяПлДок);
			ТаблицаДокументов.ПоказательКБК 	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.КодБК);
			ТаблицаДокументов.ОКАТО 			  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.КодОКАТО);
			ТаблицаДокументов.ПоказательОснования = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательОснования);
			ТаблицаДокументов.ПоказательПериода	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательПериода);
			ТаблицаДокументов.ПоказательНомера	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательНомера);
			ТаблицаДокументов.ПоказательДаты	  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательДаты);
			
			Если Документ.ДатаДок >= '01.06.2020' Тогда 
				//ТаблицаДокументов.ПоказательТипа  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательТипа);
				//Если Метаданные.Документ(Документ.Вид()).РеквизитШапки("КодВыплат").Выбран() = 1 Тогда	
				//	Если Документ.КодВыплат > 0 Тогда
				//		ТаблицаДокументов.ПоказательТипа=СокрЛП(Документ.КодВыплат);
				//	КонецЕсли;
				//КонецЕсли;
			ИначеЕсли Документ.ДатаДок >= '01.01.2014' Тогда
				ТаблицаДокументов.ПоказательТипа  = ?(Документ.ДатаДок >= '28.03.2016', "", "0");
			Иначе
				ТаблицаДокументов.ПоказательТипа  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ПоказательТипа);
			КонецЕсли;
						
			ТаблицаДокументов.ПолучательКПП	  	  = ПолучитьПредставлениеНалоговогоРеквизита(ТаблицаДокументов.ПолучательКПП);
			ТаблицаДокументов.ПлательщикКПП	  	  = ПолучитьПредставлениеНалоговогоРеквизита(ТаблицаДокументов.ПлательщикКПП);
			
			Если Документ.ДатаДок >= '31.03.2014' Тогда
				ТаблицаДокументов.Код 			  = ПолучитьПредставлениеНалоговогоРеквизита(Документ.ИдентификаторПлатежа);
			КонецЕсли; 
		Иначе
			Если ПустоеЗначение(Документ.ИдентификаторПлатежа) = 0 Тогда
				Если Документ.ДатаДок >= '31.03.2014' Тогда
					ТаблицаДокументов.Код = Строка(Документ.ИдентификаторПлатежа);
				КонецЕсли; 
			КонецЕсли;
			
		КонецЕсли; 
Показать
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот