不用屏幕实现ALV POPUP

这个功能不能在没有屏幕的REPORT程序使用。

只要有一个SCREEN就可以使用。

DATA : t_data1 TYPE TABLE OF sbook,

       t_fieldcat1  TYPE  lvc_t_fcat,
       w_popup_grid  TYPE   REF   TO  cl_rs_alv_grid_popup.



     SELECT  *  FROM  sbook  INTO   TABLE  t_data1
                WHERE  carrid =  'AA' .

   CALL   FUNCTION   'LVC_FIELDCATALOG_MERGE'
    EXPORTING
*    I_BUFFER_ACTIVE              =
      i_structure_name             =  'SBOOK'
*    I_CLIENT_NEVER_DISPLAY       = 'X'
*    I_BYPASSING_BUFFER           =
*    I_INTERNAL_TABNAME           =
     CHANGING
      ct_fieldcat                  = t_fieldcat1
           .

   CREATE  OBJECT w_popup_grid
      EXPORTING
*    I_STRUCTURE_NAME =
       i_t_fieldcatalog = t_fieldcat1
       i_left =  10
       i_top  =  10
       i_height =  300
       i_width =  300
      .

   CALL   METHOD  w_popup_grid->show_data
     EXPORTING
      i_t_data = t_data1.