dlgEvent_OnActionQuery
Function called to overwrite a predefined action to query a dialog.
Syntax
PUBLIC FUNCTION dlgEvent_OnActionQuery(
dlg ui.DIALOG,
uiMode SMALLINT,
dlgCtrlInstruction libdbappEvents.DlgCtrlInstruction_Type)
RETURNS (libdbappEvents.DlgCtrlInstruction_Type)
dlg. This is aui.DIALOGobject referencing the current dialog. The dialog can implement anINPUT,INPUT ARRAY,DISPLAY ARRAY,MENU, orCONSTRUCT. For more information, see The Dialog class in Genero Business Development Language User Guide.uiMode. This is an integer value defining the current mode or state in relation to user action in the dialog, form, or application. Modes are defined as constants in the libdbappFormUI file in the libdbapp library.Table 1. UI modes Description Applies to ... Constant Value Display DISPLAY ARRAYC_MODE_DISPLAY 1 Modify INPUT \ INPUT ARRAYC_MODE_MODIFY 2 Add INPUT \ INPUT ARRAYC_MODE_ADD 3 Search CONSTRUCTC_MODE_SEARCH 4 Empty MENUC_MODE_EMPTY 5 Exit form The form C_MODE_EXIT_FORM 6 Exit app The app C_MODE_EXIT_APP 7 Undefined All (array, form, or app) C_MODE_UNDEFINED 0 dlgCtrlInstructionis a libdbappEvents.DlgCtrlInstruction_Type defining the dialog control instruction.Instructions available will vary depending on theuiMode:Table 2. Dialog control instructions for display/modify/add/search modes Description Constant Value Accept dialog ACCEPT_DIALOG1 Continue dialog CONTINUE_DIALOG2 Exit dialog EXIT_DIALOG3 Table 3. Dialog control instructions for empty mode Description Constant Value Continue menu CONTINUE_MENU4 Exit menu EXIT_DIALOG5
The function returns a dialog control instruction value defined by libdbappEvents.DlgCtrlInstruction_Type.
Usage
When you select the On Action Query property for the creation of the event, a function shell is created. Enter your code in the function.
Use this function to overwrite a predefined action to query by example in DISPLAY
ARRAY, INPUT [ARRAY], and MENU blocks
(corresponds to the "DISPLAY", "MODIFY|ADD" and "EMPTY" UI modes).
Example: On Action Query
This example uses the On Action Query code event for the Account form in the OfficeStore demo.
In this example if the current mode is C_MODE_ADD, the function
restoreRequiredElementStyle is called to restore original
presentation styles to form elements.
restoreRequiredElementStyle function references two user-defined
parameters:m_frmElementsstores the name of some elements in the formm_frmElementsStylestores the original presentation styles of them_frmElementselements
The EXIT_DIALOG is executed when the dialog is queried (dlgCtrlInstruction =
libdbappEvents.EXIT_DIALOG). This overwrites the default behavior,
which is to execute ACCEPT DIALOG in MODIFY mode and in ADD mode only if the dialog
has been touched. This code is used to skip the validation of a field when you press
the "Search" button.
# AccountForm.4gl
# user defined module variables
DEFINE m_frmElements DYNAMIC ARRAY OF STRING =
["account_userid_label1", "account_lastname_label1", "account_email_label1", "account_state_label1"] -- form elements
DEFINE m_frmElementsStyle DYNAMIC ARRAY OF STRING --Saved styles
# ...
PUBLIC FUNCTION dlgEvent_OnActionQuery(dlg ui.DIALOG, uiMode SMALLINT,
dlgCtrlInstruction libdbappEvents.DlgCtrlInstruction_Type)
RETURNS (libdbappEvents.DlgCtrlInstruction_Type)
DISPLAY "dlgEvent_OnActionQuery (Form scope) is raised"
IF uiMode == libdbappFormUI.C_MODE_ADD THEN
CALL myAccountFunc.restoreRequiredElementStyle(dlg, m_frmElements, m_frmElementsStyle)
LET dlgCtrlInstruction = libdbappEvents.EXIT_DIALOG
END IF
RETURN dlgCtrlInstruction
END FUNCTION
restoreRequiredElementStyle called to restore the original
presentation styles to form elements. All functions that you would reuse across forms and
applications would reside in a module you create. To use these functions in your
project, you would import your module into the entity module (for example,
AccountForm.4gl) using the IMPORT FGL
statement.FUNCTION restoreRequiredElementStyle(dlg, lbllist, lblSTylelist)
DEFINE lbllist DYNAMIC ARRAY OF STRING
DEFINE lblSTylelist DYNAMIC ARRAY OF STRING
DEFINE dlg ui.Dialog
DEFINE i INTEGER
FOR i = 1 TO lbllist.getLength()
CALL dlg.getForm().setElementStyle(lbllist[i], lblSTylelist[i])
END FOR
END FUNCTION