FindRef() Функція

Пошук посилань на об'єкт метаданих

tRet = FindRef(ID, [lRetCrs], [lNotEcho])

Повертане значення tRet Character - Ім'я курсору з інформацією про посилання, або Boolean - результат пошуку.

Параметри

ID	посилання на об'єкт метаданих
lRetCrs	Якщо .T. - функція повертає назву курсора з інформацією про знайдені посилання. По замовчанню .F.
lNotEcho	Якщо .T. - подавляє вивід в окно повідомлень MessageBox інформацію про знайдені посилання. По замовчанню .F.

Приклад 1

If FindRef(The.MD.TP._IDZ.Value)
   MessageBox('Елемент не може бути видалений', 16, 'Повідомлення')
EndIf

Приклад 2

lcCrsRef = FindRef(The.MD.TP._IDZ.Value,.T.,.T.)
MW.DoTbl(lcCrsRef,1)

Примітки
Якщо функція повертає ім'я курсора з інформацією про знайдені посилання структура курсора буде слідуюча:

Реквізит	Тип	Найменування	Опис
OBJ	C100	Назва	Повна назва обьекта в якому знайдено посилання (як задано в конфігураторі)
NOBJ	C100	Назва	Скорочена назва обьекта в якому знайдено посилання (як задано в конфігураторі)
KOD	C10	Код
FIELD	C10	Назва	Назва поля в якому знайдено посилання (як задано в конфігураторі)
FORMULA	C200	Команда	Команда SmartFox яка відкриває обь'ект з знайденим посиланням
SORT	C100	Вираз	Вираз по якому відсортовано результат (як правило спочатку дата)
ID	C7	ID	ID обь'екту в якому знайшли посилання
FLDNAME	C11	FPName	FPName поля в якому знайдено посилання (як задано в конфігураторі)

Smartfox