Required help in table joins for EKKO,EKPO,LFA1,ADRC,EBAN

[Former Member]

Hi ABAP experts,

I am desgining a smartform with PR data , PO data and vendor details like address,city,etc....

pls find my code below which i joined ekpo,adrc and lfa1.

DATA: BEGIN OF itab OCCURS 0,

ebeln LIKE ekko-ebeln,

lifnr LIKE ekko-lifnr,

adrnr LIKE lfa1-adrnr,

name1 LIKE adrc-name1,

house_num1 LIKE adrc-house_num1,

str_suppl1 LIKE adrc-str_suppl1,

str_suppl2 LIKE adrc-str_suppl2,

str_suppl3 LIKE adrc-str_suppl3,

building LIKE adrc-building,

END OF itab.

SELECT ekko_{ebeln ekko}lifnr lfa1_{adrnr adrc}name1 adrc~house_num1

adrc_{str_suppl1 adrc}str_suppl2 adrc_{str_suppl3 adrc}building

FROM ekko

JOIN lfa1 ON

lfa1_{lifnr = ekko}lifnr

JOIN adrc ON

adrc_{addrnumber = lfa1}adrnr

INTO CORRESPONDING FIELDS OF TABLE itab

WHERE ebeln = p_ebeln.

now i want to join eban and ekpo with the above internal table itab and display the result in a final internal table.....

plss....pls help me the continuation code, i am in the middle of a critical issue....

i need to display the values from final internal table in the smartform layout for PO,PR and vendor details.....

thanks in advance

joti

[former_member156446]

This message was moderated.

[Former Member]

Dear Joti,

Welcome to SCN !!

You can join EBAN and EKPO on the basis of banfn and bnfpo.

see the below sample code

types: BEGIN OF ty_itab1,

banfn LIKE eban-banfn,

bnfpo LIKE eban-bnfpo,

ebeln LIKE ekpo-ebeln,

ebelp LIKE ekpo-ebelp,

END OF ty_itab1.

data: itab1 type standard table of ty_itab1.

IF itab[] IS NOT INITIAL.

SELECT eban_{banfn eban}banfn

ekpo_{ebeln ekpo}ebelp

FROM eban INNER JOIN ekpo

ON eban_{banfn = ekpo}banfn

AND eban_{banfn = ekpo}banfn

INTO TABLE itab1

FOR ALL ENTRIES IN itab

WHERE ekpo~ebeln = itab-ebeln.

ENDIF.

you have data in ITAB and ITAB1 now move this data into final internal table and do whatever you want.

Hope this will help you.