Dynamic ALV GRID screen in a class? Possible?

Question

I have created a class(I have done it locally as to be able to use it for mutiple clients) that I include in programs that I want to implement the alv grid for using the FM approach. Doing this allows me to easily implement the ALV quickly. However, I am wanting to use the OO ALV grid approach since there is more flexibility and control doing it this way. But I do not want to have to create a screen for every program that I want to do this for, I would like to just have a method in my existing class that would call a screen and then be able to control it like normal. I know that screens can not be called from a method so I was thinking of doing something similiar to another post using a FM to call the screen. I realize that this could be complicated because certain methods for the ALV GRID are called in the  PBO/PAI events. Any help or suggestions would be appreciated.
Note: I am on 6.20 and have searched all over the web before posting.
Thanks.

Answer 1

Yes,  i have written a function module which calls a generice ALV grid in a dialog box.  Everything about the ALV grid is encapsulated in a function module.  In this case, all I need to do is send this function module a fieldcatalog and the data,  that's about it.  Doing this may limit the functionality of event handling  or you would just have to handle everything by doing more code for it..   This function module is very simple, not a whole lot to it.   You could do something like this only instead of using a model dialog box, you would throw a regular dynpro.
function z_popup_with_alvgrid.
*"*"Global interface:
*"  IMPORTING
*"     REFERENCE(ENDPOS_COL) TYPE  I DEFAULT 90
*"     REFERENCE(ENDPOS_ROW) TYPE  I DEFAULT 22
*"     REFERENCE(STARTPOS_COL) TYPE  I DEFAULT 10
*"     REFERENCE(STARTPOS_ROW) TYPE  I DEFAULT 2
*"     REFERENCE(TEXTLINE1) TYPE  C OPTIONAL
*"     REFERENCE(TEXTLINE2) TYPE  C OPTIONAL
*"     REFERENCE(TEXTLINE3) TYPE  C OPTIONAL
*"     REFERENCE(TEXTLINE4) TYPE  C OPTIONAL
*"     REFERENCE(TITLE) TYPE  C OPTIONAL
*"     REFERENCE(FIELDCAT) TYPE  LVC_T_FCAT
*"  TABLES
*"      I_ALV
  call screen 0200 starting at startpos_col
                               startpos_row
                     ending at endpos_col
                               endpos_row.
endfunction.
*      Module  STATUS_0200  OUTPUT
module status_0200 output.
  set pf-status '0200'.
  set titlebar  '0200' with title.
  data: alv_container  type ref to cl_gui_custom_container.
  data: alv_grid       type ref to cl_gui_alv_grid.
  data: xfieldcat type lvc_t_fcat.
  xfieldcat = fieldcat.
* Create Controls
  create object:
     alv_container
             exporting
                   container_name    = 'ALV_CONTAINER',
     alv_grid
             exporting
                   i_parent          =  alv_container.
*  Set grid for first display
  call method alv_grid->set_table_for_first_display(
      exporting
           i_structure_name       = 'I_ALV'
      changing
           it_outtab       = i_alv[]
           it_fieldcatalog = xfieldcat[] ).
endmodule.
*     Module  USER_COMMAND_0100  INPUT
module user_command_0200 input.
  case sy-ucomm.
    when 'CONTINUE' or 'CANCEL'.
      set screen 0.
      leave screen.
  endcase.
endmodule.
Regards,
Rich Heilman