"Приходный кассовый ордер" + "Товары переданные"
☑
0
first_may
19.10.15
✎
20:31
Добрый вечер.
Конфигурация Комплексная автоматизация, редакция 1.1
Есть необходимость, при проведении документа ПКО делать запись в регистре "Товары переданные". В обработке проведения пишу:
НаборЗаписей = РегистрыНакопления.ТоварыПереданные.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Ссылка);
НоваяСтрока = НаборЗаписей.Добавить();
НоваяСтрока.Активность = Истина;
НоваяСтрока.Период = Ссылка.Дата;
НоваяСтрока.ВидДвижения = ВидДвиженияНакопления.Расход;
НоваяСтрока.Регистратор = Ссылка.Ссылка;
НоваяСтрока.ДоговорКонтрагента = СубконтоКт2;
НоваяСтрока.СтатусПередачи = Перечисления.СтатусыПолученияПередачиТоваров.ВозвратнаяТара;
НоваяСтрока.Номенклатура = СубконтоКт3;
НоваяСтрока.Контрагент = СубконтоКт1;
НоваяСтрока.Организация = Организация;
НоваяСтрока.Количество = Количество;
НоваяСтрока.СуммаВзаиморасчетов = СуммаДокумента;
НаборЗаписей.Записать();
Но после проведения в регистре нет записи. Подскажите пожалуйста, в чем ошибка?
1
ДенисЧ
19.10.15
✎
20:43
1. Как связаны ПКО и товары?
2. Движения надо использовать
2
first_may
19.10.15
✎
20:50
(1)
- Как связаны ПКО и товары - считаем, что оплачивают тару
- Движения надо использовать - это как?
3
first_may
19.10.15
✎
20:51
(1) тут
Процедура ДвиженияПоРегистрам(Режим, Отказ, Заголовок, СтруктураШапкиДокумента)
нет Движения
4
ДенисЧ
19.10.15
✎
21:03
(3) (2) Вон из профессии!
После тебя всех 1сников начнут называть тупыми...
5
first_may
19.10.15
✎
21:06
(4) ок
6
first_may
19.10.15
✎
21:15
(4) вот:
ТаблицаТоварыПереданные = Движения.ТоварыПереданные.ВыгрузитьКолонки();
СтрокаТоварыПереданные = ТаблицаТоварыПереданные.Добавить();
СтрокаТоварыПереданные.Регистратор = СтруктураШапкиДокумента.Ссылка;
СтрокаТоварыПереданные.Период = ДатаДвижений;
СтрокаТоварыПереданные.Организация = Организация;
СтрокаТоварыПереданные.СтатусПередачи = Перечисления.СтатусыПолученияПередачиТоваров.ВозвратнаяТара;
СтрокаТоварыПереданные.Количество = СтруктураШапкиДокумента.Ссылка.Количество;
СтрокаТоварыПереданные.СуммаВзаиморасчетов = СтруктураШапкиДокумента.Ссылка.СуммаДокумента;
СтрокаТоварыПереданные.Контрагент = СтруктураШапкиДокумента.Ссылка.СубконтоКт1;
СтрокаТоварыПереданные.ДоговорКонтрагента = СтруктураШапкиДокумента.Ссылка.СубконтоКт2;
СтрокаТоварыПереданные.Номенклатура = СтруктураШапкиДокумента.Ссылка.СубконтоКт3;
Движения.ТоварыПереданные.мТаблицаДвижений = ТаблицаТоварыПереданные;
Движения.ТоварыПереданные.ВыполнитьРасход();
Запись появилась. Спасибо.
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший