0
paderub
15.08.14
✎
16:18
|
Всем привет!
1С:Предприятие 8.2 (8.2.19.80)
Бухгалтерия государственного учреждения, редакция 1.0 (1.0.24.2)
Делаю загрузку платежных поручений из УРМ в 1С, создаю программно документы Кассовое выбытие. Заполняю все обязательные реквизиты, прописываю "док.ЗаполнитьДанныеДляБюджетногоУчета();", оставляю постой только реквизит "Счет кредита" и табличную часть, записываю. При открытии записанного документа список выбора поля "Счет кредита" пуст, не помогает даже перевыбор реквизитов Учреждение и Лицевой счет. Насколько Я понимаю, ему не хватает каких-то скрытых реквизитов или параметров. Если прописать "док.ЗаполнитьСписокОграниченийПоЛицевомуСчету();", то выскакивает ошибка:
{Документ.КассовоеВыбытие.МодульОбъекта(95)}: Значение не является значением объектного типа (СписокСчетовКредита)
Если ДополнительныеСвойстваОперации.СписокСчетовКредита.Количество() > 0 И ПолучитьЛокальнуюПеременную("СписокСчетовДвижений").Количество() > 0 Тогда
Вот весь код процедуры записи.
док = Документы.КассовоеВыбытие.СоздатьДокумент();
док.Дата = стр.Дата;
док.Контрагент = стр.Контрагент.Ссылка;
док.ДатаПервичногоДокумента = стр.Дата;
док.НомерПервичногоДокумента = стр.Номер;
док.СуммаДокумента = стр.Сумма;
док.СуммаДокументаВВалюте = стр.Сумма;
док.Комментарий = стр.Назначение;
док.ВалютаДокумента = Справочники.Валюты.НайтиПоКоду("643").Ссылка;
док.Кратность = 1;
док.Курс = 1;
док.ВидОперации = Справочники.ВидыОпераций.НайтиПоНаименованию("Оплата поставщикам (302 10, 20, 30, 70, 90)").Ссылка;
//док.СчетКредита = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.05");
док.Учреждение = стр.Учреждение.Ссылка;
счета = Справочники.ЛицевыеСчета.Выбрать(,док.Учреждение);
Если счета.Следующий() Тогда
док.ЛицевойСчет = счета.Ссылка;
//док.ЗаполнитьСписокОграниченийПоЛицевомуСчету();
КонецЕсли;
док.ЗаполнитьДанныеДляБюджетногоУчета();
док.Записать();
|
|