PROCEDURE CLEF( EFN:Event_Flag);
   EXTERNAL;
{*USER*
 Pascal-3 procedure to clear EFN. All efns are supported,
including Group Globals.
 $DSW indicates flags status prior to being cleared.
(0->was clear, 2->was set ).
 
    }