The following example sets the available state of the event EVNT to TRUE (available).

FREE(EVNT)

The following example sets the available state of the event designated by EVNTARAY[INDX] to TRUE (available).

FREE(EVNTARAY[INDX])

The following example assigns to WASPROCURED a value indicating the available state of the event FYLELOCK, and sets the available state of FYLELOCK to TRUE (available).

IF WASPROCURED := FREE(FYLELOCK) THEN...