设定ABAP程序为only if the writer of the code run it

data: xtrdir type trdir.

SELECT SINGLE * INTO xtrdir
FROM trdir
WHERE name = sy-repid
AND cnam = sy-uname.
IF sy-subrc <> 0.
MESSAGE e001(00) WITH 'Silly Rabbit, you cant run this report'.
ENDIF.