Pls help me in write a join for the following code.

Question

can any one give me optimized code for the posted query..
DATA :BEGIN OF BAPITABLE OCCURS 1,
       EDITELEM LIKE TOJTB-EDITELEM,
       FUNCTION LIKE SBAPIS-FUNCTION,
       SHORTTEXT    LIKE TFTIT-STEXT,
       END OF BAPITABLE.
          SELECT     EDITELEM  INTO (BAPITABLE-EDITELEM)
                               FROM TOJTB
                               WHERE APPLIC = APPLICATIONCODE
                               AND MODELONLY = 'R'
                               and ACTIVE = 'X'.
          SELECT FUNCTION INTO (BAPITABLE-FUNCTION)
                          FROM  SBAPIS
                          WHERE OBJECT = JEDITELEM.
         SELECT STEXT INTO (BAPITABLE-SHORTTEXT)
                      FROM TFTIT
                      WHERE SPRAS = 'EN' AND FUNCNAME = BAPITABLE-FUNCTION.
                     APPEND BAPITABLE.
                         ENDSELECT.
               ENDSELECT.
       ENDSELECT.
waiting for ur replies....
RESHALI

Answer 1

Hi
i'm giving you a sample code please change according to your requiirement.
I've taken required fields from 3 different tables and put them in one internal table.
please see the following code.
types : begin of ty_kna1,
         kunnr type kna1-kunnr,
         name1 type kna1-name1,
         vbeln type vbap-vbeln,
         erdat type vbak-erdat,
       end of ty_kna1.
data : it_kna1 type table of ty_kna1,
       wa_kna1 type ty_kna1.
data : it_fieldcat type slis_t_fieldcat_alv,
       wa_fieldcat type slis_fieldcat_alv.
start-of-selection.
  select kkunnr kname1 v1erdat v2vbeln
  into corresponding fields of table it_kna1
  from ( ( kna1 as k
    inner join vbak as v1 on kkunnr = v1kunnr )
    inner join vbap as v2 on v1vbeln = v2vbeln )
    up to 100 rows.
Reward if helpful
Regards
Lakshman