Trying to distinguish USER type password change from SCA (Central) type password change - our administrators want to force USER password a minimum of 6 characters while SCA type - 8 characters .
TOP SECRET has no parameter to distinguish one from the other so TSSINSTX is called .
TXACTYPE has following values for ACID type :
* ACTYPE, SECTYPE FLAGS.
*
$ACA EQU B'11100100' Bit=1=control acid
$ASCA EQU B'10000000' Security c/acid
$ALSCA EQU B'11000000' Local SCA (?)
$AVCA EQU B'01000000' Divisional/client c/a
$ARCA EQU B'00100000' Region c/a (was $AACA)
$AZCA EQU B'00100000' Zone c/a (same as RCA)
$ADIV EQU B'00010000' Division acid
$AREGION EQU B'00001000' Region acid (was $ATCA)
$AZONE EQU B'00001000' Zone acid (same as REGION)
$ADCA EQU B'00000100' Departmental c/a
$ADEPT EQU B'00000010' Department acid
$AGROUP EQU B'00000101' Group acid
$APROF EQU B'00000001' Profile acid
$AUSER EQU B'00000000' User acid
So , I tried coding
L R2,TXACTYPE LOAD CALLER'S TYPE
TM 0(R2),B'10000000' ACID IS SCA ?
BNO NOTSCA NO , ACID IS NOT SCA
However , this code doesn't do the work .
Can someone assist ?
Regards ,
Asher