Sample coe to use class CL_GUI_ALV_GRID

Question

Hi All,
I am having 2 internal tables.
I need to display the data in these 2 internal tables using ALV.
I am using the function module REUSE_ALV_LIST_DISPLAY 2 times for 2 internal tables to display data.
But two outputs are not coming on same screen.
Can any one give me a sample program to use class CL_GUI_ALV_GRID to display 2 List.
Screen for two custom controls I will create.
I just need to display data.
Pls Guide

Answer 1

zsat_alvoops_final.
TABLES: vbap, vbak.
TYPES : BEGIN OF str1,
        mvbeln TYPE vbeln,
        mposnr TYPE posnr,
        mmatnr TYPE matnr,
        mkwmeng TYPE kwmeng,
        mmeins TYPE meins,
        mpstyv TYPE pstyv,
        END OF str1.
DATA: grid TYPE REF TO cl_gui_alv_grid,
      g_custom_container TYPE REF TO cl_gui_custom_container,
      it_fcat TYPE lvc_t_fcat,
      zsat_alvfcat2 TYPE STANDARD TABLE OF str1.
DATA : oit TYPE TABLE OF str1,
       v_vkorg TYPE vbak-vkorg,
       v_vtweg TYPE vbak-vtweg,
       v_vkbur TYPE vbak-vkbur,
       v_vkgrp TYPE vbak-vkgrp,
       v_erdat TYPE vbak-erdat,
       v_bsark TYPE vbak-bsark,
       v_spart TYPE vbap-spart,
       wa TYPE str1.
SELECT-OPTIONS : s_vkorg FOR v_vkorg,
                 s_vtweg FOR v_vtweg,
                 s_vkbur FOR v_vkbur,
                 s_vkgrp FOR v_vkgrp,
                 s_erdat FOR v_erdat,
                 s_bsark FOR v_bsark,
                 s_spart FOR v_spart.
SELECT vbak~vbeln vbap~posnr vbap~matnr vbap~kwmeng vbap~meins vbap~pstyv
  INTO TABLE oit
  FROM vbak INNER JOIN vbap ON vbak~vbeln = vbap~vbeln
  WHERE ( vbak~vkorg IN s_vkorg ) AND ( vbak~vtweg IN s_vtweg ) AND ( vbak~vkbur IN s_vkbur )
  AND ( vbak~vkgrp IN s_vkgrp ) AND ( vbak~erdat IN s_erdat ) AND ( vbak~bsark IN s_bsark ) AND ( vbap~spart IN s_spart ).
CALL SCREEN 9000.
MODULE status_9000 OUTPUT.
  SET PF-STATUS 'ZSTATUS'.
  IF g_custom_container IS INITIAL.
    CREATE OBJECT g_custom_container
      EXPORTING
        container_name = 'CCONTAINER'.
    CREATE OBJECT grid
      EXPORTING
        i_parent = g_custom_container.
  ENDIF.
  CALL METHOD grid->set_table_for_first_display
    EXPORTING
      i_structure_name = 'ZSAT_ALVFCAT2'   * this is the custom structure which has been made in SE11 remember to declare it in this program in DATA.
    CHANGING
      it_outtab        = oit.     
ENDMODULE.