DEFINE VARIABLE iDatabase AS INTEGER NO-UNDO.
REPEAT iDatabase = 1 TO NUM-DBS:
DISPLAY LDBNAME(iDatabase) .
END.
LDBNAME возвращает логическое имя базы данных.Вы также можете использовать PDBNAME для получения физического имени.
Информация о таблицах, индексах и т. Д. Может быть получена из таблиц виртуальных системных таблиц (VST) (с префиксом подчеркивания).Примеры можно найти в Базе знаний Progress (например, запись P8005).