Имя: Пароль:
1C
1С v8
Программное создание в БГУ 1.0 документа кассовое выбытие
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");
        
        док.Учреждение = стр.Учреждение.Ссылка;
        счета = Справочники.ЛицевыеСчета.Выбрать(,док.Учреждение);
        Если счета.Следующий() Тогда
            док.ЛицевойСчет = счета.Ссылка;
            //док.ЗаполнитьСписокОграниченийПоЛицевомуСчету();
        КонецЕсли;
        док.ЗаполнитьДанныеДляБюджетногоУчета();
        док.Записать();
1 paderub
 
15.08.14
16:37
Проблема решена. Не тот Вид операции выбирался, их с таким наименованием много оказывается:)
2 paderub
 
15.08.14
16:38
Если перед кем-то стоит задача обмена между УРМ и 1С платежными поручениями - пишите, будем мучиться вместе:) [email protected]
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший