Code: Alles auswählen.
select distinct pernr from pa000 into v_pernr.
CALL FUNCTION 'HR_READ_INFOTYPE'
EXPORTING
TCLAS = 'A'
PERNR = v_pernr
INFTY = '0001'
TABLES
INFTY_TAB = ip2.
*dann halt hier machen was du willst etc.
endselect.