СпрДоговоры= СоздатьОбъект("Справочник.Договоры");
       
Если СпрДоговоры.НайтиЭлемент(ТекСпр.ОсновнойДоговор.ТекущийЭлемент())=1 Тогда
       Договор = СпрДоговоры.ТекущийЭлемент();
       КонецЕсли;

        Если ТипЗначение.Идентификатор() = "А1" Тогда
            Если СпрТипЦен.НайтиПоНаименованию("А1")=1 Тогда
                 Договор.ТипЦен = СпрТипЦен.ТекущийЭлемент();
Договор.Записать();
            КонецЕсли;

СпрДоговоры= СоздатьОбъект("Справочник.Договоры");
       
Если СпрДоговоры.НайтиЭлемент(ТекСпр.ОсновнойДоговор.ТекущийЭлемент())=1 Тогда
       КонецЕсли;

        Если ТипЗначение.Идентификатор() = "А1" Тогда
            Если СпрТипЦен.НайтиПоНаименованию("А1")=1 Тогда
                  СпрДоговоры.ТипЦен = СпрТипЦен.ТекущийЭлемент();
СпрДоговоры.Записать();
            КонецЕсли;

(0)+ все элементы найденны

Нельзя сохранить Текущийэлемент()
Можно сохранять только объекты созданные через создатьобъект()

спс