topic Re: Internal table help in Application Development and Automation Discussions

Internal table help

Former Member — Wed, 02 Feb 2005 14:45:08 GMT

Hi,

I have an internal table and i would like to read a bunch of records that matches the selection criteria in one step (without using a loop), just like we do using select statement from a DB table...

This is what I currently have...

INTTABLE1 IS A SORTED TABLE WITH KEY F1 F2 F3 F4.

LOOP AT INTTABLE1 INTO S_WORKAREA.

IF S_WORKAREA-F1 = INTTABLE2-F1 AND

S_WORKAREA-F2 = INTTABLE2-F2 AND

S_WORKAREA-F3 = INTTABLE2-F3 AND

S_WORKAREA-F4 = INTTABLE2-F4.

APPEND S_WORKAREA-F5 TO INTTABLE3.

ENDIF.

ENDLOOP.

So, I would like to get rid of this LOOP and still be able to append all the matching records to INTTABLE3. Is there any functionality like that, which lets me do it.

Thanks alot

John

Re: Internal table help

Former Member — Wed, 02 Feb 2005 15:15:27 GMT

Hi John,

I'm afraid there's no such ABAP statement. But there is indeed a trick you can use:

- First of all, define an itab with the same structure as INTTABLE1, say INTTABLE1_COPY.

- Then, write INTTABLE1_COPY[] = INTTABLE1[].

- Finally, write DELETE INTTABLE1_COPY WHERE NOT (your_condition)

...and that's it.

Please tell me if it worked. BR,

Alvaro

Re: Internal table help

christian_wohlfahrt — Wed, 02 Feb 2005 15:18:40 GMT

Hi John!

a) There is no generic access with read tables.

b) You can copy whole table and delete entries not matching your requirements - 2 statements, but in one step you will have twice the amount of data.

c) Something like this:

read inttable1 with key ....
loop at inttable1 from sy-tabix into wa.
if wa-key <> wa2-key.
exit.
endif.
append wa to inttable2.
endloop.

Advantage: you will only loop over required entries.

Disadvantage: more lines of coding (but fast and small memory usage).

Regards,

Christian

Re: Internal table help

Former Member — Wed, 02 Feb 2005 15:25:28 GMT

Hi John,

the only possibility I can imagine is doing some reads instead of looping.

Something like this:

read table inttable1 into s_workarea with key ...

if sy-subrc = 0.

l_tabix = sy-tabix.

while sy-subrc = 0.

l_tabix = l_tabix + 1.

read table inttable1 into s_workarea index l_tabix.

check the keyfields now and exit if not ok.

endwhile.

endif.

This is not very nice too, but may be a bit faster as you are dealing with a sorted or may be better a hashed table.

Another option (if you know the index of the first and the last relevant row) is doing a:

append lines of inttable1 from index1 to indexl to inttable3.

regards

Siggi

Re: Internal table help

Former Member — Wed, 02 Feb 2005 15:29:40 GMT

You are going to have to read thru the internal table somehow so try this:

LOOP AT INTTABLE1 ASSIGNING <S_WORKAREA>
  WHERE F1 = INTTABLE2-F1 and
        F2 = ...

  APPEND <S_WORKAREA-F5> to INTTABLE3.

ENDLOOP.

This will allow you to take advantage of the fact that you have a sorted table.

If your key is unique in your sorted table then try:

  READ TABLE INTTABLE1 ASSIGNING <S_WORKAREA>
    WITH TABLE KEY
      F1 = INTTABLE2-F1
      F2 = ...

  APPEND <S_WORKAREA-F5> to INTTABLE3.

Field symbol <S_WORKAREA> is type line of INTTABLE1.

Re: Internal table help

Former Member — Wed, 02 Feb 2005 18:21:04 GMT

Alvaro and everyone else,

Thanks a lot for your inputs....I used Alvaro's code...it works fine and gets rid of the loop.

Thanks

John