JOIN for BSEG, BSIS, BSAS, MSEG, BKPF and MKPF

Question

I am developing a report related to G/L . i am using the Tables BSEG BSIS BSAS MSEG BKPF MKPF ............please give me the Joinings of these tables.......how exactly we can join and get the prefect Data....
Thank U waiting for ur replies....
Title edited by: Alvaro Tejada Galindo on Jun 3, 2008 3:41 PM

Answer 1

I have given the tables, internal tables and the select queries which can give you the join conditions of your requirement.
tables: bsis,
        bsas,
        bkpf,
        bseg,
        ekbe,
        mkpf,
        mseg.
select-options: s_hkont  for bseg-hkont,
                s_bldat  for bkpf-budat,
                s_budat  for bkpf-bldat obligatory,
                s_lifnr  for bseg-lifnr,
                s_lfbnr  for ekbe-lfbnr no intervals no-extension.
data: begin of i_bsis_bsas occurs 0,
        bukrs like bsis-bukrs,
        hkont like bsis-hkont,
        gjahr like bsis-gjahr,
        belnr like bsis-belnr,
        budat like bsis-budat,
        bldat like bsis-bldat,
        xblnr like bsis-xblnr,
        wrbtr like bsis-wrbtr,
        buzei like bsis-buzei,
      end   of i_bsis_bsas,
      begin of i_bkpf     occurs 0,
        bukrs like bsis-bukrs,
        belnr like bsis-belnr,
        gjahr like bsis-gjahr,
        xblnr like bkpf-xblnr,
        stblg like bkpf-stblg,
        awtyp like bkpf-awtyp,
        tcode like bkpf-tcode,
      end   of i_bkpf,
      begin of i_bseg     occurs 0,
        bukrs like bsis-bukrs,
        belnr like bsis-belnr,
        gjahr like bsis-gjahr,
        buzei like bseg-buzei,
        buzid like bseg-buzid,
        koart like bseg-koart,
        zuonr like bseg-zuonr,
        hkont like bseg-hkont,
        lifnr like bseg-lifnr,
        sgtxt like bseg-sgtxt,
        ebeln like bseg-ebeln,
        ebelp like bseg-ebelp,
        wrbtr like bseg-wrbtr,
      end   of i_bseg,
      begin of i_ekbe    occurs 0,
        ebeln like ekbe-ebeln,
        ebelp like ekbe-ebelp,
        gjahr like ekbe-gjahr,
        belnr like ekbe-belnr,
        buzei like ekbe-buzei,
        lfgja like ekbe-lfgja,
        lfbnr like ekbe-lfbnr,
        lfpos like ekbe-lfpos,
        matnr like ekbe-matnr,
      end   of i_ekbe,
      begin of i_mkpf_mseg occurs 0,
        mblnr like mkpf-mblnr,
        mjahr like mkpf-mjahr,
        bktxt like mkpf-bktxt,
        xblnr like mkpf-xblnr,
        frbnr like mkpf-frbnr,
        zeile like mseg-zeile,
        matnr like mseg-matnr,
        erfmg like mseg-erfmg,
      end   of i_mkpf_mseg.
*data: wa_ekbe like i_ekbe.
select  bukrs
          hkont
          gjahr
          belnr
          budat
          bldat
          xblnr
          wrbtr
          buzei appending corresponding fields of table i_bsis_bsas
                from  bsis
                where bukrs eq p_bukrs
                  and hkont in s_hkont
                  and gjahr eq p_gjahr
                  and budat in s_budat
                  and shkzg eq 'S'.
  select  bukrs
          hkont
          gjahr
          belnr
          budat
          bldat
          xblnr
          wrbtr appending corresponding fields of table i_bsis_bsas
                from  bsas
                where bukrs eq p_bukrs
                  and hkont in s_hkont
                  and gjahr eq p_gjahr
                  and budat in s_budat
                  and shkzg eq 'S'.
endform.                    " f_get_bsis_bsas_data
*&      Form  f_get_bkpf_bseg_data
      Subroutine to get BKPF and BSEG data
form f_get_bkpf_bseg_data.
  check not i_bsis_bsas[] is initial.
  select  bukrs
          belnr
          gjahr
          xblnr
          stblg
          awtyp
          tcode into table i_bkpf
                from bkpf
                 for all entries in i_bsis_bsas
               where bukrs eq i_bsis_bsas-bukrs
                 and belnr eq i_bsis_bsas-belnr
                 and gjahr eq i_bsis_bsas-gjahr.
                and awtyp = 'BKPFF'
                and tcode = 'J1IE'.
  check not i_bkpf[] is initial.
  select  bukrs
          belnr
          gjahr
          buzei
          buzid
          koart
          zuonr
          hkont
          lifnr
          sgtxt
          ebeln
          ebelp
          wrbtr  into corresponding fields of table i_bseg
                 from bseg
                  for all entries in i_bsis_bsas
                where bukrs eq i_bsis_bsas-bukrs
                  and belnr eq i_bsis_bsas-belnr
                  and gjahr eq i_bsis_bsas-gjahr.
                 and buzei eq i_bsis_bsas-buzei
                 and hkont eq i_bsis_bsas-hkont.
  delete i_bseg where not hkont in s_hkont.
endform.                    " f_get_bkpf_bseg_data
*&      Form  f_get_ekbe_data
      Subroutine to get EKBE data
form f_get_ekbe_data.
  data: $i_bseg like i_bseg occurs 0 with header line.
  $i_bseg[]  =  i_bseg[].
  delete $i_bseg where ebeln is initial.
  check not $i_bseg[] is initial.
  select ebeln
         ebelp
         gjahr
         belnr
         buzei
         lfgja
         lfbnr
         lfpos
         matnr into table i_ekbe
               from ekbe
                for all entries in $i_bseg
              where ebeln eq $i_bseg-ebeln
                and ebelp eq $i_bseg-ebelp
                and gjahr eq $i_bseg-gjahr
                and bwart = '101'.
               and belnr eq $i_bseg-belnr.
check not i_ekbe[] is initial.
  select a~mblnr
         a~mjahr
         a~bktxt
         a~xblnr
         a~frbnr
         b~zeile
         b~matnr
         b~werks
         b~erfmg  into table i_mkpf_mseg
                  from mkpf as a inner join
                       mseg as b on amblnr eq bmblnr
                                and amjahr eq bmjahr
                   for all entries in i_ekbe
                   where a~mblnr eq i_ekbe-lfbnr
                  and a~mjahr eq i_ekbe-gjahr
                  and b~zeile eq i_ekbe-lfpos
                    and b~werks eq p_werks.
<REMOVED BY MODERATOR>
Edited by: Srikanth Kadiyala on Jun 3, 2008 7:24 AM
Edited by: Alvaro Tejada Galindo on Jun 3, 2008 3:40 PM