Navigation: ABC Library Reference > EIPManagerClass > EIPManagerClass Methods >====== TakeAction (process edit-in-place action) ====== | |
TakeAction( action ), VIRTUAL
TakeAction | Processes edit-in-place action. |
action | An integer constant, variable, EQUATE, or expression that contains the action to process. Valid EQUATEs are forward, backward, next, previous, complete, and cancel. |
The TakeAction method processes an EIPManager dialog action. The TakeAction method is your opportunity to interpret and implement the meaning of the end user's selection.
Implementation:
The TakeFieldEvent conditionally calls the TakeAction method.
Corresponding EQUATEs are declared in ABEIP.INC as follows:
EditAction ITEMIZE(0),PRE
None EQUATE
Forward EQUATE ! Next field
Backward EQUATE ! Previous field
Complete EQUATE ! OK
Cancel EQUATE ! Cancel
Next EQUATE ! Focus moving to Next record
Previous EQUATE ! Focus moving to Previous record
Ignore EQUATE
END
Example:
EIPManager.TakeFieldEvent PROCEDURE
I UNSIGNED(1)
CODE
IF FIELD() = SELF.ListControl THEN RETURN Level:Benign .
LOOP I = 1 TO RECORDS(SELF.EQ)+1
! Optimised to pick up subsequent events from same field
IF ~SELF.EQ.Control &= NULL AND SELF.EQ.Control.Feq = FIELD()
SELF.TakeAction(SELF.EQ.Control.TakeEvent(EVENT()))
RETURN Level:Benign
END
GET(SELF.EQ,I)
END
! Code to handle an unknown field
See Also: TakeFieldEvent