Имя: Пароль:
1C
1С v8
Формирование проводок
0 revril
 
20.12.11
14:07
Добрый день!В документе есть таблЧасть, нужно формировать проводки по каждой строке!
Для каждого ТекСтрока из ВозвратТЧ Цикл
Движения.Хозрасчетный.Записывать = Истина;
Движения.Хозрасчетный.Очистить();        
Движение = Движения.Хозрасчетный.Добавить();        
Если (НачВвод = истина) Тогда      
Движения.Хозрасчетный.Записывать = Истина;
Движения.Хозрасчетный.Очистить();        
Движение = Движения.Хозрасчетный.Добавить();
Движение.СчетДт = ПланыСчетов.Хозрасчетный.ВозвратСтраховыхПремийПоДоговорамСтрахованияВРуб;
Движение.СчетКт = ПланыСчетов.Хозрасчетный.Вспомогательный;
Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидыСтрахования] = ТекСтрока.ВидСтрахования;
Движение.Организация = Организация;
Движение.Период = Дата;    
КонецЕсли;
КонецЦикла;

Но записывает только последнюю строку табличной части!Подскажите как сделать чтобы все записи попадали?
1 zbv
 
20.12.11
14:08
Движения.Хозрасчетный.Очистить();  - вот это убери из цикла
2 Evpatiy
 
20.12.11
14:09
(1) ЗлыеБудни копипаста :D
3 revril
 
20.12.11
14:10
:D
огромное спасибо))что то я сразу не заметила!
4 Ненавижу 1С
 
гуру
20.12.11
14:11
(3) фотка зачет ))