Skip to Content
-2
A S
May 30, 2020 at 08:18 AM

save multiple entries in table control

854 Views

Hi, i am able to create and save an entry for table control and to its ztable. Currently im trying to do save multiple entry to table control and into ztable.I am able to enter multiple entries for a new record but only one record (first record) can be saved upon pressing save button.

Am I handling table control logic correctly?

        LOOP AT GT_ZEKPO INTO GWA_ZEKPO.

          GWA_ZEKPO-EBELN = GWA_ZEKKO-EBELN.

          MODIFY GT_ZEKPO FROM GWA_ZEKPO INDEX SY-TABIX.

        ENDLOOP.

        INSERT ZEKPO_03 FROM TABLE GT_ZEKPO ACCEPTING DUPLICATE KEYS.

In screen code

PROCESS AFTER INPUT.

 LOOP AT GT_ZEKPO.
 MODULE MODIFY.
 MODULE INSERT.
 ENDLOOP.

 MODULE USER_COMMAND_9002.

Table control logic:

        LOOP AT GT_ZEKPO INTO GWA_ZEKPO.

          GWA_ZEKPO-EBELN = GWA_ZEKKO-EBELN.

          MODIFY GT_ZEKPO FROM GWA_ZEKPO INDEX SY-TABIX.

        ENDLOOP.

        INSERT ZEKPO_03 FROM TABLE GT_ZEKPO ACCEPTING DUPLICATE KEYS.



*&---------------------------------------------------------------------*
*& Module MODIFY INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE MODIFY INPUT.
 READ TABLE GT_ZEKPO INTO GWA_ZEKPO INDEX TC_ZEKPO-CURRENT_LINE.

 IF MARK IS NOT INITIAL.
 GWA_ZEKPO-ZMARK = 'X'.
 MODIFY GT_ZEKPO FROM ZEKPO_03 INDEX TC_ZEKPO-CURRENT_LINE.

 ENDIF.
ENDMODULE.

*&---------------------------------------------------------------------*
*& Module INSERT INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE INSERT INPUT.

 IF SY-SUBRC NE 0.
 APPEND GWA_ZEKPO TO GT_ZEKPO .
 ENDIF.

ENDMODULE.