(implemented in VERSION 7)

Directives

DISABLE EVENT Internal Event Disable

Formats	1. Timer Event: DISABLE EVENT ON TIME   2. Data Available on Channel Event: DISABLE EVENT ON DATA (chan)   3. On Close of Channel Event: DISABLE EVENT ON CLOSE (chan)   4. On Open Event: DISABLE EVENT ON OPEN   5. On Class Load Event: DISABLE EVENT ON LOAD CLASS   Where:
	chan	Channel or logical file number.
Description	Use the DISABLE EVENT directive to disable the handling of various system events within a ProvideX session. The generation and trapping of events requires that the internal "*system.pvc"COM object be defined first.
See Also	ENABLE EVENT Directive.
Example	00010 DEF OBJECT PvxComID,"*system" ! Activate support for System Events 00020 ENABLE EVENT ON TIM=2 ! Activate timer event at two second intervals 00030 ON EVENT "TimeOut" FROM PvxComID PREINPUT 99 ! Establish how to handle the event 00031 c=0 00040 WHILE 1 00050 INPUT * 00060 IF CTL=99 \           THEN c++;                     PRINT "Timeout ",c;                     IF c>3 \ THEN BREAK 00070 WEND 00075 DISABLE EVENT ON TIM ! Deactivate timer event 00077 DROP OBJECT PvxComID 00080 END