Возвращает значение "истина" (.T.), если указанная база данных открыта.

Синтаксис:

DBUSED(cDatabaseName)

Параметры:
cDatabaseName
Задает имя базы данных, для которой функция DBUSED( ) возвращает логическое значение, указывающее, открыта ли эта база данных.

Результат:
Логический.

Комментарии:
Функция DBUSED( ) возвращает значение "истина" (.T.), если указанная база данных открыта, в противном случае возвращается "ложь" (.F.).

Пример:

* В следующем примере открывается база данных TESTDATA database, а
* затем с помощью функции DBUSED( ) выясняется, открыты ли базы
* данных TESTDATA и TEST.
CLOSE DATABASES
OPEN DATABASE (SYS(2004) + "samples\data\testdata")

CLEAR
? 'Testdata database open? '
?? DBUSED('testdata')	  && Displays .T.
? 'Test database open? '
?? DBUSED('test')	  && Displays .F.