|
Как в подписке на событие добавить движение по регистру? | ☑ | ||
---|---|---|---|---|
0
firelli87
14.02.12
✎
12:39
|
приветствую всех! Ка 1.1.18. В подписку на событие "После проведения документа передача материалов в эксплуатацию" добавляю движения с проводками по забалансовым счетам. К сожалению эти движения затирают движения документа по 10 счету. Как добавить движения, а не затереть?
|
|||
1
ДенисЧ
14.02.12
✎
12:39
|
Прочитать()
Записать(Ложь) |
|||
2
PR
14.02.12
✎
12:40
|
Прочитать, добавить, записать
|
|||
3
Naumov
14.02.12
✎
12:43
|
.Записать(ложь)
|
|||
4
firelli87
14.02.12
✎
12:49
|
Так. Интересно теперь чуть подробнее. Сначала что я считываю процедурой: прочитать()? Записать() я не использую, у меня добавляются проводки:
Проводки = Источник.Движения.Хозрасчетный; Для Каждого Строка Из ТаблицаЗатратМЦ Цикл Проводка = Проводки.Добавить(); Проводка.Период = Источник.Дата; Проводка.Организация = Источник.Организация; Проводка.СчетДт = Строка.СчетМЦ; БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Склады", Источник.Склад); БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Номенклатура", Строка.Номенклатура); БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "РаботникиОрганизации", Строка.ФизЛицо); Проводка.КоличествоДт = Строка.Количество; Проводка.Сумма = Строка.Сумма; КонецЦикла; |
|||
5
Spieluhr
14.02.12
✎
12:53
|
(4)Проводки.Записать();
забыл |
|||
6
Tazuya
14.02.12
✎
12:56
|
НаборЗаписей = РегистрыНакопления.ПродажиСебестоимость.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Источник.Ссылка); стр = Результат.Выбрать(); Пока стр.Следующий() Цикл Движение = НаборЗаписей.Добавить(); Движение.Регистратор = Источник.Ссылка; Движение.Период = Источник.дата; Движение.Номенклатура=стр.Номенклатура; Движение.ХарактеристикаНоменклатуры=стр.ХарактеристикаНоменклатуры; Движение.ЗаказПокупателя=""; Движение.Подразделение= Источник.Подразделение; Движение.Проект=""; Движение.Количество=стр.Количество; Движение.Стоимость=стр.Стоимость; Движение.СписаниеПартий=истина; Движение.ДокументДвижения=Источник.ссылка; Движение.ДокументДвиженияПериод=Источник.дата; КонецЦикла; НаборЗаписей.Записать(); |
|||
7
Scooter
14.02.12
✎
12:58
|
(6)Загрузить??? неа
|
|||
8
Scooter
14.02.12
✎
12:59
|
(7)+ ну или на крайняк заполнить значенияСв
|
|||
9
firelli87
14.02.12
✎
13:02
|
Понял ребята вконце цикла Проводки.Записать(ложь). Всем спасибо!
|
|||
10
Tazuya
14.02.12
✎
13:14
|
(8)согласен, что не оптимизировано, зато работает.
оплата была за время :-) |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |