Atline Selection

TYPES: BEGIN OF STR,
GP,
PT TYPE INT2,
END OF STR.

DATA ITAB TYPE STANDARD TABLE OF STR.
DATA WA TYPE STR.

WA-GP = 'A'.WA-PT = 10.APPEND WA TO ITAB.
WA-GP = 'A'.WA-PT = 30.APPEND WA TO ITAB.
WA-GP = 'A'.WA-PT = 50.APPEND WA TO ITAB.
WA-GP = 'A'.WA-PT = 70.APPEND WA TO ITAB.
WA-GP = 'A'.WA-PT = 90.APPEND WA TO ITAB.

WA-GP = 'B'.WA-PT = 20.APPEND WA TO ITAB.
WA-GP = 'B'.WA-PT = 40.APPEND WA TO ITAB.
WA-GP = 'B'.WA-PT = 60.APPEND WA TO ITAB.
WA-GP = 'B'.WA-PT = 80.APPEND WA TO ITAB.
WA-GP = 'B'.WA-PT = 100.APPEND WA TO ITAB.

SORT ITAB BY GP.
LOOP AT ITAB INTO WA.
WRITE: / WA-GP, WA-PT.
HIDE: WA-GP,WA-PT.
ENDLOOP.

AT LINE-SELECTION.
LOOP AT ITAB INTO WA WHERE PT = WA-PT.
WRITE: / WA-GP, WA-PT.
ENDLOOP.