G. The ABF Demo Program : 4GL Code for the Sample Application : List Frame
 
Share this page                  
List Frame
The List frame is a pop-up form that allows the user to enter a value from a list generated by a query to the database. The table field in the form is filled by passing an SQL query as a parameter in the call to this frame.
/* list.osq */
/* list all managers or all job titles */
on Select_value, key frskey4 =
begin
    if vals.val IS NULL then
        message 'No value selected.';
    else
        message vals.val + ' selected.';
    endif;
    return vals.val;
end
'No_selection', key frskey3 =
begin
    message 'No value selected.';
    return ";
end
'4GL', key frskey16 =
begin
    helpfile 'List Frame 4GL'
        'USER:[JOE.ABFDEMO]list.osq');
end
on timeout = 
begin
    callproc timer_off;
end