1С77
Имеется процедура в документе:

Процедура Клиент()          
   
СпрКлиент                                = СоздатьОбъект("Справочник.Клиенты");  
СпрКлиент.Новый();  
СпрКлиент.Наименование    = Получатель1;
СпрКлиент.ЕГРПОУ                = Получатель1_Код;    
СпрКлиент.Полн_Наим            = Получатель1;  
СпрКлиент.Банк                    = Получатель1_Банк;  
СпрКлиент.Счет                    = Получатель1_Счет;    
СпрКлиент.МФО                        = Получатель1_Банк_МФО;
СпрКлиент.Город_Банк        = Получатель1_Банк_Город;

СпрКлиент.Записать();                    

КонецПроцедуры

Вопрос: Как перед записью проверить на существование клиента, сравнив заполенение реквизита справочника .ЕГРПОУ и текстового поля документа Получатель1_Код. Если совпадает - предупредить, если пустой реквизит, аналогично сравнить .Наименование и Получатель1?

Если

найтипореквизиту
перебор
запрос

НайтиПоРеквизиту() = 1

Тольок флажок "сортировка" на реквизите справочника должен стоять.

Хм...
   
СпрКлиент                                = СоздатьОбъект("Справочник.Клиенты");  
СпрКлиент.Новый();  

//Поиск по реквизиту НАЧАЛО

СпрКлиент.НайтиПоРеквизиту("ЕГРПОУ", Получатель1_Код, 1);
Если СпрКлиент.Выбран() > 0 Тогда
Сообщить("Клиент существует")
 Иначе

СпрКлиент.Наименование    = Получатель1;
СпрКлиент.ЕГРПОУ                = Получатель1_Код;    
СпрКлиент.Полн_Наим            = Получатель1;  
СпрКлиент.Банк                    = Получатель1_Банк;  
СпрКлиент.Счет                    = Получатель1_Счет;    
СпрКлиент.МФО                        = Получатель1_Банк_МФО;
СпрКлиент.Город_Банк        = Получатель1_Банк_Город;

КонецЕсли;

// Поиск по реквизиту КОНЕЦ

СпрКлиент.Записать();                    

Так должно быть?

Можно и так, можно и

Если СпрКлиент.НайтиПоРеквизиту("ЕГРПОУ", Получатель1_Код, 1) = 1 Тогда
// нашли
Иначе
// не нашли
// новый
СпрКлиент.Новый();
........
СпрКлиент.Записать();
КонецЕсли ;

(6)+ как в (5) Не надо так делать.
СпрКлиент  = СоздатьОбъект("Справочник.Клиенты");  
//СпрКлиент.Новый();

жалуется на "Неверное имя реквизита"

(8) Смотри (4).

флаг установлен -- "Сортировка" + "Отбор за реквизитом". Об этом я знаю, но всё же ошибка

мож у кого есть похожий пример?

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

в НайтиПоРеквизиту в названии реквизита ошибка?

Языком оригинала:
ДовКлієнт.НайтиПоРеквизиту(Код_ЄДРПОУ, Код1, 1);
{Документ.ПД.Форма.Модуль(143)}: Невірне ім'я реквізита!

Процедура языком оригинала:

Процедура Клієнт()          
   
ДовКлієнт                    = СоздатьОбъект("Справочник.Клієнти");  

Код_ЄДРПОУ = ДовКлієнт.ЄДРПОУ;
Код1 =  Одержувач1_Код;


ДовКлієнт.НайтиПоРеквизиту(Код_ЄДРПОУ, Код1, 1);
Если ДовКлієнт.Выбран() > 0 Тогда
Сообщить("Клиент существует")
 Иначе
ДовКлієнт.Новый();  
ДовКлієнт.Наименование        = Одержувач1;
ДовКлієнт.ЄДРПОУ            = Одержувач1_Код;    
ДовКлієнт.Повна_Назва        = Одержувач1;  
ДовКлієнт.Банк                = Одержувач1_Банк;  
ДовКлієнт.Рахунок            = Одержувач1_Рахунок;    
ДовКлієнт.МФО                = Одержувач1_Банк_МФО;
ДовКлієнт.Місто_Банк        = Одержувач1_Банк_Місто;

ДовКлієнт.Записать();                    
                                                     

КонецЕсли;
КонецПроцедуры

ДовКлієнт.НайтиПоРеквизиту("ЄДРПОУ", Код1, 1)

Закоментируй
//Код_ЄДРПОУ = ДовКлієнт.ЄДРПОУ;

Тебе ж не значение надо, а имя реквизита, тем более, что в этот момент он еще не спозиционирован.

Все, понял "ЄДРПОУ". 1-я часть вопроса снята. осталась вторая:

"если пустой реквизит, аналогично сравнить .Наименование и Получатель1?"

НайтиПоНаименованию();

//ДовКлієнт.НайтиПоРеквизиту(Код_ЄДРПОУ, Код1, 1);
Если ДовКлієнт.НайтиПоРеквизиту("ЄДРПОУ", Код1, 1) = 1 Тогда
Сообщить("Клиент существует")
ИначеЕсли ДовКлієнт.НайтиПоНаименованию(СокрЛП(Получатель1), 0, 1) = 1 Тогда
// последний параметр смотри какой тебе надо
Сообщить("Клиент существует");
 Иначе
ДовКлієнт.Новый();  
ДовКлієнт.Наименование         = Одержувач1;
ДовКлієнт.ЄДРПОУ            = Одержувач1_Код;    
ДовКлієнт.Повна_Назва         = Одержувач1;  
ДовКлієнт.Банк                 = Одержувач1_Банк;  
ДовКлієнт.Рахунок            = Одержувач1_Рахунок;    
ДовКлієнт.МФО                = Одержувач1_Банк_МФО;
ДовКлієнт.Місто_Банк        = Одержувач1_Банк_Місто;

ДовКлієнт.Записать();                    
                                                     

КонецЕсли;

Получатель1 -> Одержувач1

понял. спасибо

я в конфиге перевёл правильно, просто, когда правил здесь, упустил. усё гуд!