Capturing the current ALV grid contents. How?

Question

Hi forum,
After lots of searching, I still can't find out how I can get the current contents of the ALV grid. I need this for an editable ALV grid to keep track of the data changes.
By the way, I am using the traditional ALV, not OO ALV.
Let me share the steps I already did but still failed.
1
I used the FM GET_GLOBALS_FROM_SLVC_FULLSCR to have access to the CL_GUI_ALV_GRID object. I tried using some of the methods inside that class, all to no avail.
Some methods I tried were set_selected_columns and set_selected_rows and then call the method get_selected_cells. Basically, the idea is to simulate highlighting of cells, and select them using get_selected_cells. But the problem is that get_selected_cells is not returning the value (although it correctly returns the row and column that I set -- but not the value in that cell coordinates).
2
I also saw the protected method get_changed_data -- but the problem is that it is protected, so I created a subclass of CL_GUI_ALV_GRID to ZCL_GUI_ALV_GRID and copied the private attributes and methods that get_changed_data depends on. I was able to do this but GET_GLOBALS_FROM_SLVC_FULLSCR strictly returns CL_GUI_ALV_GRID. The upcast from CL_GUI_ALV_GRID to ZCL_GUI_ALV_GRID fails. So I still can't use/test get_changed_data.
3
I also saw some code regarding events. Here's a sample but this doesn't work:
    REFRESH lt_events.
    lwa_event-name = 'DATA_CHECK'. "Event name
    lwa_event-form = 'HANDLE_DATA_CHANGED'.
    APPEND lwa_event TO lt_events.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
        EXPORTING
            it_fieldcat_lvc         = it_fieldcat
            is_layout_lvc           = ls_layout
            it_events               = lt_events
FORM handle_data_changed using ref_data_changed
                          type ref to cl_alv_changed_data_protocol.
    BREAK-POINT.
ENDFORM.
I would really appreciate it (and I know a lot of other ABAPers will, too) if you could point me to how I can get the ALV grid contents. Thanks.
Kyle

Answer 1

Hi Keshav,
sure I will check those tomorrow when I get back to work.
All,
Here's the code if it helps:
*& Report  Z_ALV_EDITABLE
REPORT  Z_ALV_EDITABLE.
TYPE-POOLS:
    slis
DATA:
    BEGIN OF i_out OCCURS 0,
        operand1 TYPE i,
        operand2 TYPE i,
        operator TYPE c,
        result   TYPE i,
    END OF i_out
START-OF-SELECTION.
    PERFORM prepareData.
    PERFORM refreshResults.
    PERFORM createALV_LVC.
FORM prepareData.
    REFRESH i_out.
    DO 10 TIMES.
        i_out-operand1 = 1.
        i_out-operand2 = 2.
        i_out-operator = '+'.
        APPEND i_out.
    ENDDO.
ENDFORM.
FORM refreshResults.
    LOOP AT i_out.
        CASE i_out-operator.
            WHEN '+'.
                i_out-result = i_out-operand1 + i_out-operand2.
            WHEN '-'.
                i_out-result = i_out-operand1 - i_out-operand2.
            WHEN '*'.
                i_out-result = i_out-operand1 * i_out-operand2.
            WHEN '/'.
                IF i_out-operand2 NE 0.
                    i_out-result = i_out-operand1 - i_out-operand2.
                ENDIF.
            WHEN OTHERS.
                i_out-result = ''.
        ENDCASE.
        MODIFY i_out.
    ENDLOOP.
ENDFORM.
FORM createALV_LVC.
    DATA:
        it_fieldcat TYPE lvc_t_fcat,
        ls_layout   TYPE lvc_s_layo,
        lt_events   TYPE slis_t_event,
        lwa_event   TYPE slis_alv_event
    " Field Catalog
    PERFORM createFieldcat CHANGING it_fieldcat.
    " Sorting
    PERFORM createSort.
    " Layout
    ls_layout-cwidth_opt = 'X'.
    " Events
    REFRESH lt_events.
    lwa_event-name = 'DATA_CHECK'. "Event name
    lwa_event-form = 'HANDLE_DATA_CHANGED'.
    APPEND lwa_event TO lt_events.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
        EXPORTING
            it_fieldcat_lvc         = it_fieldcat
            is_layout_lvc           = ls_layout
*            it_sort                 =
            it_events               = lt_events
            i_callback_program      = 'Z_ALV_EDITABLE'
            i_callback_user_command = 'USER_COMMAND'
            i_callback_pf_status_set = 'PF_STATUS_SET'
            i_save                  = 'X'
        TABLES
            t_outtab                = i_out
        EXCEPTIONS
            program_error           = 1
            OTHERS                  = 2.
ENDFORM.
FORM createFieldcat CHANGING it_fieldcat TYPE lvc_t_fcat.
    DATA:
        wa_fcat LIKE LINE OF it_fieldcat
    REFRESH it_fieldcat.
    DEFINE m_append_fieldcat.
        CLEAR wa_fcat.
        wa_fcat-edit      = &1.
        wa_fcat-fieldname = &2.
        wa_fcat-scrtext_m = &3.
        APPEND wa_fcat TO it_fieldcat.
    END-OF-DEFINITION.
    m_append_fieldcat '' 'OPERAND1' 'Operand 1'.
    m_append_fieldcat '' 'OPERAND2' 'Operand 2'.
    m_append_fieldcat 'X' 'OPERATOR' 'Operator'.
    m_append_fieldcat '' 'RESULT'   'Result'.
ENDFORM.
FORM createSort.
ENDFORM.
FORM PF_STATUS_SET USING    P_EXTAB TYPE SLIS_T_EXTAB.
    SET PF-STATUS 'Z_ALV_STATUS' EXCLUDING P_EXTAB.
ENDFORM.                    "PF_STATUS_SET
FORM user_command
    USING
        r_ucomm TYPE sy-ucomm
        ls_selfield TYPE slis_selfield.
    CASE r_ucomm.
        WHEN 'REFRESH'.
            " CHECK i_out HERE IF IT CHANGED ALONG WITH THE EDITS
            BREAK-POINT.
*            PERFORM refreshALV.
    ENDCASE.
ENDFORM.
FORM handle_data_changed using ref_data_changed
                          type ref to cl_alv_changed_data_protocol.
    BREAK-POINT.
ENDFORM.