dlgEvent_OnActionAccept

Function called to overwrite a predefined action to accept the current interactive instruction.

Syntax

PUBLIC FUNCTION dlgEvent_OnActionAccept( 
   dlg ui.DIALOG, 
   uiMode SMALLINT,
   dlgCtrlInstruction libdbappEvents.DlgCtrlInstruction_Type)
RETURNS (libdbappEvents.DlgCtrlInstruction_Type)

The function parameters are:

dlg. This is a ui.DIALOG object referencing the current dialog. The dialog can implement an INPUT, INPUT ARRAY, DISPLAY ARRAY, MENU, or CONSTRUCT. 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 ARRAY`	C_MODE_DISPLAY	1
Modify	`INPUT \ INPUT ARRAY`	C_MODE_MODIFY	2
Add	`INPUT \ INPUT ARRAY`	C_MODE_ADD	3
Search	`CONSTRUCT`	C_MODE_SEARCH	4
Empty	`MENU`	C_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

dlgCtrlInstruction is a libdbappEvents.DlgCtrlInstruction_Type defining the DIALOG control instruction.
Instructions available will vary depending on the uiMode:
- For display, modify, add, and search mode, see Table 2.
- For empty mode, see Table 3.
Table 2. Dialog control instructions for display/modify/add/search modes

Description Constant Value

Accept dialog ACCEPT_DIALOG 1

Continue dialog CONTINUE_DIALOG 2

Exit dialog EXIT_DIALOG 3

Table 3. Dialog control instructions for empty mode

Description Constant Value

Continue menu CONTINUE_MENU 4

Exit menu EXIT_DIALOG 5

Table 2. Dialog control instructions for display/modify/add/search modes
Description	Constant	Value
Accept dialog	`ACCEPT_DIALOG`	1
Continue dialog	`CONTINUE_DIALOG`	2
Exit dialog	`EXIT_DIALOG`	3

Table 3. Dialog control instructions for empty mode
Description	Constant	Value
Continue menu	`CONTINUE_MENU`	4
Exit menu	`EXIT_DIALOG`	5

The function returns a dialog control instruction value defined by libdbappEvents.DlgCtrlInstruction_Type.

Usage

When you select the On Action Accept 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 accept the current interactive instruction.

Example: On Action Accept

This example uses the On Action Accept code event for the Account form in the OfficeStore demo.

In this example, the function checks the status of uiMode. Depending on the current mode (C_MODE_ADD or C_MODE_SEARCH), the user-defined function restoreRequiredElementStyle is called to restore the original presentation styles to form elements.

The restoreRequiredElementStyle function references two user-defined parameters:

m_frmElements stores the name of some elements in the form
m_frmElementsStyle stores the original presentation styles of the m_frmElements elements

The parameters hold values set in the dlgEvent_OnOpenForm event.

# AccountForm.4gl

-- import user-defined functions
IMPORT FGL myAccountFunc

# 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_OnActionAccept(dlg ui.DIALOG, uiMode SMALLINT, 
    dlgCtrlInstruction libdbappEvents.DlgCtrlInstruction_Type)
    RETURNS (libdbappEvents.DlgCtrlInstruction_Type)

    DISPLAY "dlgEvent_OnActionAccept (Form scope) is raised"
    DISPLAY "uiMode ", uiMode
    IF uiMode == libdbappFormUI.C_MODE_ADD OR uiMode == libdbappFormUI.C_MODE_SEARCH THEN
       CALL myAccountFunc.restoreRequiredElementStyle(dlg, m_frmElements, m_frmElementsStyle)
    END IF

    RETURN dlgCtrlInstruction
END FUNCTION

restoreRequiredElementStyle

In this section there is an example of the user-defined function restoreRequiredElementStyle called to restore the original presentation styles.

The restoreRequiredElementStyle function references two parameters:

The lbllist array that stores a list of form elements.
The lblStylelist array that stores the original presentation styles of lbllist.

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.

# MyAccountFunc.4gl

FUNCTION restoreRequiredElementStyle(dlg ui.Dialog, lbllist DYNAMIC ARRAY OF STRING, 
                                      lblStylelist DYNAMIC ARRAY OF STRING)
    DEFINE i INTEGER

    FOR i = 1 TO lbllist.getLength()
        CALL dlg.getForm().setElementStyle(lbllist[i], lblStylelist[i])
    END FOR
END FUNCTION