GML LUM PROCEDIMIENTO LUM_EVENT

Sintaxis
CALL "GML::LUM_EVENT"

Propósito:
Determinar si el lookup control perdió el enfoque, oculta el control como sea requerido.

Nota:
Este procedimiento es ejecutado cuando el valor de variable GML.LUM_FLAG% no es igual a 0, y otro evento de un list control o evento mouse (code=m) ocurrió. El Id evento es localizado en GML_LUM.EVENT_ID% y el contexto del evento es localizado en la variable GML_LUM.EVENT_CONTEXT%. El lookup manager es entonces llamado ejecutando el GML para determinar si el lookup control perdió el enfoque y oculta el control como es requerido.

Ejemplo:

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

GML LUM PROCEDIMIENTO LUM_FIND

Sintaxis
CALL "GML::LUM_FIND"

Propósito:
Localizar el número de índice del lookup control.

Nota:
Cuando un evento ocurre en una lista tipo control y la variable GML.LUM_FLAG% no es igual a 0 (un lookup control ha sido desplegado), el lookup manager es llamado ejecutando el procedimiento LUM_FIND para encontrar el índice del lookup control identificado por él ID evento y contexto. Este procedimiento es también usado para localizar el número de índice del lookup control.

Ejemplo 1:
Encuentra un lookup índice basado en un evento.

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

Ejemplo 2:
Encuentra un lookup índice basado en un control ID y contexto específico.

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