Class Event Error

Question

***INCLUDE MZTEST_CLASS .
DATA gr_event_handler TYPE REF TO lcl_event_handler .
*--Creating an instance for the event handler
CREATE OBJECT gr_event_handler .
*--Registering handler methods to handle ALV Grid events
SET HANDLER gr_event_handler->handle_double_click FOR gr_alvgrid .
*&       Class LCL_EVENT_HANDLER
*        Text
CLASS lcl_event_handler DEFINITION.
  PUBLIC SECTION .
    METHODS:
*--Double-click control
      handle_double_click
      FOR EVENT double_click OF cl_gui_alv_grid
      IMPORTING e_row e_column.
ENDCLASS.               "LCL_EVENT_HANDLER
*&       Class (Implementation)  lcl_event_handler
*        Text
CLASS lcl_event_handler IMPLEMENTATION.
--Handle Double Click
  METHOD handle_double_click .
    PERFORM handle_double_click USING e_row es_row_no .
  ENDMETHOD .                    "handle_double_click
ENDCLASS.               "lcl_event_handler
I got the below error for the above code
<b>
The type "LCL_EVENT_HANDLER" is unknown.</b>     
can u guys help me out

Answer 1

i have put those lines in the last now i got this error
Statement is not accessible.          
at line CREATE OBJECT gr_event_handler .
***INCLUDE MZVENDOR_CLASS .
*&       Class LCL_EVENT_HANDLER
*        Text
CLASS lcl_event_handler DEFINITION .
  PUBLIC SECTION .
    METHODS:
*--Double-click control
      handle_double_click
      FOR EVENT double_click OF cl_gui_alv_grid
      IMPORTING e_row e_column.
  PRIVATE SECTION.
ENDCLASS.               "LCL_EVENT_HANDLER
*&       Class (Implementation)  lcl_event_handler
*        Text
CLASS lcl_event_handler IMPLEMENTATION.
*--handle double click
  METHOD handle_double_click .
    PERFORM handle_double_click USING e_row e_column .
  ENDMETHOD .                    "handle_double_click
ENDCLASS.               "lcl_event_handler
DATA gr_event_handler TYPE REF TO lcl_event_handler .
CREATE OBJECT gr_event_handler .
SET HANDLER gr_event_handler->handle_double_click FOR gr_alvgrid .