TABLES PERNR.
INFOTYPES 0008.
DATA: G_LGA TYPE
P0008-LGA01,
G_BET TYPE P0008-BET01.
START-OF-SELECTION.
GET PERNR.
RP-PROVIDE-FROM-LAST P0008 SPACE PN-BEGDA
PN-ENDDA.
DO 40 TIMES
VARYING G_LGA FROM P0008-LGA01 NEXT
P0008-LGA02
VARYING G_BET FROM P0008-BET01 NEXT
P0008-BET02
IF G_LGA EQ 'MB10'.
WRITE:/
P0008-PERNR,P0008-ENAME,P0008-BEGDA,P0008-ENDDA,G_LGA,G_BET.
EXIT.
ENDIF.
ENDDO.
