Clarion Community Help

TakeAccepted, VIRTUAL, PROC

The TakeAccepted method processes EVENT:Accepted events for the window's controls, and returns a value indicating whether window ACCEPT loop processing is complete and should stop. TakeAccepted returns Level:Benign to indicate processing of this event should continue normally; it returns Level:Notify to indicate processing is completed for this event and the ACCEPT loop should CYCLE; it returns Level:Fatal to indicate the event could not be processed and the ACCEPT loop should BREAK.

Implementation:

TakeAccepted carries out HistoryKey and 2 parameter AddItem actions.

Return values are declared in ABERROR.INC.

The TakeEvent method calls the TakeAccepted method.

Return Data Type:     BYTE

Example:

MyWindowManager.TakeEvent PROCEDURE

Rval BYTE(Level:Benign)

I   USHORT,AUTO

CODE

IF ~FIELD()

 RVal = SELF.TakeWindowEvent()

 IF RVal THEN RETURN RVal.

END

CASE EVENT()

OF EVENT:Accepted;   RVal = SELF.TakeAccepted()

OF EVENT:Rejected;   RVal = SELF.TakeRejected()

OF EVENT:Selected;   RVal = SELF.TakeSelected()

OF EVENT:NewSelection; RVal = SELF.TakeNewSelection()

OF EVENT:Completed;   RVal = SELF.TakeCompleted()

OF EVENT:CloseWindow OROF EVENT:CloseDown

 RVal = SELF.TakeCloseEvent()

END

IF RVal THEN RETURN RVal.

IF FIELD()

 RVal = SELF.TakeFieldEvent()

END

RETURN RVal

See Also:     AddItem, HistoryKey, TakeEvent