REPORT  ZTEST_ALV                                 .

TYPE-POOLS: SLIS.

DATA: ZAP LIKE T001 OCCURS 0 WITH HEADER LINE.

DATA:  G_EXIT,
       GS_EXIT TYPE SLIS_EXIT_BY_USER.

START-OF-SELECTION.

CLEAR: ZAP. REFRESH: ZAP.

SELECT * FROM T001 APPENDING TABLE ZAP.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_BUFFER_ACTIVE         = ' '
      I_STRUCTURE_NAME        = 'T001'
      I_SAVE                  = 'X'
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER = G_EXIT
      ES_EXIT_CAUSED_BY_USER  = GS_EXIT
    TABLES
      T_OUTTAB                = ZAP
    EXCEPTIONS
      PROGRAM_ERROR           = 1
      OTHERS                  = 2.