REPORT ZPWDDEL. ************************************************** * * * Dieses Programm setzt die Paßworthistorie * * zurück, so daß ein User sein altes Paßwort * * weiter benutzen kann. * * * * 21.09.05 * * Ergänzung für ein verlorenes Passwort * * Mandant = Mandant, wo das Passwort verändert * * werden soll. * * Modify = Hier ein X setzen, wenn verändert * * werden soll. * * Hexpass = Verschlüsseltes Passwort des gleichen* * Users aus einem anderen System * *------------------------------------------------* * gefunden im Netz * * Original von:IMRE KABAI * ************************************************** TABLES: USR02. PARAMETERS: USER LIKE USR02-BNAME, Mandant LIKE USR02-MANDT, Modify(1) type c, HexPass LIKE USR02-BCODE.SELECT * FROM USR02 client specified WHERE BNAME = USER and Mandt = Mandant. ENDSELECT.IF SY-SUBRC = 0. if Modify = 'X'. usr02-bcode = Hexpass. usr02-uflag = '0'. update usr02 client specified. write: / 'Passwort geändert.'. else. USR02-OCOD1 = USR02-OCOD2 = USR02-OCOD3 = USR02-OCOD4 = USR02-OCOD5 = USR02-BCODE. usr02-bcda1 = usr02-bcda2 = usr02-bcda3 = usr02-bcda4 = usr02-bcda5 = usr02-erdat. MODIFY USR02. write: / 'Paßworthistorie erfolgreich zurückgesetzt!'. endif. ELSE. WRITE: / 'Benutzer nicht vorhanden!'. ENDIF. | |
Client 800: SE16N - Table USR02 - Read HEX value | Client 800 - Change DDIC password |
Client 800 control HEX value was overwritten | Client 800 - Enter HEX value - Save |
PW set | Client 000 Login (Possibly set new password, since 90 days have passed) |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
4 | |
2 | |
2 | |
2 | |
2 | |
2 | |
1 | |
1 | |
1 | |
1 |