Fullscreen ALV GRID Factory - Creación de Reporte simple

********************************************************************************
*  INFORMACIÓN GENERAL - GENERAL INFORMATION
********************************************************************************
*^ Autor - Author      : José Manrique Valderrama
*^ Objetivo - Objetive : TEST - ALV FACTORY
*^ Website             : abapejemplos.blogspot.com
********************************************************************************

REPORT zjm_demo_alv_factory.

* Declaración de variables
DATA: gtd_sflight TYPE STANDARD TABLE OF sflight.

DATA: gwa_sflight TYPE sflight.

DATA: go_alv TYPE REF TO cl_salv_table.

* Párametros de selección
PARAMETERS: p_carrid TYPE sflight-carrid OBLIGATORY.

SELECT-OPTIONS: s_connid FOR gwa_sflight-connid,
                s_fldate FOR gwa_sflight-fldate.


START-OF-SELECTION.

  SELECT *
    FROM sflight
    INTO TABLE gtd_sflight
   WHERE carrid EQ p_carrid
     AND connid IN s_connid
     AND fldate IN s_fldate.

  IF sy-subrc NE 0.
    "No se encontraron datos para esta ejecución
    MESSAGE s425(fr) DISPLAY LIKE 'E'.
    RETURN.
  ENDIF.

  TRY.
      cl_salv_table=>factory(
        IMPORTING
          r_salv_table = go_alv
        CHANGING
          t_table      = gtd_sflight ).
    CATCH cx_salv_msg.
      "Se ha producido un error en ALV
      MESSAGE s899(salv_exception) DISPLAY LIKE 'E'.
      RETURN.
  ENDTRY.

  go_alv->display( ).

Párametros de selección


Salida del ALV