Re: Read from 6 tables, create 1 file

Hi Zach,

Declare an internal table as per your need.

TYPES : BEGIN OF STR,
         KUNNR TYPE KNA1-KUNNR,
         LAND1 TYPE KNA1-LAND1,
         NAME1 TYPE KNA1-NAME1,
         NAME2 TYPE KNA1-NAME2,
         ORT01 TYPE KNA1-ORT01,
         PSTLZ TYPE KNA1-PSTLZ,
         REGIO TYPE KNA1-REGIO,
         STRAS TYPE KNA1-STRAS,
         TELF1 TYPE KNA1-TELF1,
         ADRNR TYPE KNA1-ADRNR,
         VKORG TYPE KNVV-VKORG,
         VTWEG TYPE KNVV-VTWEG,
         SPART TYPE KNVV-SPART,
         INCO1 TYPE KNVV-INCO1,
         INCO2 TYPE KNVV-INCO2,
         ZTERM TYPE KNVV-ZTERM,
         PARVW TYPE KNVP-PARVW,
         PARZA TYPE KNVP-PARZA,
         KUNN2 TYPE KNVP-KUNN2,
         LIFNR TYPE KNVP-LIFNR,
         PERNR TYPE KNVP-PERNR,
         PARNR TYPE KNVP-PARNR,
         KNREF TYPE KNVP-KNREF,
         DEFPA TYPE KNVP-DEFPA,
         OBJEK TYPE AUSP-OBJEK,
         ATINN TYPE AUSP-ATINN,
         ATZHL TYPE AUSP-ATZHL,
         MAFID TYPE AUSP-MAFID,
         KLART TYPE AUSP-KLART,
         ADZHL TYPE AUSP-ADZHL,
         ATWRT TYPE AUSP-ATWRT,
         AENNR TYPE AUSP-AENNR,
         DATUV TYPE AUSP-DATUV,
         ADDRNUMBER TYPE ADRC-ADDRNUMBER,
         DATE_FROM TYPE ADRC-DATE_FROM,
         NATION TYPE ADRC-NATION,
         CITY1 TYPE ADRC-CITY1,
         CITY2 TYPE ADRC-CITY2,
         CITY_CODE TYPE ADRC-CITY_CODE,
         CITYP_CODE TYPE ADRC-CITYP_CODE,
         PERSNUMBER TYPE ADR6-PERSNUMBER,
         CONSNUMBER TYPE ADR6-CONSNUMBER,
         FLGDEFAULT TYPE ADR6-FLGDEFAULT,
         HOME_FLAG TYPE ADR6-HOME_FLAG,
         SMTP_ADDR TYPE ADR6-SMTP_ADDR,
       END OF STR.

DATA : ITAB TYPE TABLE OF STR WITH HEADER LINE.

and then select the records of the 6 tables into ITAB using INNER JOIN to fetch the values of all tables.

SELECT KNA1~KUNNR KNA1~LAND1 KNA1~NAME1 KNA1~NAME2 KNA1~ORT01 KNA1~PSTLZ KNA1~REGIO KNA1~STRAS KNA1~TELF1 KNA1~ADRNR
   KNVV~VKORG KNVV~VTWEG KNVV~SPART KNVV~INCO1 KNVV~INCO2 KNVV~ZTERM KNVP~PARVW KNVP~PARZA KNVP~KUNN2 KNVP~LIFNR KNVP~PERNR KNVP~PARNR
   KNVP~KNREF KNVP~DEFPA AUSP~OBJEK AUSP~ATINN AUSP~ATZHL AUSP~MAFID AUSP~KLART AUSP~ADZHL AUSP~ATWRT AUSP~AENNR AUSP~DATUV
   ADRC~ADDRNUMBER ADRC~DATE_FROM ADRC~NATION ADRC~CITY1 ADRC~CITY2 ADRC~CITY_CODE ADRC~CITYP_CODE
   ADR6~PERSNUMBER ADR6~CONSNUMBER ADR6~FLGDEFAULT ADR6~HOME_FLAG ADR6~SMTP_ADDR INTO CORRESPONDING FIELDS OF TABLE ITAB
   FROM KNA1 INNER JOIN KNVV ON KNA1~KUNNR = KNVV~KUNNR
   INNER JOIN KNVP ON KNA1~KUNNR = KNVP~KUNNR
   INNER JOIN ADRC ON KNA1~ADRNR = ADRC~ADDRNUMBER
   INNER JOIN ADR6 ON KNA1~ADRNR = ADR6~ADDRNUMBER
   INNER JOIN AUSP ON KNA1~KUNNR = AUSP~OBJEK.

Hope this content would be useful to you.