topic Re: Select some fields internal table in Application Development and Automation Discussions

Select some fields internal table

Former Member — Thu, 08 Jan 2015 16:39:04 GMT

Hi, i have an internal table "itab" with a lot of fields. table is sorted.

Like this

Header 1	Header 2	Header 3
a	2132	123
a	312	123
a	312	312
b	132	132
c	32	123
c	12	13

lets say i want the last lines of the different values of Header 1.

in this case, the last one where header 1 is a, then last one where is b, last one where it is c

a 312 312

b 132 132

c 12 13

is there any simple solution?

Re: Select some fields internal table

former_member538259 — Thu, 08 Jan 2015 18:04:39 GMT

that table is sorted only by key of the header 1 so maybe your result in a future will be not the correct...

init variable actual with the first row of the table

loop.

save the actual value of header1 in a variable actual.

when the next value is different append the preview row to result table..

endloop.

here a link for abap code https://training.sap.com/shop/certification/c_taw12_731-sap-certified-development-associate---abap-with-sap-netweaver-73…

regards.

Alberto

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 18:09:20 GMT

well, i can try to search the SAP FM and get a table for each one of those aaaa bb cccc. But then again i need to read the last line. i can get that by sy-tabix right?

and then read the index = sy-tabix.

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 18:59:11 GMT

hi bruno,

Try this code for the solution.

REPORT ZR_TEST2.

TYPES: BEGIN OF TY,
         HEADER1 TYPE C LENGTH 10,
         HEADER2 TYPE C LENGTH 10,
         HEADER3 TYPE C LENGTH 10,
        END OF TY.

DATA: WA TYPE TY,
       WA1 TYPE TY,
       ITAB LIKE STANDARD TABLE OF WA,
       ITAB1 LIKE STANDARD TABLE OF WA.

WA-HEADER1 = 'a'.
WA-HEADER2 = '2132'.
WA-HEADER3 = '123'.
APPEND WA TO ITAB.
CLEAR WA.

WA-HEADER1 = 'a'.
WA-HEADER2 = '312'.
WA-HEADER3 = '123'.
APPEND WA TO ITAB.
CLEAR WA.

WA-HEADER1 = 'a'.
WA-HEADER2 = '312'.
WA-HEADER3 = '312'.
APPEND WA TO ITAB.
CLEAR WA.

WA-HEADER1 = 'b'.
WA-HEADER2 = '132'.
WA-HEADER3 = '132'.
APPEND WA TO ITAB.
CLEAR WA.

WA-HEADER1 = 'c'.
WA-HEADER2 = '32'.
WA-HEADER3 = '123'.
APPEND WA TO ITAB.
CLEAR WA.

WA-HEADER1 = 'c'.
WA-HEADER2 = '12'.
WA-HEADER3 = '13'.
APPEND WA TO ITAB.
CLEAR WA.

SORT ITAB BY header1.

LOOP AT ITAB INTO WA.
   WA1-HEADER1 = WA-HEADER1.
   WA1-HEADER2 = WA-HEADER2.
   WA1-HEADER3 = WA-HEADER3.

   AT END OF HEADER1.
     APPEND WA1 TO ITAB1.
   ENDAT.
ENDLOOP.

WRITE: / 'FINAL'.

LOOP AT ITAB1 INTO WA.
   WRITE: / WA-header1, WA-header2, wa-header3.
ENDLOOP.

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 20:14:06 GMT

that's it! thanks mate! works great

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 21:55:20 GMT

Although this does work in this case, I prefer to take care of things like this manually. See what happens of you sort by header3 and do AT END OF header3 in the loop.

Rob

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 23:12:29 GMT

Interesting the code (easy), is possible, explain a little about this line code:

AT END OF HEADER1.

APPEND WA1 TO ITAB1.

ENDAT.

if possible.

thanks

Re: Select some fields internal table

Former Member — Thu, 08 Jan 2015 23:37:45 GMT

Interesting, AT END have a isussue, if the column isn't the first of the table not work properly.

the Help Say..

thanks

Re: Select some fields internal table

Former Member — Fri, 09 Jan 2015 07:50:38 GMT

within the AT...... ENDAT the fields are filled with '*'. therefore before this AT....ENDAT I am assigning values to work area wa1.

AT END ... is used here to get the last record only.

Re: Select some fields internal table

Former Member — Fri, 09 Jan 2015 14:22:02 GMT


abdul raheem mohammad wrote:

within the AT...... ENDAT the fields are filled with '*'. therefore before this AT....ENDAT I am assigning values to work area wa1.

AT END ... is used here to get the last record  only.

And that's the problem. Since the dawn of time, programmers have written code to do a specific task. We need to develop code that is more easily reusable.

After all, the dirty little secret of programmers is that a large portion of what we do is <CTL>C <CTL>V.

Rob

Re: Select some fields internal table

Former Member — Fri, 09 Jan 2015 15:04:20 GMT

Any sugestion aboup a better way to do it?
Is better to check the lines of the itab with sy-tabix and then read the last one by it's index? is it possible to do it with an internal table? (it should have a header line)

sorrry the questions.

i'm starting in this whole new world of abap! all the best.

Re: Select some fields internal table

Former Member — Fri, 09 Jan 2015 15:16:02 GMT

Like I said, I prefer to do it manually. Keep a work are with the last value of the field you are interested in. Compare the next value with the old value. When it changes, do what you need to do and replace the work area with the new value.

I'm sure there are better ways. This just what I have done since running into the noted problems with AT NEW, ON CHANGE OF, etc.

Rob