0
antotti
01.12.15
✎
12:38
|
Добрый день.Есть Бухгалтерия 3.0, УФ. Пытаюсь создать операцию на основание платежки. В обработке заполнения документа "Операция" такой код:
Если ТипЗнч(ДанныеЗаполнения) = Тип("НужныйМнеТипДокумента") Тогда
Организация = ДанныеЗаполнения.Организация;
Ответственный = ДанныеЗаполнения.Ответственный;
СуммаОперации = ДанныеЗаполнения.СуммаДокумента;
Дата = ДанныеЗаполнения.Дата;
ЭтотОбъект.Записать();
СсылкаНаДокумент = ЭтотОбъект.Ссылка;
//
НаборЗаписей = ЭтотОбъект.Движения.Хозрасчетный;
НаборЗаписей.Отбор.Регистратор.Установить(СсылкаНаДокумент);
НаборЗаписей.Записывать = Истина;
ТекПроводка= НаборЗаписей.Добавить();
ТекПроводка.Регистратор = СсылкаНаДокумент;
ТекПроводка.Период = ДанныеЗаполнения.Дата;
ТекПроводка.Организация = ДанныеЗаполнения.Организация;
ТекПроводка.Содержание = "";
ТекПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("57.01");
ТекПроводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.СтатьиДвиженияДенежныхСредств] = ДанныеЗаполнения.СтатьяДвиженияДенежныхСредств;
ТекПроводка.СчетКт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("62.02");
ТекПроводка.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты] = ДанныеЗаполнения.Контрагент;
ТекПроводка.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры] = ДанныеЗаполнения.ДоговорКонтрагента;
ТекПроводка.Сумма = ДанныеЗаполнения.СуммаДокумента;
НаборЗаписей.Записать();
ЭтотОбъект.Записать();
КонецЕсли;
Беда в том, что после ввода на основание, открывается документ Операция, у которого пустая таблица проводок, но если его закрыть и открыть - то все в порядке. Видимо данные не отображаются почему то... Что сделать чтобы их было видно?
|
|