ВПФ

1. user_NP 26.01.24 13:40 Сейчас в теме
Не кидайте тапками пожалуйста... Сумма итого по столбцу всего...
Делала одну внешнюю печатную форму - получилось очень просто методом Итог...
Но при переделывании типовой на ВПФ - не могу посчитать этот столбец....
ОбластьПодвалТаблицыТовары.Параметры.СуммаИтого = ДанныеОбъекта.Товары.Итог ("Сумма");
Говорит нет такого метода Итог...
Где туплю - укажите пожалуйста...



 Для Каждого СтрокаТовары Из ДанныеОбъекта.Товары Цикл
		 
		 СтандартнаяОбработка = Истина;
		 КоммерческиеПредложенияДокументыПереопределяемый.ПриВыводеСтрокиТоварыПечатнуюФорму(ТабличныйДокумент,
		 СтрокаТовары,
		 ОбластьСтрокаТаблицыТовары,
		 ИменованнаяОбластьСтрокаТовары,
		 ДополнительныеПараметрыВывода,
		 СтандартнаяОбработка);
		 
		 Если СтандартнаяОбработка Тогда
			 ОбластьСтрокаТаблицыТовары.Параметры.Заполнить(СтрокаТовары);
			 ТабличныйДокумент.Вывести(ОбластьСтрокаТаблицыТовары);
		 КонецЕсли;
	
	 КонецЦикла;
	 
	 
	 ОбластьПодвалТаблицыТовары.Параметры.Заполнить(ДанныеОбъекта);
	
	 ОбластьПодвалТаблицыТовары.Параметры.СуммаИтого = ДанныеОбъекта.Товары.Итог ("Сумма");
      //ОбластьПодвалТаблицы.Параметры.СуммаНДС = СсылкаНаОбъект.Товары.Итог ("СуммаНДС");
	 //ОбластьПодвалТаблицы.Параметры.СуммаСНДС = СсылкаНаОбъект.Товары.Итог ("СуммаСНДС");
	 
	 ТабличныйДокумент.Вывести(ОбластьПодвалТаблицыТовары);
	 
	 ТабличныйДокумент.Вывести(ОбластьПустаяСтрокаТонкая);
	 
	 ОбластьСрокДействия.Параметры.Заполнить(ДанныеОбъекта);
	 ТабличныйДокумент.Вывести(ОбластьСрокДействия);
	 
	 Если Не ПустаяСтрока(ДанныеОбъекта.УсловияПоставкиПредставление) Тогда
		 
		 ТабличныйДокумент.Вывести(ОбластьПустаяСтрокаТонкая);
		 ОбластьДополнительнаяИнформация.Параметры.Заполнить(ДанныеОбъекта);
		 ТабличныйДокумент.Вывести(ОбластьДополнительнаяИнформация);
		 
	 КонецЕсли;
	 
	 ОбластьМенеджер.Параметры.Заполнить(ДанныеОбъекта);
	 ТабличныйДокумент.Вывести(ОбластьМенеджер);
	 
 КонецПроцедуры
 
 Функция ДанныеОбъектаПоДаннымДляПечати(ДанныеШапки, ТаблицаТовары)
	 
	 ДанныеОбъекта = Новый Структура;
	 
	 #Область ДанныеОрганизации      
	 
	 
	 СведенияОрганизации = Новый Структура;
	 СведенияОрганизации.Вставить("Наименование");
	 СведенияОрганизации.Вставить("ПолноеНаименование");
	 СведенияОрганизации.Вставить("Телефоны");
	 СведенияОрганизации.Вставить("ЮридическийАдрес");
	 СведенияОрганизации.Вставить("ЭлектроннаяПочта");
	 
	 КоммерческиеПредложенияДокументыПереопределяемый.ЗаполнитьДанныеОрганизации(ДанныеШапки.Организация, СведенияОрганизации);
	 
	 Если ЗначениеЗаполнено(СведенияОрганизации.ПолноеНаименование) Тогда
	     ПредставлениеОрганизации = СведенияОрганизации.ПолноеНаименование;
	    	 Иначе
	     ПредставлениеОрганизации = СведенияОрганизации.Наименование;
	 КонецЕсли; 
	 
		
	 #КонецОбласти
	 
	 #Область КонтактнаяИнформация
	 
	 Если ЗначениеЗаполнено(ДанныеШапки.Менеджер) Тогда
		 
		 МассивСМенеджером = Новый Массив;
		 МассивСМенеджером.Добавить(ДанныеШапки.Менеджер);
		 
		 ТребуемыеТипыКонтактнойИнформации = Новый Массив;
		 ТребуемыеТипыКонтактнойИнформации.Добавить(Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты);
		 
		 ТаблицаКонтактнойИнформации = УправлениеКонтактнойИнформацией.КонтактнаяИнформацияОбъектов(
		 МассивСМенеджером,
		 ТребуемыеТипыКонтактнойИнформации,,
		 ДанныеШапки.Дата);
		 
		 АдресЭлектроннойПочтыМенеджера = КоммерческиеПредложенияДокументы.ПредставлениеКонтактнойИнформацииИзТаблицы(
		 ТаблицаКонтактнойИнформации,
		 Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты);
		 
	 Иначе
		 ТелефонМенеджера = "";
		 АдресЭлектроннойПочтыМенеджера   = "";
	 КонецЕсли;
	 
	 #КонецОбласти
	 
	 #Область Товары
	 
	 ЕстьСкидки = Ложь;
	 ДанныеОбъекта.Вставить("СуммаВсего", 0);
	 ДанныеОбъекта.Вставить("СуммаВсегоНДС", 0);
	 ДанныеОбъекта.Вставить("КоличествоТоваров", 0);
	 ДанныеОбъекта.Вставить("Товары", Новый Массив);
	 
	 Для Каждого СтрокаТовары Из ТаблицаТовары Цикл
		 
		 Если СтрокаТовары.СуммаСкидки <> 0 Тогда
			 ЕстьСкидки = Истина;
		 КонецЕсли;
		 
		 ДанныеОбъекта.СуммаВсего        = ДанныеОбъекта.СуммаВсего + СтрокаТовары.Сумма;
		 ДанныеОбъекта.СуммаВсегоНДС     = ДанныеОбъекта.СуммаВсегоНДС + СтрокаТовары.СуммаНДС;
		 ДанныеОбъекта.КоличествоТоваров = ДанныеОбъекта.КоличествоТоваров + 1;
		 
		 СтрокаТаблицыТовары = Новый Структура;
		 
		 //НаименованиеТовара = СтрокаТовары.Номенклатура;//КоммерческиеПредложенияДокументыКлиентСервер.//ПредставлениеНоменклатурыДляПечати(СтрокаТовары.Номенклатура);//, СтрокаТовары.Характеристика);
		 
		 СтрокаТаблицыТовары.Вставить("НомерСтроки",      СтрокаТовары.НомерСтроки);
		 СтрокаТаблицыТовары.Вставить("Номенклатура",     СтрокаТовары.Номенклатура);
		 СтрокаТаблицыТовары.Вставить("Количество",       СтрокаТовары.Количество);
		 СтрокаТаблицыТовары.Вставить("ЕдиницаИзмерения", СтрокаТовары.ЕдиницаИзмерения);
		 СтрокаТаблицыТовары.Вставить("Цена",             Формат(СтрокаТовары.Цена,"ЧДЦ=2; ЧРД=."));
		 СтрокаТаблицыТовары.Вставить("СуммаСНДС",        Формат(СтрокаТовары.СуммаСНДС,"ЧДЦ=2; ЧРД=."));
		 СтрокаТаблицыТовары.Вставить("СуммаСкидки",      Формат(СтрокаТовары.СуммаСкидки,"ЧДЦ=2; ЧРД=."));
		 СтрокаТаблицыТовары.Вставить("СрокПоставки",     КоммерческиеПредложенияДокументыКлиентСервер.СрокПоставкиСтрокой(ДанныеШапки.ВариантУказанияСрокаПоставки, 
		 СтрокаТовары.СрокПоставки));
		 
		 КоммерческиеПредложенияДокументыПереопределяемый.ДополнитьДанныеОбъектаДляПечати(СтрокаТаблицыТовары, СтрокаТовары, ДанныеОбъекта);
		 
		 ДанныеОбъекта.Товары.Добавить(СтрокаТаблицыТовары);
		 
	 КонецЦикла;
Показать
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. yispepotri 26.01.24 14:10 Сейчас в теме
после Итог в коде лишний пробел, в этом не может быть проблема?


ОбластьПодвалТаблицыТовары.Параметры.СуммаИтого = ДанныеОбъекта.Товары.Итог ("Сумма");
ОбластьПодвалТаблицыТовары.Параметры.СуммаИтого = ДанныеОбъекта.Товары.Итог("Сумма");
Оставьте свое сообщение

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