ALV: data_changed-Problem

Code: Alles auswählen.

MODULE pai INPUT.

  CALL METHOD cl_gui_cfw=>dispatch.
  CASE ok_code.
    WHEN 'BACK' or '%EX' or 'RW' or 'EXIT'.
      CALL METHOD grid->CHECK_CHANGED_DATA.
      clear: antwort.

      if kz_aend = 'X'.
        CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
             EXPORTING
                  DEFAULTOPTION = 'Y'
                  TEXTLINE1     = TEXT-TL1
                  TEXTLINE2     = TEXT-TL2
                  TITEL         = Text-val
                  START_COLUMN  = 25
                  START_ROW     = 6
             IMPORTING
                  ANSWER        = ANTWORT
             EXCEPTIONS
                  OTHERS        = 1.

        CASE ANTWORT.
          WHEN 'A'.
*nix tun
          WHEN 'J'.
            perform save_data.
            call method grid->free.
            set screen 0.
          WHEN 'N'.
            call method grid->free.
            set screen 0.
        ENDCASE.
      else.
        call method grid->free.
        set screen 0.
      endif.
      CLEAR ok_code.

    WHEN OTHERS.
*     do nothing
  ENDCASE.

ENDMODULE.                 " pai  INPUT