Code listing for: ZBCTCODE_DISP2
Description: Include ZBCTCODE_DISP2
*&---------------------------------------------------------------------*
*& 包含               ZBCTCODE_DISP2
*&---------------------------------------------------------------------*

SELECT a~account ,b~name_last ,SUM( a~count ) AS count
  FROM @gt_user AS a
  LEFT JOIN user_addr AS b
  ON a~account = b~bname
  WHERE account IN @s_uname
  GROUP BY a~account,b~name_last
  INTO TABLE @DATA(et_user).

gt_fieldcat = VALUE #(
( fieldname = 'ACCOUNT'  coltext = '用户'  key = 'X' )
( fieldname = 'NAME_LAST'  coltext = '用户姓名'   )
( fieldname = 'COUNT'  coltext = '总访问次数'   )
).


SORT et_user BY count.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
  EXPORTING
    i_callback_program       = sy-repid
*   i_grid_title             = '用户列表'
*   i_structure_name         = 'TSTC'
    i_callback_pf_status_set = 'FRM_PF_STATUS'
    i_callback_user_command  = 'FRM_USER_COMMAND3'
*   i_grid_settings          = gv_settings
    is_layout_lvc            = gs_layout
    it_fieldcat_lvc          = gt_fieldcat[]
    i_save                   = 'A'
  TABLES
    t_outtab                 = et_user[]
  EXCEPTIONS
    program_error            = 1
    OTHERS                   = 2.

Extracted by Direct Download Enterprise version 1.3 - E.G.Mellodew. 1998-2004 UK. Sap Release 752