BPX1PWD (__passwd, __passwd__applid) example
The following code queries/changes the password of a given
user ID. For the callable service, see __passwd, __passwd__applid (BPX1PWD, BPX4PWD) — Verify or change security information.
AMODE 64 callers use BPX4PWD (__passwd, __passwd__applid) example.
MVC USERNLEN,=F'8'
MVC USERNAME(8),=CL8'Myuserid'
MVC OLDPASSLEN,=F'8'
MVC OLDPASS(8),=CL8'MyOldPwd'
MVC NEWPASSLEN,=F'8'
MVC NEWPASS(8),=CL8'MyNewPwd'
SPACE ,
CALL BPX1PWD, Query/change user ID password +
(USERNLEN, Input: Length of user ID +
USERNAME, Input: User ID +
OLDPASSLEN, Input: Length of old password +
OLDPASS, Input: Old password +
NEWPASSLEN, Input: Length of new password +
NEWPASS, Input: New password +
RETVAL, Return value 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
VL,MF=(E,PLIST) ----------------------------------