v8: Программное изменение договора в документе

02.06.2012 23:05

Прочитано: 5066

Добрый вечер. Помогите пожалуйста кто чем может.
Ни как ни пойму в чем дело. Не могу изменить договор.

Код 1C v 8.х

 Док = Документы.ПлатежноеПоручениеВходящее.НайтиПоНомеру("МОС00000436", Дата(2011,1,13));

    Дог = Док.ПолучитьОбъект();

    Дог.ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("АУП193018");

    Дог.Контрагент = Справочники.Контрагенты.НайтиПоКоду("АУП005501");

    Дог.Ответственный = глТекущийПользователь;

    Дог.ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("АУП193018");    

    Дог.ПолучитьФорму().Открыть();

При этом Контрагент и ответственный именяются, а договор нет. (1С:бухгалтерия). Пожалуйста помогите.

Yandex

Возможно, вас также заинтересует

dcc3

03.06.2012 00:45

Ответ № 1

Все разобрался

Код 1C v 8.х

 

Док = Документы.ПлатежноеПоручениеВходящее.НайтиПоНомеру("МОС00000436", Дата(2011,1,13));

    Дог = Док.ПолучитьОбъект();

//надо заменить на

    Дог.РасшифровкаПлатежа[0].ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("АУП193018");

    Дог.Контрагент = Справочники.Контрагенты.НайтиПоКоду("АУП005501");

    Дог.Ответственный = глТекущийПользователь;

    Дог.ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("АУП193018");    

    Дог.ПолучитьФорму().Открыть();

Подсказка: Для выделения Кода используйте (в редакторе).