Создание Temp-таблицы с использованием имени таблицы из выпадающего списка 4gl, Open Edge

Question

У меня есть одно поле со списком с именами всех таблиц. Внутри одной процедуры я хочу получить значение из поля со списком (то есть имя таблицы) и хочу создать временную таблицу для этого динамически .. Нужна помощь в этом, пожалуйста ..

Answer 1

Учитывая, что у вас есть дескриптор вашего ComboBox-Widget, вы можете динамически создать новую временную таблицу, например:

DEF VAR ttH AS HANDLE.
CREATE TEMP-TABLE ttH.
ttH:CREATE-LIKE(ComboBoxWidgetHandle:SCREEN-VALUE).

Теперь он берет ScreenValue виджета ComboBox и использует метод CREATE-LIKE дескриптора объекта TempTable для создания TempTable с точно такими же полями, что и таблица в базе данных. Это работает только в том случае, если ComboBoxWidgetHandle: SCREEN-VALUE точно совпадает с именем таблицы в базе данных, например, «Клиент» в SportsDB.