ALV响应单元格双击事件

*ALV响应单元格双击事件

form user_command using r_ucomm like sy-ucomm
                  rs_selfield type slis_selfield.
  case r_ucomm.
    when '&IC1'.
       if rs_selfield-fieldname = 'EBELN' ."双击单元格的列字段
            clear itab.
            read table itab index rs_selfield-tabindex.  "双击单元格的表索引号，也就是行号
*            rs_selfield-value                           "  双击单元格的值（内容）

            call function 'ME_DISPLAY_PURCHASE_DOCUMENT'
               exporting
                  i_ebeln = itab-ebeln
                  i_ebelp = itab-ebelp
                  i_enjoy = 'X'.
       elseif rs_selfield-fieldname = 'MATNR' .
          clear itab.
          read table itab index rs_selfield-tabindex.  "双击单元格的表索引号，也就是行号

          MESSAGE ITAB-WERKS TYPE 'S'.
       endif.
  endcase.
endform.