как перечислить все базы данных в progress-4gl 9.1 D? - PullRequest
0 голосов
/ 19 мая 2011

Я пытаюсь получить все базы данных, как в DataDictionary, но программным способом!Это возможно?

1 Ответ

6 голосов
/ 20 мая 2011
DEFINE VARIABLE iDatabase AS INTEGER NO-UNDO.

REPEAT iDatabase = 1 TO NUM-DBS:
    DISPLAY LDBNAME(iDatabase) .
END.

LDBNAME возвращает логическое имя базы данных.Вы также можете использовать PDBNAME для получения физического имени.

Информация о таблицах, индексах и т. Д. Может быть получена из таблиц виртуальных системных таблиц (VST) (с префиксом подчеркивания).Примеры можно найти в Базе знаний Progress (например, запись P8005).

...