Code: Alles auswählen.
select * from trdir
into table lt_trdir
where
( cnam = 'SAP' or cnam = 'SAP*' or cnam = 'DDIC' )
and ( unam <> 'SAP' and unam <> 'SAP*' and unam <> 'DDIC'
and unam <> space )
and clas ne '$TMP'
and name not like '/%'
and name not like 'CL_O%'.
* Weitere Eingrenzungen nach Belieben
Code: Alles auswählen.
select * from trdir into ls_trdir
where name like 'ZX%'.
call function 'RS_GET_MAINPROGRAMS'
EXPORTING
name = ls_trdir-name
TABLES
mainprograms = lt_mp
EXCEPTIONS
cancelled = 1
others = 2.
endselect.