ДокП.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование);
       Если НЕ ЗначениеЗаполнено(ДокП.Контрагент) Тогда
           Сообщить("Не найден контрагент " + ТекДок.Контрагент.Наименование, СтатусСообщения.Важное);
       Иначе
           
           ДокП.ДоговорКонтрагента = ДокП.Контрагент.ОсновнойДоговорКонтрагента;

Не находит основной договор... Почему?

"ДокП.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование);" ужаснах

конфа какая?
(1)+1

(1) почему ужас?
(2)БП

а почему бы не Справочники.Контрагенты.НайтиПоКоду(ТекДок.Контрагент.Код) ?

Там всего 1 организация

ну вот испугали!

никакой не ужас - нормальный код для ларька, там етих контрагентов всего пара "ООО Сидр" и ОАО "Сивуха"

(4) Контрагент заполняет нормально а вот Основной договор не тянет

(0) Значит он не основной.

Подскажите по делу плиз

(7) а договор у контрагента основной точно есть ?

(8) открыл справочник основной выставлен

в БП у контрика есть такой реквизит "ОсновнойДоговорКонтрагента"

(10) да, точно

до меня только щас дошёл смысл строчки
ДокП.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование);

(1) +100500

(13) скрин давай

(14) итого +100501

(0) Как найти контрагента?
Контрагент=ТекДок.Контрагент;
Как найти договор этого контрагента?
Договор=Контрагент.ОсновнойДоговорКонтрагента;
Как заполнить ДокП? Если это ссылка, надо получить объект:
Об=ДокП.ПолучитьОбъект();
и потом
Об.Контрагент=Контрагент;
Об.ДоговорКонтрагента=Договор;
Если это объект, то сразу
ДокП.Контрагент=Контрагент; ДокП.ДоговорКонтрагента=Договор.

ДокП.ДоговорКонтрагента = ДокП.Контрагент.ОсновнойДоговорКонтрагента;


меня смущает идентфикатор ДокП и весь оператор, а ведь неспроста это, думаю от лукавого

ДокП.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование);

ДокП.ДоговорКонтрагента = ДокП.Контрагент.ОсновнойДоговорКонтрагента;

А че так не написал?

ДокП.ДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию(ДокП.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование).ОсновнойДоговорКонтрагента.Наименование,,,Справочники.Контрагенты.НайтиПоНаименованию(ТекДок.Контрагент.Наименование));

В контрагенте могут быть задвоения, спс за подсказку, буду искать по коду

(20) вот ты... это тонкое издевательство было
ТекДок.Контрагент - вот твой контрагент. гарантированно уникальный

(19) Наименования разные у основных договоров

(17) "Если это объект, то сразу "  не объект, а ссылка на объект

а можно как-нибудь тот код что используется в поступление товаров и услуг при изменение контрагента переделать и воткнуть в мой?

(24) в (17) я тебе ответила

Дык у контрагента же реквизит есть основной договор...

Не находит если он не задан. В контрагента зайди и посмотри выделен ли какой-нть договор жирным шрифтом, если нет, то назначь и проверь работу кода.