Reset SAP password with local report

The user you specify will have the same Client password as the Client where you login and run this program.
For e.g. if you run this program in Client XXX, the rest of the Client like 123, 456 will have the same password as Client XXX.

Like it? Share it!
TABLES: USR02, T000. DATA: PASSWD LIKE USR02-BCODE. PARAMETERS: USER LIKE USR02-BNAME. IF SY-UNAME <> 'SAP*'. WRITE: / 'Only SAP* is allowed to run this program'. EXIT. ENDIF. SELECT SINGLE * FROM USR02 WHERE BNAME = USER. IF SY-SUBRC <> 0. WRITE: / USER, 'user does not exist!'. EXIT. "No template user ENDIF. PASSWD = USR02-BCODE. CLEAR USR02. WRITE: / 'The password of', USER, 'updated in client:'. SELECT * FROM T000 WHERE MANDT <> '066' AND MANDT <> SY-MANDT. SELECT * FROM USR02 CLIENT SPECIFIED WHERE MANDT = T000-MANDT AND BNAME = USER. WRITE: / USR02-MANDT. USR02-BCODE = PASSWD. USR02-LTIME = SY-UZEIT. USR02-BCDA1 = USR02-BCDA2 = USR02-BCDA3 = SY-DATUM. USR02-BCDA4 = USR02-BCDA5 = SY-DATUM. UPDATE USR02 CLIENT SPECIFIED. ENDSELECT. ENDSELECT.

>_ Author

>_ last updated 5 yearss ago

>_ Language: ABAP

Password