farkli internal table bir table atma

differen internal table call in one table
*&---------------------------------------------------------------------*
*& Report ZSLY_0020
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT ZSLY_0020.
TABLES: EKKO,EKPO,EKKN.
DATA:BEGIN OF IT_EKKO OCCURS 0,
BUKRS LIKE EKKO-BUKRS,
EBELN LIKE EKKO-EBELN,
BSART LIKE EKKO-BSART,
ZTERM LIKE EKKO-ZTERM,
END OF IT_EKKO.
DATA:BEGIN OF IT_EKPO OCCURS 0,
EBELN LIKE EKPO-EBELN,
EBELP LIKE EKPO-EBELP,
MATNR LIKE EKPO-MATNR,
WERKS LIKE EKPO-WERKS,
END OF IT_EKPO.
DATA:BEGIN OF IT_EKKN OCCURS 0,
EBELN LIKE EKKN-EBELN,
AEDAT LIKE EKKN-AEDAT,
EBELP LIKE EKKN-EBELP,
ZEKKN LIKE EKKN-ZEKKN,
END OF IT_EKKN.


SELECT-OPTIONS S_EBELN FOR EKKO-EBELN.
SELECT-OPTIONS S_EBELP FOR EKPO-EBELP.
SELECT-OPTIONS S_ZEKKN FOR EKKN-ZEKKN.
SELECT * FROM EKKO WHERE EBELN IN S_EBELN.
IT_EKKO-EBELN = EKKO-EBELN.
IT_EKKO-BUKRS = EKKO-BUKRS.
IT_EKKO-BSART = EKKO-BSART.
IT_EKKO-ZTERM = EKKO-ZTERM.
APPEND IT_EKKO.
ENDSELECT.

"MODIFY IT_GEN.
SELECT * FROM EKPO WHERE EBELP IN S_EBELP.
IT_EKPO-EBELN = EKPO-EBELN.
IT_EKPO-EBELP = EKPO-EBELP.
IT_EKPO-MATNR = EKPO-MATNR.
IT_EKPO-WERKS = EKPO-WERKS.
APPEND IT_EKPO.
ENDSELECT.
"MODIFY IT_GEN.
SELECT * FROM EKKN WHERE ZEKKN IN S_ZEKKN.
IT_EKKN-EBELN = EKKN-EBELN.
IT_EKKN-AEDAT = EKKN-AEDAT.
IT_EKKN-EBELP = EKKN-EBELP.
IT_EKKN-ZEKKN = EKKN-ZEKKN.
APPEND IT_EKKN.
ENDSELECT.
"MODIFY IT_GEN.

DATA:BEGIN OF IT_GEN OCCURS 100,
IT_EKKO LIKE IT_EKKO OCCURS 0,
IT_EKPO LIKE IT_EKPO OCCURS 0,
IT_EKKN LIKE IT_EKKN OCCURS 0,
END OF IT_GEN.
APPEND LINES OF IT_EKKO TO IT_GEN-IT_EKKO.
APPEND LINES OF IT_EKPO TO IT_GEN-IT_EKPO.
APPEND LINES OF IT_EKKN TO IT_GEN-IT_EKKN.
WRITE 'hello'.