Advertisement
Guest User

Untitled

a guest
Dec 6th, 2016
104
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 1.11 KB | None | 0 0
  1. *&---------------------------------------------------------------------*
  2. *& Report  ZJL_ALV
  3. *&
  4. *&---------------------------------------------------------------------*
  5. *&
  6. *&
  7. *&---------------------------------------------------------------------*
  8.  
  9. REPORT  zjl_alv.
  10.  
  11. DATA: gt_table TYPE TABLE OF zjl_table,
  12.       gr_alv TYPE REF TO cl_salv_table,
  13.       gr_func TYPE REF TO cl_salv_functions,
  14.       gr_display TYPE REF TO cl_salv_display_settings,
  15.       lt_exclude TYPE ui_functions,
  16.       ls_exclude TYPE ui_func.
  17.  
  18. *START-OF-SELECTION.
  19.  
  20. SELECT * FROM zjl_table INTO TABLE gt_table.
  21.  
  22. TRY.
  23.   CALL METHOD cl_salv_table=>factory
  24.     IMPORTING
  25.       r_salv_table = gr_alv
  26.     CHANGING
  27.       t_table      = gt_table.
  28. ENDTRY.
  29.  
  30. * Initialize variables
  31. gr_func = gr_alv->get_functions( ).
  32. gr_display = gr_alv->get_display_settings( ).
  33.  
  34. * Show all functions
  35. gr_func->set_all( abap_true ).
  36.  
  37. * Exclude functions
  38. ls_exclude = cl_gui_alv_grid=>mc_fc_sum.
  39. APPEND ls_exclude TO lt_exclude.
  40.  
  41. gr_alv->set_table_for_first_display( gt_table ).
  42.  
  43.  
  44. gr_display->set_striped_pattern( abap_true ).
  45.  
  46. gr_alv->display( ).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement