Заполнить ИтогоСумма в документе учет

Форум Учет и отчетность Общие вопросы по учету (Учет)

1. user1100994 01.12.18 19:53 Сейчас в теме

Документ УчетЖКХ, заносятся 3 позиции это газ, ток, водканал, все прочитывается на поле ввода по позициям,
хочу что бы итоговые суммы позиций выводились при проведении документа из табличной части в реквизиты

как это сделать помогите плиз?

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

УчетЖКХ.odt

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

Ответы

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

Свернуть все

2. zuxelzz 01.12.18 23:08 Сейчас в теме

Сделай в модуле объекта документа, в процедуре ПередЗаписью нужный алгоритм - обходи табличную часть им записывай суммы в нужные реквизит.

3. user1100994 02.12.18 16:58 Сейчас в теме

(2)Добрый день!
Извините я новичок в этом я смог сделать только такой алгоритм, он выводит сумму при проводке в одну строку»Итоговая сумма газа», а как сделать чтобы ток, водканал попадали в свою позицию я не знаю, подскажите пожалуйста.

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
	
	  ИтоговаяСуммаГаза = 0;
	  	  
	  Для Каждого СтрокаТЧ ИЗ УчетЗаМесяц Цикл
		 ИтоговаяСуммаГаза = ИтоговаяСуммаГаза + СтрокаТЧ.СуммаЗаМесяц;
	 КонецЦикла
	 
	
КонецПроцедуры

Показать

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

УчетЖКХ02.docx

4. Leoon 3 02.12.18 23:58 Сейчас в теме

ИтоговаяСуммаГаза = 0; 
ИтоговаяСуммаТока = 0;
ИтоговаяСуммаВодоконал = 0;
НомГаз  = Справочник.Номенклатура.НайтиПоНаименованию("Газ", Истина);
//Если объекты предопределены, тогда поиск будет выглядеть иначе
//Например НомГаз  = Справочник.Номенклатура.Газ;
НомТок  = Справочник.Номенклатура.НайтиПоНаименованию("Ток", Истина);
НомВодоконал = Справочник.Номенклатура.НайтиПоНаименованию("Водоконал", Истина);

Для Каждого СтрокаТЧ ИЗ УчетЗаМесяц Цикл 
 Если СтрокаТЧ.Номенклатура = НомГаз Тогда
   ИтоговаяСуммаГаза = ИтоговаяСуммаГаза + СтрокаТЧ.СуммаЗаМесяц; 
 ИначеЕсли СтрокаТЧ.Номенклатура = НомТок Тогда
   ИтоговаяСуммаТока = ИтоговаяСуммаТока + СтрокаТЧ.СуммаЗаМесяц;
 ИначеЕсли СтрокаТЧ.Номенклатура = НомВодоконал Тогда
   ИтоговаяСуммаВодоконал = ИтоговаяСуммаВодоконал + СтрокаТЧ.СуммаЗаМесяц;
 КонецЕсли;
КонецЦикла

Показать

После чего еще нужно присвоить этим реквизитам значения переменных...
Не знаю, какая у Вас конфикурация, предпологаю что там использован справочник номенклатура.

5. user1100994 03.12.18 00:34 Сейчас в теме

ИтоговаяСуммаГаза = 0; 
ИтоговаяСуммаТока = 0;
ИтоговаяСуммаВодоконал = 0;
НомГаз = Справочник.НоменклатураЖКХ.Газ;
//Если объекты предопределены, тогда поиск будет выглядеть иначе
//Например НомГаз  = Справочник.Номенклатура.Газ;
НомТок = Справочник.НоменклатураЖКХ.Ток;
НомВодоконал = Справочник.НоменклатураЖКХ.Водконал;

Для Каждого СтрокаТЧ ИЗ УчетЗаМесяц Цикл 
 Если СтрокаТЧ.Номенклатура = НомГаз Тогда
   ИтоговаяСуммаГаза = ИтоговаяСуммаГаза + СтрокаТЧ.СуммаЗаМесяц; 
 ИначеЕсли СтрокаТЧ.Номенклатура = НомТок Тогда
   ИтоговаяСуммаТока = ИтоговаяСуммаТока + СтрокаТЧ.СуммаЗаМесяц;
 ИначеЕсли СтрокаТЧ.Номенклатура = НомВодоконал Тогда
   ИтоговаяСуммаВодоконал = ИтоговаяСуммаВодоконал + СтрокаТЧ.СуммаЗаМесяц;
 КонецЕсли;
КонецЦикла

Показать

{Документ.УчетЖКХ.МодульОбъекта(53,10)}: Переменная не определена (Справочник)
НомГаз = <<?>>Справочник.НоменклатураЖКХ.Газ; (Проверка: Сервер)
{Документ.УчетЖКХ.МодульОбъекта(56,10)}: Переменная не определена (Справочник)
НомТок = <<?>>Справочник.НоменклатураЖКХ.Ток; (Проверка: Сервер)
{Документ.УчетЖКХ.МодульОбъекта(57,16)}: Переменная не определена (Справочник)
НомВодоконал = <<?>>Справочник.НоменклатураЖКХ.Водконал; (Проверка: Сервер)

Выдает такую ошибку

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

УчетЖКХ03.docx

6. user1100994 03.12.18 01:30 Сейчас в теме

Ошибку нашел

Вместо Справочник.Номенк надобыло Справочники буквы и не хватало
вместо Водоконал Водканал

при проведении выдает

Ошибка при выполнении обработчика - 'ПередЗаписью'
по причине:
{Документ.УчетЖКХ.МодульОбъекта(52)}: Поле объекта не обнаружено (Газ)
НомГаз = Справочники.НоменклатураЖКХ.Газ;

7. Bene_Valete 190 03.12.18 03:14 Сейчас в теме

(6) Проверяйте себя следующим образом:
Пишите в коде "НомГаз = Справочники.НоменклатураЖКХ." и поставив курсор после точки, т.е. в конце строки, нажмите CTRL - пробел. Выйдет список доступных элементов и методов. Если нужного элемента в списке нет, значит он не предопределенный и его нужно получать другим способом, например по наименованию

НомГаз  = Справочник.Номенклатура.НайтиПоНаименованию("Газ", Истина);

Если что, список предопределенных элементов находится в настройках справочника, там же он редактируется. "Водоканал" правильно :)

8. user1100994 03.12.18 14:10 Сейчас в теме

Спасибо Всем за помощь и просвещение.

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

E-mail: