8.х ОБМЕН Проблема выгрузки приходников из УТ (8.0) в УСН (7.7) через OLE

Тема в разделе "Обмен данными в "1С:Предприятие 8"", создана пользователем vithak, 6 июн 2008.

  1. TopicStarter Overlay
    vithak
    Offline

    vithak

    Регистрация:
    6 июн 2008
    Сообщения:
    1
    Симпатии:
    0
    Баллы:
    1
    Есть код для выгрузки приходников из УТ в УСН:
    ПриходныйКассовыйОрдер = Результат.Документ;
    ПриходныйКассовыйОрдер77 = База77.CreateObject("Документ.ПриходныйОрдер");
    Контрагенты77 = База77.CreateObject("Справочник.Контрагенты");
    ВидПостДенежныхСредствДляНУ77 = База77.CreateObject("Перечисление.ВидПостДенежныхСредствДляНУ.НеПринимаемые");
    ДвиженияДенежныхСредств77 = База77.CreateObject("Справочник.ДвиженияДенежныхСредств");
    Фирма77 = База77.CreateObject("Справочник.Контрагенты");
    Счет77 = База77.CreateObject("Счет.Основной");
    Фирма77.НайтиПоНаименованию("Название фирмы");
    Контрагенты77.НайтиПоНаименованию(ПриходныйКассовыйОрдер.Контрагент.Наименование);
    ДвиженияДенежныхСредств77.НайтиПоНаименованию("Оплата покупателя");
    ПриходныйКассовыйОрдер77.Новый();
    ПриходныйКассовыйОрдер77.ДатаДок = ПриходныйКассовыйОрдер.Дата;
    ПриходныйКассовыйОрдер77.Сумма = ПриходныйКассовыйОрдер.СуммаДокумента;
    ПриходныйКассовыйОрдер77.ФормироватьПроводки = 1;
    Счет77.НайтиПоКоду("62.2");
    ПриходныйКассовыйОрдер77.КоррСчет = Счет77.ТекущийСчет();
    ПриходныйКассовыйОрдер77.ДляНУ = ВидПостДенежныхСредствДляНУ77;
    ПриходныйКассовыйОрдер77.Субконто1 = Контрагенты77.ТекущийЭлемент();
    ПриходныйКассовыйОрдер77.Субконто2 = Контрагенты77.ОсновнойДоговор;
    ПриходныйКассовыйОрдер77.Субконто3 = Фирма77.ОсновнойДоговор;
    ПриходныйКассовыйОрдер77.ПринятоОт = Контрагенты77.ТекущийЭлемент();
    ПриходныйКассовыйОрдер77.ДвижениеДенежныхСредств = ДвиженияДенежныхСредств77.ТекущийЭлемент();
    ПриходныйКассовыйОрдер77.Записать();
    Документ нормально создаётся. Реквизиты копируются кроме Субконто1, Субконто2, Субконто3. Эти реквизиты в 77 неопределённого типа. Каким образом сменить их тип через OLE?

Поделиться этой страницей