====== 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 поля в якому знайдено посилання (як задано в конфігураторі) |