Passing an internal table WITH HEADER LINE to abap object

Question

Hi. In another thread, it was explained how to pass an internal table to an abap object method. Is it possible to pass an internal table that has a header line, and RETAIN the header line once the table has been passed?
My problem is, that I can pass the table, update it, but the read buffer is not populated when returning from the object's method. This is the result of being able to pass a STANDARD TABLE type, but not a STANDARD TABLE WITH HEADER LINE.
This means that I have to read the table into a work area instead of doing a READ TABLE LKNA1 within the method, which is what I need to do.
Thanks.

Answer 1

Please check this sample program, notice that it is modifing the internal table and passing it back modified as well as passing the "work area" or "header line" back thru the exporting parameter.
report zrich_0001.
*       CLASS lcl_app DEFINITION
class lcl_app definition.
  public section.
    types: t_t001 type table of t001.
    class-data: it001 type table of t001.
    class-data: xt001 like line of it001.
    class-methods: change_table
                                exporting ex_wt001 type t001
                                changing im_t001 type t_t001.
endclass.
data: w_t001 type t001.
data: a_t001 type table of t001 with header line.
start-of-selection.
  select * into table a_t001 from t001.
  call method lcl_app=>change_table
             importing
                 ex_wt001 = w_t001
             changing
                 im_t001  = a_t001[] .
  check sy-subrc  = 0.
*       CLASS lcl_app IMPLEMENTATION
class lcl_app implementation.
  method change_table.
    loop at im_t001 into xt001.
      concatenate xt001-butxt 'Changed'
           into xt001-butxt separated by space.
      modify im_t001 from xt001.
    endloop.
    ex_wt001 = xt001.
  endmethod.
endclass.
Regards,
Rich Heilman