Enter in Tbl cntrl

Question

When I press enter in my table control, it clears all the values. How to fix my code. thank you
PROCESS BEFORE OUTPUT.
  MODULE tblcntrl_change_tc_attr.
  LOOP AT   i_items
       INTO wa_items
       WITH CONTROL tblcntrl
       CURSOR tblcntrl-current_line.
  ENDLOOP.
PROCESS AFTER INPUT.
  LOOP AT i_items.
    CHAIN.
      FIELD wa_items-txz01.
      FIELD wa_items-matnr.
      FIELD wa_items-lgort.
      FIELD wa_items-menge.
      FIELD wa_items-meins.
      FIELD wa_items-charg.
      MODULE tblcntrl_modify ON CHAIN-REQUEST.
    ENDCHAIN.
  ENDLOOP.
MODULE tblcntrl_change_tc_attr OUTPUT.
  DESCRIBE TABLE i_items LINES tblcntrl-lines.
ENDMODULE.                    "TBLCNTRL_CHANGE_TC_ATTR OUTPUT
MODULE tblcntrl_modify INPUT.
  MODIFY i_items
    FROM wa_items
    INDEX tblcntrl-current_line.
ENDMODULE.                    "TBLCNTRL_MODIFY INPUT

Answer 1

Can you please tell me that what type of internal table you are using ?
like with header line or without header line.
My code is working fine at my system,i am using internal table with header line.
See the below code :
DATA: BEGIN OF T_TCDATA OCCURS 0,
      MATNR LIKE VBAP-MATNR,
      KDMAT LIKE VBAP-KDMAT,
      KWMENG(13) TYPE N,
      CHARG LIKE VBAP-CHARG,
      END OF T_TCDATA.
T_tc is the table control
PROCESS AFTER INPUT.
LOOP AT t_tcdata.        " Looping the internal table
    MODULE table_modify.
  ENDLOOP.
  MODULE user_command_9000.
MODULE table_modify INPUT.
  MODIFY t_tcdata INDEX t_tc-current_line.
  IF sy-subrc <> 0.
    INSERT t_tcdata INDEX t_tc-current_line.
  ENDIF.
ENDMODULE.                 " table_modify  INPUT
Thanks
Seshu