Не найден объект расчетов для договора.

Всем доброго вечера.
Создаю документ ПриобретениеТоваровУслуг

  НовоеПоступление = Документы.ПриобретениеТоваровУслуг.СоздатьДокумент();
          НовоеПоступление.Дата = ТекущаяДата();
          НовоеПоступление.Партнер = Объект.Поставщик;
          НовоеПоступление.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаУПоставщика;
          НовоеПоступление.Организация = Объект.Организация;
      Если Объект.ВБ = Истина или Объект.Озон = Истина Тогда
          НовоеПоступление.Договор = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию("Закупка1", Истина,,);
      ИначеЕсли Объект.ЯндексМаркет = Истина Тогда
          НовоеПоступление.Договор = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию("Закупка2", Истина,,);
      КонецЕсли;
          НовоеПоступление.Склад = Объект.Склад;
          НовоеПоступление.ВалютаВзаиморасчетов = Справочники.Валюты.НайтиПоКоду("643");
          НовоеПоступление.Валюта = Справочники.Валюты.НайтиПоКоду("643");
          НовоеПоступление.СпособДоставки = Перечисления.СпособыДоставки.СиламиПоставщикаДоНашегоСклада;
          НовоеПоступление.ВариантПриемкиТоваров = Перечисления.ВариантыПриемкиТоваров.РазделенаТолькоПоНакладным;
          НовоеПоступление.ЗакупкаПодДеятельность = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяНДС;
          НовоеПоступление.ЦенаВключаетНДС = Истина;
          НовоеПоступление.НалогообложениеНДС = Перечисления.ТипыНалогообложенияНДС.ОблагаетсяНДСУПокупателя;


           НовоеПоступление.Записать();

При попытке проведения получаю сообщение "Не найден объект расчетов для договора Закупка1 (Или 2)

При этом, если создаю документ в ручную, с тем же договором, все ОК.

В чем может быть проблема?

Заранее благодарен за любой дельный совет