topic Re: single record fetching in Application Development and Automation Discussions

single record fetching

Former Member — Tue, 06 Jan 2009 06:59:08 GMT

Hi all,

I m doing a report in which i have collected the data in 3 internal tables and now i want to disply them

row by row . like only 1 row of 1st table , only 1st row of 2nd table, only 1st row of 3rd table. then 2nd of each...

im bit confused in it. im trying to do it by looping it but its not getting so plzz help me out..

thanx.........

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:02:48 GMT

Hi,

I am getting ur points. Can u show me the code which u did.

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:02:51 GMT

use READ table itab1 index 1

READ table itab2 index 1

READ table itab3 index 1

in index u can use a variable so next time it gets row 2 of all table and then row 3 like that....

Edited by: kartik tarla on Jan 6, 2009 12:33 PM

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:04:11 GMT

HI Nilesh,

Prepare one temporaty table, looping first table and append to the temp table with the INDEX 1 and like that do all for other tables also.

hope it will solves your problem.

Thanks

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:04:59 GMT

Hi,

In my understanding of ur problem, u can loop the 1st internal table first and do the write statement and loop the 2nd one and do write and loop the 3rd one and do write the entries.

Thanks.

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:07:04 GMT

YOU CAN DO LIKE THIS.................

DATA : v_index type sy-tabix.
loop at ITAB1 into WA_TAB1.
V_INDEX = SY-TABIX.
WRITE : / "WRITE ROW OF ITAB1
READ ITAB2 INTO WA_TAB2 INDEX V_INDEX.
READ ITAB3 INTO WA_TAB3 INDEX V_INDEX.
WRITE : / "WRITE ROW OF ITAB2
WRITE : / "WRITE ROW OF ITAB3
endloop.

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:07:36 GMT

Hi,

use SELECT SINGEL................

Regards,

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:11:40 GMT


> use READ table itab1 index 1
>       READ table itab2 index 1
>       READ table itab3 index 1
> 
> in index u can use a variable so next time it gets row 2 of all table and then row 3 like that....
> 
> Edited by: kartik tarla on Jan 6, 2009 12:33 PM

can u tel me this in more brief..?

bcoz im using nested looping but in 3rd table the thngs are going wrong.

thanx

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:12:59 GMT

Hi,

This is easy if u have same number of records in all the tables.

Use the following coding

loop at itab1.

read table itab1 index sy-index.

//write here

read table itab2 index sy-index.

//write here

read table itab3 index sy-index.

//write here

endloop.

Please let me know if the table has differnt number of entries.... I ll give the code for it

Edited by: Bala Shanmuga Priyan on Jan 6, 2009 8:13 AM

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:16:16 GMT

Hi,

define another variable in each internal table (like INDEX).

for each internal table loop pass sy-tabix to index.

now, make final internal table (with entries of all the 3 tables) and SORT the final table with index ascending.

APPEND liens of itab1 to itab.

APPEND liens of itab2 to itab.

APPEND liens of itab3 to itab.

sort itab by index.

LOOP AT itab.

write : itab-...,

itab-....

ENDLOOP.

Hope it works for ur req...

Let me know if you need any further help!!

Regards,

Pavan

Edited by: vishnu Pavan on Jan 6, 2009 8:17 AM

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:18:58 GMT


> Hi,
> 
> This is easy if u have same number of records in all the tables.
> 
> Use the following coding
> 
> loop at itab1.
>      read table itab1 index sy-index.
>      //write here
>      read table itab2 index sy-index. 
>      //write here
>      read table itab2 index sy-index. 
>      //write here
> endloop.
> 
> Please let me know if the table has differnt number of entries.... I ll give the code for  it

yes,

1st table may have 2 entries. so at start 1st record of 1st tab. 1 or 2 records of 2nd tab. same like 3rd.

again 2nd row of 1st tab. corresponding records from 2nd and then 3rd...

thanx..

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:19:34 GMT

Hi Nilesh can you tell me whether the number of records in all three tables is same?

then u can just get the number of record for any of the table with DESCRIBE stnt and using a DO-ENDDO loop simply read the table using READ TABLE stmt and pass the loop index.

like follows

data: lv_lin type i, lv_index type i.

DESCRIBE itab1 lines lv_lin.

do lv_lins times.

lv_index = sy-index.

read table itab1 index lv_index.

read table itab2 index lv_index.

read table itab3 index lv_index.

enddo.

if the number of record are dissimilar then get the no of records for each of the itab and use greatest value for the DO loop.

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:27:01 GMT

> >


> > Hi,
> > 
> > This is easy if u have same number of records in all the tables.
> > 
> > Use the following coding
> > 
> > loop at itab1.
> >      read table itab1 index sy-index.
> >      //write here
> >      read table itab2 index sy-index. 
> >      //write here
> >      read table itab2 index sy-index. 
> >      //write here
> > endloop.
> > 
> > Please let me know if the table has differnt number of entries.... I ll give the code for  it

> yes,

> 1st table may have 2 entries. so at start 1st record of 1st tab. 1 or 2 records of 2nd tab. same like 3rd.

> again 2nd row of 1st tab. corresponding records from 2nd and then 3rd...

> thanx..

plz reply back with code as u told b4....

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:31:38 GMT

Hi Nilesh,

Use the following code. It works for all cases!!!!

Data : f1,f2,f3.

while f1 NE 'X' or f2 NE 'X' or f3 NE 'X'.
   
     if f1 NE 'X'.
        read table itab1 index sy-index.
        if sy-subrc <> 0.
            f1 = 'X'.
        else.
           //write contents of table 1!!
        endif.
    else.
      //Leave space for blank table 1 entries!!!

     endif. 
    
      if f2 NE 'X'.
        read table itab2 index sy-index.
        if sy-subrc <> 0.
            f2 = 'X'.
        else.
           //write contents of table 2!!
        endif.
    else
         //Leave space for blank table 2 entries!!!
     endif.

  if f3 NE 'X'.
        read table itab3 index sy-index.
        if sy-subrc <> 0.
            f3 = 'X'.
        else.
           //write contents of table 3!!
        endif.
    else
         //Leave space for blank table 3 entries!!!
     endif.
endwhile.

Hpe this helps!!!

Edited by: Bala Shanmuga Priyan on Jan 6, 2009 8:32 AM

Edited by: Bala Shanmuga Priyan on Jan 6, 2009 8:33 AM

Edited by: Bala Shanmuga Priyan on Jan 6, 2009 8:37 AM

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:37:54 GMT

Hi i Made a few changes to code please try the new code!!

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:39:09 GMT

what is the easy way to display o/p like this using loops.

1st row of 1st table.

1st row of 2nd table

1st row of 3rd table

2nd row of 1st table.

2nd row of 2nd table

2nd row of 3rd table.

thats it.

but by nesting the tables its giving prob.

thanx.....

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:46:01 GMT

Hi,

I think the following prg will help u.

tables: spfli, sflight.

data: it_spfli type STANDARD TABLE OF spfli,

wa_spfli like LINE OF it_spfli,

it_sflight TYPE STANDARD TABLE OF sflight,

wa_sflight LIKE LINE OF it_sflight.

types: BEGIN OF x_result,

carrid type spfli-carrid,

connid TYPE sflight-connid,

END OF x_result.

DATA: it_result TYPE TABLE OF x_result,

wa_result LIKE LINE OF it_result.

DATA: count TYPE i,

n_count TYPE i.

START-OF-SELECTION.

select carrid connid from spfli INTO CORRESPONDING FIELDS OF TABLE

it_spfli .

SELECT carrid connid FROM sflight INTO CORRESPONDING FIELDS OF TABLE

it_sflight.

LOOP AT it_spfli INTO wa_spfli .

count = count + 1.

ENDLOOP.

LOOP AT it_sflight INTO wa_sflight .

count = count + 1.

ENDLOOP.

n_count = 0.

DO count TIMES.

n_count = n_count + 1.

READ TABLE it_spfli INTO wa_spfli INDEX n_count.

if sy-subrc eq 0.

move: wa_spfli-carrid to wa_result-carrid,

wa_spfli-connid to wa_result-connid.

append wa_result to it_result.

ENDIF.

read TABLE it_sflight INTO wa_sflight INDEX n_count.

if sy-subrc eq 0.

MOVE: wa_result-carrid to wa_result-carrid,

wa_sflight-connid to wa_result-connid.

append wa_result to it_result.

endif.

enddo.

loop at it_result INTO wa_result.

write:/ wa_result-carrid, wa_result-connid.

ENDLOOP.

u can understand it and modify the requirement as per urs.

Give points if it is helpful.

Thanks.

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:47:10 GMT


> Hi i Made a few changes to code please try the new code!!

for that i need some time

thanxx.....

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:49:38 GMT


> Hi i Made a few changes to code please try the new code!!

thanx i need some time to try it...

thanx..

Re: single record fetching

Former Member — Tue, 06 Jan 2009 07:49:48 GMT


> Hi i Made a few changes to code please try the new code!!

thanx i need some time to try it...

thanx..