Pedido

[danieldl]

Est6imado Foro, alguien tiene algun ejemplo sencillo y bien documentado sobre un ALV desde ya gracias.

[Jotabin]

REPORT ZJBIN.

* Include ALV
  TYPE-POOLS: slis.

* Catálogo de campos ALV
  DATA t_fieldcat TYPE slis_t_fieldcat_alv.

* Tabla interna
  DATA: BEGIN OF t_t001w OCCURS 0.
          INCLUDE STRUCTURE t001w.
  DATA: END OF t_t001w.

* Variable de nombre del reporte
  DATA: l_repid LIKE sy-repid.


START-OF-SELECTION.

* Recuperación de datos
  SELECT *
    FROM t001w
    INTO TABLE t_t001w.


END-OF-SELECTION.

  l_repid = sy-repid.

* Se carga el catálogo de campos
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = l_repid
      i_internal_tabname     = 'T_T001W'
      i_inclname             = l_repid
    CHANGING
      ct_fieldcat            = t_fieldcat
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.

  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.


* Se realiza la salida por pantalla
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      it_fieldcat   = t_fieldcat
    TABLES
      t_outtab      = t_t001w
    EXCEPTIONS
      program_error = 1
      OTHERS        = 2.

  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

Ahí tenés un ejemplo del ALV más sencillo posible... ojalá te sirva.
Está algo documentado, pero si no te resulta suficientemente claro o si era otra cosa lo que buscabas, preguntá nomás.

[danieldl]

Gracias por el ejemplo pero cambio la tabla (T005S) pero no me saca los encabezados reales.... o sea los encabezados de las columnas de la tabla seleccionada, por que?