GML::LUM_FIND - Locate Look-up Control Index Number

Syntax

CALL "GML::LUM_FIND"

Description

This procedure locates the index number of a look-up control. When an event occurs on a list type control and variable GML.LUM_FLAG% is not equal to 0 (a look-up control is being displayed), the Look-Up Manager is called by executing the LUM_FIND procedure to find the index of the look-up control identified by the event ID and context. This procedure is also used to locate the index number of a look-up control. After execution of the procedure, variable GML_LUM.LU_SET% will contain the look-up control index number. A value of 0 indicates the event ID/context is not associated with a LUM look-up.

Example 1

Find a look-up index based on an event.

2400 GML_LUM.EVENT_ID%=EVENT.ID%
2410 GML_LUM.EVENT_CONTEXT%=EVENT.CONTEXT%
2420 CALL "GML::LUM_FIND"

Example 2

Find a look-up index based on a specific control ID and context.

2400 GML_LUM.EVENT_ID%=122
2410 GML_LUM.EVENT_CONTEXT%=1
2420 CALL "GML::LUM_FIND"