Authorization Check

Former Member — Thu, 10 Jan 2008 11:06:37 GMT

Hi,

all.

In one report i am displaying the list of executable reports.

Now if the user double clicks the code, the same T Code will be opened.

But if a particular user has no authorization, the system openes the T Code eventhough it is not authorized to do that.

For that I am using one functional module 'SUSR_AUTHORITY_CHECK_SIMULATE'.

CALL FUNCTION 'SUSR_AUTHORITY_CHECK_SIMULATE'

EXPORTING

USER_NAME = SY-UNAME

OBJECT = 'S_TCODE'

FIELD1 = 'TCD'

VAL1 = TCODE

IMPORTING

SY_SUBRC = SYSUBRC

EXCEPTIONS

NOT_AUTHORIZED = 2

The tcode is passed and if sy-subrc is set to 0 it shold allow the tCode to open.

But this is not working.

Please suggest me what to do.

Regards,

Sunny

Re: Authorization Check

Former Member — Thu, 10 Jan 2008 11:29:26 GMT

check this sample code...not a stright solution to your requirement..


DATA wa(20).
AT LINE-SELECTION.
  CLEAR wa.
  READ LINE sy-lilli LINE VALUE INTO wa.
  CALL FUNCTION 'AUTHORITY_CHECK_TCODE'
    EXPORTING
      tcode  = wa
    EXCEPTIONS
      ok     = 1
      not_ok = 2
      OTHERS = 3.
  IF sy-subrc EQ '1'.
    WRITE :/ 'You are authorised view this report'.
  ELSE.
    WRITE :/ 'you are NOT authorised to use this report'.
  ENDIF.

START-OF-SELECTION.
  WRITE :/ 'T-code List',
         / 'SM04',
         / 'SE38',
         / 'SE71'.

topic Re: Authorization Check in Application Development and Automation Discussions

Authorization Check

Re: Authorization Check