Regarding single click in alv's

Question

hi guru's
i have a small problem.
iam using a alv grid display. after clicking on the row in alv , i need to navigate to a transaction mm03. 
My problem is the navigation is happening in double-click. how can i use the single click option.
my program consists of:
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = sy-repid
      i_structure_name       = l_c_struc
      i_inclname             = sy-repid
    CHANGING
      ct_fieldcat            = fp_l_i_fieldcat
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program      = sy-cprog
      i_callback_user_command = l_c_user_command
      i_grid_title            = text-004
      is_layout               = fp_wa_layout
      it_fieldcat             = fp_i_fieldcatalog
      i_save                  = l_c_a
      it_events               = fp_i_event
    TABLES
      t_outtab                = fp_i_makt
FORM at_user_command USING fp_ucom     TYPE sy-ucomm
                           fp_selfield TYPE slis_selfield.  "#EC *
    CASE fp_ucom.
      WHEN '&IC1'.
        READ TABLE i_makt INTO wa_final
                                    INDEX fp_selfield-tabindex.
        IF sy-subrc EQ c_0.
          SET PARAMETER ID 'MAT' FIELD wa_final-matnr.
          CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
        ENDIF.
      WHEN OTHERS.
        MESSAGE i009.
    ENDCASE.
ENDFORM.                  
please give me a detailed description as iam new to abap programming.

Answer 1

HI USE THIS EXAMPLE ,
use the hot spot for this option.
*& Report  Z_TEST001
REPORT  Z_TEST001.
TYPE-POOLS:  slis.
tables: rseg.
DATA: begin of TAB_ARSEG occurs 0.
        INCLUDE STRUCTURE RSEG.
DATA: END OF TAB_ARSEG.
DATA: T_FIELDCAT TYPE slis_t_fieldcat_alv.
DATA: c_user_command TYPE slis_formname VALUE 'USER_COMMAND'.
START-OF-SELECTION.
<<<  YOUR CODE  >>> ***********************
select * from rseg into table tab_arseg .
END-OF-SELECTION.
perform build_fieldcat.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_buffer_active                   = space
    i_callback_program                = sy-repid
   I_CALLBACK_USER_COMMAND            = c_user_command
  I_STRUCTURE_NAME                  =
  IS_LAYOUT                         =
   IT_FIELDCAT                        = T_FIELDCAT[]
  TABLES
    T_OUTTAB                          = TAB_ARSEG
EXCEPTIONS
   PROGRAM_ERROR                      = 1
   OTHERS                             = 2.
IF SY-SUBRC ne 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
**&      Form  USER_COMMAND
FORM USER_COMMAND USING F_UCOMM LIKE SY-UCOMM
                I_SELFIELD TYPE SLIS_SELFIELD.
  DATA: F_SUBRC LIKE SY-SUBRC,
        s_arseg like tab_arseg.
  READ TABLE tab_arseg INDEX i_selfield-tabindex INTO s_arseg.
    CASE F_UCOMM.
        WHEN '&IC1'.
        CASE i_SELFIELD-SEL_TAB_FIELD.
        WHEN 'TAB_ARSEG-BELNR'.
          CHECK NOT S_ARSEG-BELNR IS INITIAL.
          SET PARAMETER ID 'RBN' FIELD S_ARSEG-BELNR.
          SET PARAMETER ID 'GJR' FIELD S_ARSEG-GJAHR.
          CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
        ENDCASE.
    ENDCASE.
ENDFORM.
**&      Form  build_fieldcat
FORM build_fieldcat .
DATA: FIELDCAT TYPE SLIS_FIELDCAT_ALV.
  CLEAR FIELDCAT.
  FIELDCAT-FIELDNAME     = 'BELNR'.
  FIELDCAT-TABNAME       = 'TAB_ARSEG'.
  FIELDCAT-REF_TABNAME   = 'RSEG'.
  FIELDCAT-REF_FIELDNAME = 'BELNR'.
  fieldcat-hotspot   = 'X'.
  FIELDCAT-COL_POS       = 1.
  APPEND FIELDCAT TO t_fieldcat.
  CLEAR FIELDCAT.
  FIELDCAT-FIELDNAME     = 'GJAHR'.
  FIELDCAT-TABNAME       = 'TAB_ARSEG'.
  FIELDCAT-REF_TABNAME   = 'RSEG'.
  FIELDCAT-REF_FIELDNAME = 'GJAHR'.
  FIELDCAT-COL_POS       = 2.
  APPEND FIELDCAT TO t_fieldcat.
ENDFORM.                    " build_fieldcat
REGARDS,
VENKAT.