TRIGGER:LOAD
path: MODIFIER:LINK-ON > MODIFIER:SAVEMSG-SUPP > NUCLEUS:GESTALT > TRIGGER:TIMEOUT > TRIGGER:LOAD

Trigger / Methods

Initial Screen Load (LOAD)

ID definition only.

Occurs after the SCR subroutine is processed and before the screen window is opened.

The LOAD event is used to open files (other than the master file already open, fv.Data), read parameters and do general housekeeping and initialization.

Example

EQU ProfileFlag TO USERBLOCK(5)

200 * load
OPEN \CUSTMAST\ TO fv.Customer ELSE STOP 201,\CUSTMAST\
OPEN \INVMAST\ TO fv.IMAST ELSE STOP 201,\INVMAST\
OPEN \PROFILE\ TO fv.Profile ELSE STOP 201,\PROFILE\
parts.flag = FALSE
OPEN \CONTROL\ TO fv.Control ELSE STOP 201,\CONTROL\
READV Flag FROM fv.Control,"CLIENT",13 THEN
IF Flag = "Y" THEN flag.Profile = TRUE ELSE flag.Profile = FALSE
END
RETURN

Load time functional values:

ArgumentDiscussion
flag.Protected = TRUESets the screen READ ONLY (instead of using the PROTECT directive in the SCRIPT)
PAGENO = nSet the initial page number (other than one)
flag.SingleSearch = TRUEafter a search popup this controls whether the item is edited at a higher execute level and after edit control pops back into the xref list (flag.SingleSearch = FALSE) or whether you immediately pass back the key to the current level and do not return to the pop up flag.SingleSearch = TRUE)

This flag can be set at LOAD time. Default is FALSE

def$FIELDAny field control value:
flag.Exit = TRUEAborts the program upon return from the LOAD event.