Имя: Пароль:
1C
1С v8
Помогите с правилами обмена между УТ 11 и БП 2.0
0 Tumakota
 
11.12.13
16:07
При выгрузке документа Списание безналичных ДС выдает ошибку на договор в КД захожу там прописан модуль

// Инициализируем структуру договора
Значение = Новый Структура;

// Реквизиты договора
Значение.Вставить("Ссылка");
Значение.Вставить("ВалютаВзаиморасчетов",        ОбъектКоллекции.ВалютаВзаиморасчетов);
Значение.Вставить("ВидДоговора",                Неопределено);
Значение.Вставить("Владелец",                    Источник.Контрагент);
Значение.Вставить("Организация",                Источник.Организация);
Значение.Вставить("РасчетыВУсловныхЕдиницах",     Неопределено);

// Дополнительные свойства договора
Значение.Вставить("ПартнерУТ11",                ОбъектКоллекции.Партнер);
Значение.Вставить("СоглашениеСКлиентомУТ11",    Неопределено);
Значение.Вставить("СоглашениеСПоставщикомУТ11",    Неопределено);
Значение.Вставить("СделкаСКлиентомУТ11",        Неопределено);
Значение.Вставить("ЗаказКлиентаУТ11",            Неопределено);
Значение.Вставить("ЗаказПоставщикуУТ11",        Неопределено);

Заказ = ОбъектКоллекции.Заказ;
Если ЗначениеЗаполнено(Заказ) Тогда
    
    // Определяем тип заказа, он может быть одним из следующих
    //    - ДокументСсылка.ЗаказПоставщику
    //    - ДокументСсылка.ПоступлениеТоваровУслуг
    //    - ДокументСсылка.ОтчетКомитенту
    //    - ДокументСсылка.ОтчетКомитентуОСписании
    //    - ДокументСсылка.ОтчетКомиссионера
    
    ТипЗаказа = ТипЗнч(Заказ);
    
    // Соглашение может быть получено для всех вариантов операции
    ДоговорКонтрагента = ОбщегоНазначения.ПолучитьЗначениеРеквизита(Заказ, "Договор");
    Если ТипЗнч(ДоговорКонтрагента) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда
        Значение.СоглашениеСПоставщикомУТ11 = ДоговорКонтрагента;
    ИначеЕсли ТипЗнч(ДоговорКонтрагента) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда
        Значение.СоглашениеСКлиентомУТ11 = ДоговорКонтрагента;
    КонецЕсли;
    
    // Для продолжения анализа операции, необходимо определить вид договора
    ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектКоллекции.Заказ, ДоговорКонтрагента, Источник.ХозяйственнаяОперация);
    Значение.ВидДоговора = ?(ЗначениеЗаполнено(ВидДоговора), ВидДоговора, "СПоставщиком");
    
    Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда
        // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е.
        Значение.РасчетыВУсловныхЕдиницах = Ложь;
    Иначе
        
        Если ЗначениеЗаполнено(ДоговорКонтрагента) Тогда
            Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(ДоговорКонтрагента);
        КонецЕсли;
        
        // Разделение по заказу идет, если в качестве заказа указан заказ поставщику
        Если ТипЗаказа = Тип("ДокументСсылка.ЗаказПоставщику") Тогда
            Значение.ЗаказПоставщикуУТ11 = Заказ;
        КонецЕсли;
        
    КонецЕсли;
        
Иначе
    Значение.ВидДоговора = "СПоставщиком";
КонецЕсли;    

Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда
    Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов;
КонецЕсли;

Сообщение об ошибке:


Ошибка в обработчике события ПередВыгрузкой (свойства)
    ПКО                    =  СБДС_ОплатаПоставщикуБезналичныеДС  (Документ: Поступление безналичных денежных средств)
    ПКС                    =  5  ( --> ДоговорКонтрагента)
    Объект                 =  Списание безналичных ДС 0Д00-000642 от 11.11.2013 12:00:04  (Списание безналичных ДС)
    СвойствоПриемника      =  ДоговорКонтрагента  (СправочникСсылка.ДоговорыКонтрагентов)
    КонвертируемоеЗначение =  Структура  (Структура)
    Обработчик             =  ПередВыгрузкойСвойства
    ОписаниеОшибки         =  Ошибка при вызове метода контекста (Выполнить): {(3, 2)}: Поле не найдено "Договор"
<<?>>Договор КАК Договор
    ПозицияМодуля          =  ОбщийМодуль.ОбщегоНазначения.Модуль(96)
    КодСообщения           =  55

Помогите исправить, очень срочно надо, остальное все работает нормально
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.