*----------------------------------------------------------------------*
***INCLUDE ZALVE_CALCULADORA_STATUS_10O01 .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*&      Module  status_1000  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE status_1000 OUTPUT.
  SET TITLEBAR 'TITULIN'.
  SET PF-STATUS 'ALV_STATUS'.
  IF sy-ucomm = 'BACK'.
    LEAVE PROGRAM.
  ENDIF.

ENDMODULE.                 " status_1000  OUTPUT