собственно сабж

   и  &НаСервере

Пытался применить штуку :
Функция ЕстьРеквизитОбъекта(Объект, ИмяРеквизита) Экспорт
    
    КлючУникальности   = Новый УникальныйИдентификатор;
    
    СтруктураРеквизита = Новый Структура(ИмяРеквизита, КлючУникальности);
    
    ЗаполнитьЗначенияСвойств(СтруктураРеквизита, Объект);
    
    Возврат СтруктураРеквизита[ИмяРеквизита] <> КлючУникальности;
    
КонецФункции


Но на сервере она не живет

(1) > Но на сервере она не живет
Живет

НЕ Объект.Метаданные().Реквизиты.Найти(ИмяРеквизита) = Неопределено
Так не работает?

Если Объект это из COM соединения, то и идентификатор и структуру надо создавать на той стороне
Вместо Новый
используем
Открытие.NewObject("");
т.е. в данной функции не хватает ссылки на "Открытие"

(3)

(1)КлючУникальности   = Новый УникальныйИдентификатор;  недоступно на сервере
(3) нет

(6) Доступно

Нехер бездумно копировать куски кода.
КлючУникальности - это реквизит формы. Объект - основной реквизит формы.

COMПодключение = Новый COMОбъект("V83.COMConnector");
COMОбъект = COMПодключение.Connect("File=""D:\1C\Проекты\TempBase8"";Usr=""Администратор (ОрловАВ)"";Pwd="""";");

Если COMОбъект.Метаданные.Документы.ПриобретениеТоваровУслуг.Реквизиты.Найти("Валюта") <> Неопределено Тогда
    Сообщить(НСтр("ru='Реквизит существует'"));
Иначе
    Сообщить(НСтр("ru='Реквизит отсутствует'"));
КонецЕсли;

// Если есть конкретный объект, например, найденный по номеру документ.
COMДокумент = COMОбъект.Документы.ПриобретениеТоваровУслуг.НайтиПоНомеру("ТД00-000003", '20180101');

// Вариант через метаданные.

Если COMДокумент.Метаданные().Реквизиты.Найти("Валюта") <> Неопределено Тогда
    Сообщить(НСтр("ru='Реквизит существует'"));
Иначе
    Сообщить(НСтр("ru='Реквизит отсутствует'"));
КонецЕсли;

// Вариант со заполнением структуры.

ИмяРеквизита = "Валюта";

COMКлюч = COMОбъект.NewObject("УникальныйИдентификатор");

COMСтруктура = COMОбъект.NewObject("Структура");
COMСтруктура.Вставить(ИмяРеквизита, COMКлюч);

COMОбъект.ЗаполнитьЗначенияСвойств(COMСтруктура, COMДокумент);

Если COMСтруктура[ИмяРеквизита] <> COMКлюч Тогда
    Сообщить(НСтр("ru='Реквизит существует'"));
Иначе
    Сообщить(НСтр("ru='Реквизит отсутствует'"));
КонецЕсли;

(6) КлючУникальности   = Новый УникальныйИдентификатор;  недоступно на сервере
недоступен на сервере ключ уникальности, т.к. - это реквизит формы, который недоступен на сервере. Используется другое имя переменной.
Например, просто
Ключ = Новый УникальныйИдентификатор

(10) Используется другое имя переменной = ИспользуЙТЕ другое имя переменной.

Хотя можно упростить проверку через структуру. Не обязательно объекты создавать на стороне COM объекта.

ИмяРеквизита = "Валюта";

Ключ = Новый УникальныйИдентификатор;
Структура = Новый Структура(ИмяРеквизита, Ключ);
ЗаполнитьЗначенияСвойств(Структура, COMДокумент);

Если Структура[ИмяРеквизита] <> Ключ Тогда
    Сообщить(НСтр("ru='Реквизит существует'"));
Иначе
    Сообщить(НСтр("ru='Реквизит отсутствует'"));
КонецЕсли;

Спасибо большое Маленький Друг . Все получилось
Я не просек что КлючУникальности

Вот функция все получилось :

&НаСервере
Функция ЕстьРеквизитCOMОбъекта(COMОбъект, ИмяРеквизита) Экспорт
    Ключ   = Новый УникальныйИдентификатор;
    Структура = Новый Структура(ИмяРеквизита, Ключ);
    ЗаполнитьЗначенияСвойств(Структура, COMОбъект);
    Возврат Структура[ИмяРеквизита] <> Ключ;
КонецФункции