SET PF-STATUS 'MRP5_VS_12'.
   SET TITLEBAR 'MRP5_VS_12'.
  IF G_CUSTOM_CONTAINER IS INITIAL.
    CREATE OBJECT G_CUSTOM_CONTAINER
           EXPORTING CONTAINER_NAME = G_CONTAINER.
    CREATE OBJECT GRID1
           EXPORTING I_PARENT = G_CUSTOM_CONTAINER.
    CALL METHOD GRID1->SET_TABLE_FOR_FIRST_DISPLAY
         EXPORTING  "I_STRUCTURE_NAME = 'GS_RESULT_TAB'
*                    IT_FIELDCATALOG = gt_fieldcat[] "название каталога полей
                    is_layout = gs_layout

         CHANGING   IT_OUTTAB        = gt_result_tab_alv
                    it_fieldcatalog = gt_fieldcat[].
  ENDIF.

* Собираем данные из первой таблицы БД
SELECT lfgja labst matnr AS matnr INTO CORRESPONDING FIELDS OF TABLE gt_result_tab UP TO 4000 ROWS FROM MARD.
* Добавляем данные из второй таблицы БД
SELECT gamng matnr_1 AS matnr APPENDING CORRESPONDING FIELDS OF TABLE gt_result_tab UP TO 4000 ROWS FROM zppmrp5.

* Сортируем таблицу по материалу
SORT gt_result_tab BY matnr gamng.

DATA gs_result_tab LIKE LINE OF gt_result_tab.
* Считаем кол-во по материалу
DATA: gt_result_tab_alv LIKE TABLE OF gs_result_tab.

LOOP AT gt_result_tab INTO gs_result_tab.
  COLLECT gs_result_tab INTO gt_result_tab_alv.
ENDLOOP.

CLEAR: gt_result_tab[].

  ls_alv_cell_style-style = cl_gui_alv_grid=>mc_style_enabled.