Имя: Пароль:
1C
1С v8
Подскажите код, чтобы СуммаНУ = СуммеБУ
,
0 листопад
 
17.11.11
17:32
БП 2.0.28.3
Помогите написать обработку, которая тупо идет по табличной части Ввода остатков и ставит СуммуНУ = СуммеБУ, а ВР и ПР очищает.
1 vyaz
 
17.11.11
17:33
СуммаНУ = СуммеБУ;
ВР = 0;
ПР = 0;
2 листопад
 
17.11.11
17:37
(1) Это понятно. Как перебрать табл.часть Ввода остатков и проставить СуммаНУ = СуммеБУ
3 acsent
 
17.11.11
17:37
там во вводе остатков стопицот табличных частей
4 IamAlexy
 
17.11.11
17:37
для каждого строка из таблчастьвводаостатков цикл

бла бла бла


конеццикла


где то так
5 acsent
 
17.11.11
17:38
и везде сумма ну по разному ))
6 листопад
 
17.11.11
17:45
(3) Совершенно верно!
Конкретизирую: как добраться до табличной части раздела "Материалы (счет10)" вкладка "Спецодежда и спецоснастка в эксплуатации (счет 10.11)"???
7 vyaz
 
17.11.11
17:54
мпзприобретенные
8 vyaz
 
17.11.11
17:57
+7
док = Документы.ВводНачальныхОстатков.НайтиПоНомеру();
Для Каждого строкаТЧ Из док.МПЗПриобретенные Цикл
   строкаТЧ.Сумма =
9 vyaz
 
17.11.11
17:58
вот народ левивый пошел... но это хорошо, мне работы больше)))
10 листопад
 
17.11.11
17:59
(8) спасибо, щас попробую...
11 листопад
 
18.11.11
11:43
На форме разместила поле ввода (Докум), где указываю нужный для обработки документ. Документ находится, но в цикл не заходит, выдает сообщение:
Обрабатываю документ под номером СКФ00000062
Документ не найден!

Вот мой код:


Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   СсылкаДок = Документы.ВводНачальныхОстатков.НайтиПоНомеру(Докум.Номер, ТекущаяДата());
   Сообщить ("Обрабатываю документ под номером " + Докум.Номер);
   
   Если НЕ СсылкаДок.Пустая() Тогда
       ОбъектДок = СсылкаДок.ПолучитьОбъект();    
       Для каждого СтрокаТЧ Из  ОбъектДок.МПЗПриобретенные Цикл
           НоваяСуммаНУ = СтрокаТЧ.Сумма;
           Сообщить(СтрокаТЧ.НомерСтрокиТЧ + "  СуммаБУ="+ СтрокаТЧ.СуммаБУ +  "  СуммаНУ="+ СтрокаТЧ.СуммаНУ+  "  ПР" + СтрокаТЧ.СуммаПР+  "  ВР" + СтрокаТЧ.СуммаВР);
           СтрокаТЧ.СуммаНУ = НоваяСуммаНУ;
           СтрокаТЧ.СуммаВР = 0;
           СтрокаТЧ.СуммаПР = 0;
       КонецЦикла;
       ОбъектДок.Записать();
       Сообщить ("Документ записан!");
   Иначе
       Сообщить("Документ не найден!!!")
   КонецЕсли;
   
КонецПроцедуры
12 ssh2006
 
18.11.11
11:45
дата документа какая?
13 Валерьевна
 
18.11.11
11:48
"универсальный подбор и обработка объектов" с диска ИТС, выбрать по ссылке нужный документ. Произвольный алгоритм.
Для каждого строка из объект.[ИмяТабличнойчасти] Цикл
Строка.СуммаНУ= Строка.СуммаБУ
КонецЕсли;
Объект.Записать(,РежимПРоведенияДокумента.Неоперативный);
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший