1С бухгалтерия / Обычное приложение / итоги/ отчет

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v8.3

1. Гость 30.03.16 10:27

Здравствуйте! Необходима помощь специалистов. Есть Отчет типовой "Свод для расчета налогов от ФОТ", в котором выводятся данные по Белгосстраху и ФСЗН, которые облагаются налогом. Картинка отчета прикреплена.Мне необходимо, чтобы в конце выводилась итоговая сумма "облагаемая ставкой ФСЗН" и "не облагаемая ставкой ФСЗН" . итоговая сумма "облагаемая ставкой ФСЗН" выводится хорошо. Но вот как сделать, чтобы выводилась "не облагаемая ставкой ФСЗН" не могу понять. Может кто поможет.
Вот код который выводит итоговую сумму "облагаемая ставкой ФСЗН"

	ОбластьПодвалТекстНаим = Макет.ПолучитьОбласть("ПодвалТекст|Наим");
	ОбластьПодвалТекстНаим.Параметры.РасчетНалоговТекст = "Расчет налогов от ФОТ";
	ТаблДок.Вывести(ОбластьПодвалТекстНаим);
	
	ИтогоСуммаФСЗН = 0;
	СуммаВзносовФСЗН = 0;
	Для Каждого	СтрокаТаблСтавкиФСЗН Из ТаблСтавкиФСЗН Цикл
		СтавкаФСЗН = СтрокаТаблСтавкиФСЗН.СтавкаФСЗН;
		ТаблДляФСЗНВР = ТаблицаДляФСЗН.Скопировать(Новый Структура("СтавкаФСЗН",СтавкаФСЗН));
		ИтогоФСЗН = 0;
		Если ТаблицаДляФСЗН.Количество()>0 Тогда
			ОбластьПодвалФСЗН = Макет.ПолучитьОбласть("ПодвалБазаФСЗН|Наим");
			ОбластьПодвалФСЗН.Параметры.СтавкаФСЗН = СтрокаТаблСтавкиФСЗН.СтавкаФСЗН;
			
			ТаблДок.Вывести(ОбластьПодвалФСЗН);
			
			Для Каждого СтрокаТаблицаСчетов ИЗ ТаблицаСчетов Цикл
				 
				Если СтрокаТаблицаСчетов.СуммаСверхНормы=0 Тогда
					ОбластьПодвалФСЗНСчет = Макет.ПолучитьОбласть("ПодвалБазаФСЗН|Счет");
				Иначе
					ОбластьПодвалФСЗНСчет = Макет.ПолучитьОбласть("ПодвалБазаФСЗН|СчетСоСверхнорм");
				КонецЕсли;
				
				мФСЗН = обИтоги(ТаблицаДляФСЗН,Новый Структура("СчетНалогов,СтавкаФСЗН",СтрокаТаблицаСчетов.КорСчет,СтавкаФСЗН),"БазаФСЗН");

				ФСЗН = мФСЗН.БазаФСЗН;
				ИтогоФСЗН = ИтогоФСЗН + ФСЗН;
				ОбластьПодвалФСЗНСчет.Параметры.НЕФСЗН = ФСЗН;
				ТаблДок.Присоединить(ОбластьПодвалФСЗНСчет);
      			КонецЦикла;
		КонецЕсли;	
		ОбластьПодвалИтог = Макет.ПолучитьОбласть("ПодвалБазаФСЗН|Итог");
		ОбластьПодвалИтог.Параметры.ИтогоФСЗН = ИтогоФСЗН;
		ТаблДок.Присоединить(ОбластьПодвалИтог);
	КонецЦикла;

Показать

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. Гость 30.03.16 10:28

вот картинка

Прикрепленные файлы:

Внимание! Не забывайте отмечать решение на ваш вопрос, если оно найдено. Это повысит ваш рейтинг на форуме.

Оставьте свое сообщение

E-mail: