Update a internal table

[Former Member]

Hi

I need a help..

I Have a program ,which read data from three diferent tables. I create a inner join between two, but the field key to the third is diferent. At one case a need

INNER JOIN vbkd AS d ON d_{vbeln = i}vbeln_ncf

on other I need INNER JOIN vbkd AS d ON d_{vbeln = i}vbeln_rf

How can i do this ?

this is my abap code

FORM get_data.

DATA:aux_bstkd LIKE vbkd-bstkd,

aux_bstdk LIKE vbkd-bstdk.

SELECT c_{mandt c}zproc c_{grund c}frbnr_dc c_{zrejeic c}bstnk i_{zitem_dev i}mblnr_df

i_{budat_df i}bldat_df c_{matnr_dc i}menge_df i_{kunnr i}menge_drf i~vbeln_ncf

i_{vbeln_rf i}vbeln_ec i_{grund i}vkaus i_{augru i}werks i_{lgort i}st_forn i~st_cli

i_{st_glob i}tipo_ent "d_{bstkd d}bstdk

INTO CORRESPONDING FIELDS OF TABLE lt_tab

FROM ( zmm_trocas_devol AS c

INNER JOIN zmm_trocdev_item AS i ON c_{zproc = i}zproc )

• INNER JOIN vbkd AS d ON d_{vbeln = i}vbeln_ncf )

WHERE

i~zitem_dev NE ' ' AND

c~kunnr EQ s_kunnr AND

c~werks EQ s_werks AND

c~lgort EQ s_lgort AND

c~st_glob EQ 'C'.

BREAK-POINT.

ENDFORM.

i think that a solution is after this select, put a loop at lt_tab and update the field bstdk one by one... but i don´t know how to do it.

Thanks

[Former Member]

Hi Ricardo,

First you need to put a select query in 2 tables and then Loop at the join of the two table and do the select single on the basis of the output of the 2 table data.

Thanks,

Chidanand

[Former Member]

Hi,

You will have to write 2 select queries and then merge the records

SELECT c~mandt c~zproc c~grund c~frbnr_dc c~zrejeic c~bstnk i~zitem_dev i~mblnr_df
i~budat_df i~bldat_df c~matnr_dc i~menge_df i~kunnr i~menge_drf i~vbeln_ncf
i~vbeln_rf i~vbeln_ec i~grund i~vkaus i~augru i~werks i~lgort i~st_forn i~st_cli
i~st_glob i~tipo_ent "d~bstkd d~bstdk
into CORRESPONDING FIELDS OF TABLE lt_tab
FROM ( zmm_trocas_devol AS c
INNER JOIN zmm_trocdev_item AS i ON c~zproc = i~zproc )

INNER JOIN vbkd AS d ON d~vbeln = i~vbeln_ncf ) 
WHERE
i~zitem_dev NE ' ' AND
c~kunnr EQ s_kunnr AND
c~werks EQ s_werks AND
c~lgort EQ s_lgort AND
c~st_glob EQ 'C'.

SELECT c~mandt c~zproc c~grund c~frbnr_dc c~zrejeic c~bstnk i~zitem_dev i~mblnr_df
i~budat_df i~bldat_df c~matnr_dc i~menge_df i~kunnr i~menge_drf i~vbeln_ncf
i~vbeln_rf i~vbeln_ec i~grund i~vkaus i~augru i~werks i~lgort i~st_forn i~st_cli
i~st_glob i~tipo_ent "d~bstkd d~bstdk
into CORRESPONDING FIELDS OF TABLE lt_tab_2
FROM ( zmm_trocas_devol AS c
INNER JOIN zmm_trocdev_item AS i ON c~zproc = i~zproc )

INNER JOIN vbkd AS d ON d~vbeln = i~vbeln_rf ) 
WHERE
i~zitem_dev NE ' ' AND
c~kunnr EQ s_kunnr AND
c~werks EQ s_werks AND
c~lgort EQ s_lgort AND
c~st_glob EQ 'C'.

You can then loop at lt_tab and merge the entries from lt_tab_2

regards,

Advait

[former_member585060]

Hi

Try with this statement.

( (zmm_trocdev_item AS i INNER JOIN zmm_trocas_devol AS c

ON i_{zproc = c}zproc)

INNER JOIN vbkd AS d ON i_{vbeln_ncf = d}vbeln)

WHERE

i~zitem_dev NE ' ' AND

c~kunnr EQ s_kunnr AND

c~werks EQ s_werks AND

c~lgort EQ s_lgort AND

c~st_glob EQ 'C'.

Regards

Bala Krishna

Edited by: Bala Krishna on Oct 30, 2008 4:10 PM