Имя: Пароль:
1C
1С v8
1с 8,2 Как вывести итог суммы в подвале таб части документа в реквизит документа
0 mr0704
 
04.11.13
14:39
Таб часть Спецификация
Реквизить ТЧ СуммасНДСиАН

&НаКлиенте
Процедура СпецификацияКоличествоПриИзменении(Элемент)
    Тектаблица=Элементы.Спецификация.ТекущиеДанные;
    РасчитатьСумму(Тектаблица);
    РасчетСуммаСНДС(Тектаблица);
    ОбщаяСуммаСФ=ТекТаблица.итог("СуммасНДСиАН");
КонецПроцедуры
1 1dvd
 
04.11.13
14:41
&НаКлиенте
Процедура СпецификацияКоличествоПриИзменении(Элемент)
    Тектаблица=Элементы.Спецификация.ТекущиеДанные;
    РасчитатьСумму(Тектаблица);
    РасчетСуммаСНДС(Тектаблица);
    ОбновитьИтогСФ();
КонецПроцедуры

&НаСервере
Процедура ОбновитьИтогСФ()
    ОбщаяСуммаСФ = Спецификация.итог("СуммасНДСиАН");
КонецПроцедуры
2 mr0704
 
04.11.13
14:45
Ошибка переменная не определена (спецификация)
3 1dvd
 
04.11.13
14:48
>>Таб часть Спецификация

ты уверен?
4 mr0704
 
04.11.13
14:54
Да
работает
&НаКлиенте
Процедура СпецификацияКоличествоПриИзменении(Элемент)
    Тектаблица=Элементы.Спецификация.ТекущиеДанные;
    РасчитатьСумму(Тектаблица);
    РасчетСуммаСНДС(Тектаблица);
    ОбновитьИтогСФ();
КонецПроцедуры

&НаСервере
Процедура ОбновитьИтогСФ()
    Объект.ОбщаяСуммаСФ = Объект.Спецификация.итог("СуммасНДСиАН");
КонецПроцедуры
5 mr0704
 
04.11.13
14:55
спасибо
6 1dvd
 
04.11.13
14:56
а, ну, да, может так
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn