I need a report for this sample

Question

Writ a report, which displays the customer number, name , city, country from KNA1 table and corresponding fields in KNVV tables sales orgranization, distribution channel, division  for the customers in the user given range...
meaning four fields from kna1 and  three fields from KNVV table ...
give explanation if possible...
Thanks

Answer 1

Hi,
check this code
TABLES : KNA1,KNVV.
select-options : p_kunnr like kna1-kunnr.
data :BEGIN OF T_KNA1 OCCURS 0,
      KUNNR LIKE KNA1-KUNNR,
      LAND1 LIKE KNA1-LAND1,
      NAME1 LIKE KNA1-NAME1,
      END OF T_KNA1.
DATA :BEGIN OF T_KNVV OCCURS 0,
      KUNNR LIKE KNA1-KUNNR,
      VKORG LIKE KNA1-VKORG
      VTEWG LIKE KNA1-VTEWG,
      END OF T_KNVV.
FINAL INTERNAL TABLE
DATA : BEGIN OF T_FINAL OCCURS 0,
       KUNNR LIKE KNA1-KUNNR,
      LAND1 LIKE KNA1-LAND1,
      NAME1 LIKE KNA1-NAME1,
      VKORG LIKE KNA1-VKORG
      VTEWG LIKE KNA1-VTEWG,
      END OF T_FINAL.
START-OF-SELECTION
SELECT KUNNR LAND1 NAME1 FROM KNA1 INTO TABLE T_KNA1 WHERE KUNNR IN P_KUNNR
IF SY-SUBRC = 0.
select KUNNR
        VKORG VTEWG
        from KNVV
        into CORRESPONDING FIELDS OF table T_KNVV
        for all entries in T_KNA1
        where KUNNR = T_KNA1-KUNNR.
ENDIF.
LOOP AT T_KNA1.
MOVE T_KNA1-KUNNR TO T_FINAL-KUNNR.
MOVE T_KNA1-LAND1 TO T_FINAL-LAND1.
MOVE T_KNA1-NAME1 TO T_FINAL-NAME1.
READ TABLE T_KNVV WITH KEY KUNNR = T_KNA1-KUNNR.
IF SY-SUBRC = 0.
MOVE T_KNVV-VKORG TO T_FINAL-VKORG.
MOVE T_KNVV-VTEWG TO T_FINAL-VTEWG.
ENDIF.
APPEND T_FINAL.
CLEAR T_FINAL.
ENDLOOP.
LOOP AT T_FINAL.
WRITE: (FIELDS U WANT TO DISPLAY)
ENDLOOP.