Programmatic way to determine if a logonid has password phrase already set

Products

• ACF2 - z/OS

Issue/Introduction

Is there a programmatic way to ask ACF2 regarding a specific user whether it has a password-phrase, PWPHRASE set already or not ?

After LU06571 fix, change PWPHRASE command doesn't work if it has not been set with a value. 

 

Environment

Release : 16.0

Resolution

The indication whether PWPHRASE has been set is in a sample ACNTRY call:
MVI   ACNTFCN,ACNTFC0A       INFOSTOR ACCESS & UPDATE          00160001
         MVI   ACNTSFCN,ACNF$FRT      FORMATTED RETURN                  00170007
         MVI   ACNTFLGC,0             NO FLGC                           00180001
         LHI   R1,-1                  USE                               00190001
         ST    R1,ACNTUCB             ACF2 SUPERCALL                    00200001
         LA    R15,MSG                                                  00210001
         ST    R15,ACNTMSG                                              00220001
         MVI   ACNTFLG2,0             NO FLG2                           00230001
         MVC   ACNTTYPE,=CL4'PUSR'    STORAGE CLASS & TYPE              00240001
         MVC   ACNTSIRI,=CL40' '      INIT KEY TO BLANKS                00250001
         MVC   ACNTSIRI(8),=CL8'PWPHRASE' FIELD NAME TO KEY             00260001
         MVC   ACNTSIRI+8(8),USERID       USERID TO KEY                 00270001  

This is the ACNTRY request type that will return a formatted listing of the profile record.
The output from the ACNTRY call will contain the 3 fields as shown below:

PWP-TOD(06/28/22-13:44) PWPA1TOD(06/28/22-13:44) PWPA2TOD(00/00/00-00:00) 
.
Next, browse those fields: to determine:  
If they contain 00/00/00, that indicates there is no pass phrase set.
If any of the fields have a date value, that indicates there is a password phrase in the logonid is already set.