Ingres 11.0 | Topframe Frame

Forms-Based Application Development Tools User Guide > Part 5: 4GL > Sample 4GL Application > Employee Application > Topframe Frame

Was this helpful?

Topframe Frame

The Topframe frame provides a table field menu to allow users to select the Employees frame or the Positions frame. The following figure shows the Topframe frame:

The table field is named "tf" in the 4GL source code; the table field columns are "frame" and "action."

Menu Operations

Topframe provides the following menu operations:

Menu Item	Function
Select	Calls the frame on whose name the cursor rests
Help	Displays information about this frame
End	Exits the application

4GL Source Code

The following is the UNIX 4GL source code for Topframe. Note the equivalent 4GL source code for other systems is nearly identical to this UNIX example. The only difference is the format of the helpfile pathname.

/*
** Frame: topframe
** Form: samp_topframe
** Source File: topframe.osq
** Description:
**
** Displays a read-only table field listing actions the user
** may perform; the user chooses one by positioning the cursor
** on the desired action and choosing 'Select'.
**
*/

initialize =
begin
    inittable tf read;
    loadtable tf ( frame = 'employees',
        action = 'browse or update employees and'
        + ' employee_histories tables' );
    loadtable tf ( frame = 'positions',
        action = 'browse or update positions table' );

    scroll tf to 1;
end

'Select' (explanation = 'Select a command'), key frskey4 =
begin
    callframe :tf[].frame;
end

'Help' (explanation = 'Display help for this frame'), key frskey1 =
begin
    helpfile ''
        '/m/corgi/supp60/employee/employee.hln';
end

'End' (explanation = 'Return to previous frame'), key frskey3 =
begin
    return;
end

Last modified date: 01/30/2023