topic Re: fetch data in Application Development and Automation Discussions

fetch data

Former Member — Fri, 14 Mar 2008 12:35:34 GMT

i need to fetch data from five related tables based on the entries in selection screen....can anybody help me....

regards

vinod

Re: fetch data

Former Member — Fri, 14 Mar 2008 12:38:45 GMT

post the table names

Re: fetch data

Former Member — Fri, 14 Mar 2008 12:38:46 GMT

Hi,

Post the table names.

Regards,

Ramya

Re: fetch data

Former Member — Fri, 14 Mar 2008 12:40:24 GMT

Here is a sample code.. try to use primary key fields for joining tables,

**********************************************************************************

SELECT distinct A_{GJAHR A}VERSN A_{VRGNG A}KSTAR A_{OBJNR A}WRTTP A~BEKNZ

A_{LEDNR A}BUKRS A_{TWAER A}WTG001 A_{WOG001 A}MEG001

B_{BELNR B}CPUTM B_{BLDAT B}USNAM B_{XBLNR B}BLART B_{GLVOR B}KUTY2

C_{BUZEI C}EBELN C_{VBUND C}SGTXT C~WERKS

D_{SCOPE D}WKGBTR D_{BELTP D}GKONT D_{GKOAR D}OWAER D~MEINB "COEP

E_{ERSDA E}BKZKP E~PKZKP

F~LTEXT

INTO CORRESPONDING FIELDS OF TABLE ITAB FROM

CSKU AS F

INNER JOIN COSP AS A ON F_{KSTAR = A}KSTAR

INNER JOIN BKPF AS B ON A_{GJAHR = B}GJAHR

INNER JOIN COEP AS D ON B_{BELNR = D}BELNR

INNER JOIN CSKS AS E ON D_{KOKRS = E}KOKRS

WHERE A~VERSN EQ P_VERSN AND

A~GJAHR EQ P_GJAHR AND

A~PERBL EQ P_PERBL .

( BSEG~KOKRS EQ P_KOKRS ) AND

( BSEG~KOSTL EQ P_KOSTL ).

plz reward if it s helpful

Re: fetch data

rahulkavuri — Fri, 14 Mar 2008 12:40:30 GMT

Thats a very vague question..

there are many ways to fetch the data from related tables ..

we can either go for ABAP selection in a program or create a VIEW or do an ABAP query for it..

Re: fetch data

Former Member — Fri, 14 Mar 2008 12:43:08 GMT

thanks 2 all

Re: fetch data

Former Member — Fri, 14 Mar 2008 12:43:39 GMT

hi ,

here i am giving the data for 4 tables ..look at this..

report ztest.

tables:pa0002,pa0008,pa0021,pa0041.

data: begin of itab occurs 0,

pernr like pa0002-pernr,

vorna like pa0002-vorna,

nachn like pa0002-nachn,

end of itab.

data: begin of itab1 occurs 0,

pernr like pa0008-pernr,

begda like pa0008-begda,

stvor like pa0008-stvor,

ansal like pa0008-ansal,

end of itab1.

data :begin of itab2 occurs 0,

pernr like pa0021-pernr,

favor like pa0021-favor,

fanam like pa0021-fanam,

end of itab2.

data:begin of itab3 occurs 0,

pernr like pa0041-pernr,

dar01 like pa0041-dar01,

dat01 like pa0041-dat01,

end of itab3.

data:begin of final occurs 0,

pernr like pa0002-pernr,

vorna like pa0002-vorna,

nachn like pa0002-nachn,

begda like pa0008-begda,

stvor like pa0008-stvor,

ansal like pa0008-ansal,

favor like pa0021-favor,

fanam like pa0021-fanam,

dar01 like pa0041-dar01,

dat01 like pa0041-dat01,

end of final.

select-options:s_pernr for pa0002-pernr.

select pernr

vorna

nachn

from pa0002

into table itab

where pernr in s_pernr.

select pernr

begda

stvor

ansal

from pa0008

into table itab1

for all entries in itab

where pernr = itab-pernr.

select pernr

favor

fanam

from pa0021

into table itab2

for all entries in itab1

where pernr = itab1-pernr.

select pernr

dar01

dat01

from pa0041

into table itab3

for all entries in itab2

where pernr = itab2-pernr.

loop at itab.

final-pernr = itab-pernr.

final-vorna = itab-vorna.

final-nachn = itab-nachn.

read table itab1 with key pernr = itab-pernr.

final-begda = itab1-begda.

final-stvor = itab1-stvor.

final-ansal = itab1-ansal.

read table itab2 with key pernr = itab1-pernr.

final-favor = itab2-favor.

final-fanam = itab2-fanam.

read table itab3 with key pernr = itab2-pernr.

final-dar01 = itab3-dar01 .

final-dat01 = itab3-dat01.

append final.

clear final.

endloop.

loop at final.

write:final-pernr ,

final-vorna ,

final-nachn ,

final-begda ,

final-stvor ,

final-ansal ,

final-favor ,

final-fanam ,

final-dar01 ,

final-dat01 .

endloop.

regards,

venkat.