XUESSO3 ;ISD/HGW Enhanced Single Sign-On Utilities ;02/25/16 15:33
Source file <XUESSO3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IAMFU(R,NAME,SSN,DOB,ADUPN,SECID,AUTHCODE) | ;RPC. XUS IAM FIND USER - IA #6288
; The XUSHOWSSN key is required to do lookups using PII (SSN or DoB). ; Input: One or more of Name, SSN, DoB, AD UPN, and/or SecID must be provided. ; AUTHCODE = Security Phrase for IAM Provisioning Application ; Return: Fail R(0)="-1^Error Message" ; Success R(0)=total number of entries found, from "0" to "n". ; R(1) through R(n)="DUZ^Name^NameComponents^SSN^Dob^AD UPN^SecID" |
|
| IAMDU(R,DISPDUZ,AUTHCODE) | ;RPC. XUS IAM DISPLAY USER - IA #6289
; Input: DISPDUZ = DUZ (IEN) of user to be displayed ; AUTHCODE = Security Phrase for IAM Provisioning Application ; Return: Fail R(0) ="-1^Error Message" ; Success R(0) = 1 ; R("NAME") = NAME ; R("LASTNAME") = Family Name ; R("FIRSTNAME") = Given Name ; R("MIDDLENAME") = Middle Name ; R("SUFFIX") = Suffix(es) ; R("INITIAL") = INITIAL ; R("TITLE") = TITLE ; R("NICK_NAME") = NICK NAME ; R("SSN") = SSN (<Hidden> if caller does not have XUSHOWSSN key) ; R("DOB") = DOB (<Hidden> if caller does not have XUSHOWSSN key) ; R("DEGREE") = DEGREE ; R("MAIL_CODE") = MAIL CODE ; R("STATUS") = $$ACTIVE^XUSER(DISPDUZ) ; R("DISUSER") = DISUSER ; R("TERMINATION_DATE") = TERMINATION DATE ; R("TERMINATION_REASON") = TERMINATION REASON ; R("PRIMARY_MENU_OPTION") = PRIMARY MENU OPTION ; R("SECONDARY_MENU_OPTION",0) = SECONDARY MENU OPTION (number of entries) ; R("SECONDARY_MENU_OPTION",1) to R("SECONDARY_MENU_OPTION",n) = SECONDARY MENU OPTION entries ; R("FILE_MANAGER_ACCESS_CODE") = FILE MANAGER ACCESS CODE ; R("DIVISION",0) = DIVISION (number of entries) ; R("DIVISION",1) to R("DIVISION",n) = DIVISION entries ; R("SERVICE_SECTION") = SERVICE/SECTION ; R("SUBJECT_ALTERNATIVE_NAME") = SUBJECT ALTERNATIVE NAME (PIV CARD) ; R("SECID") = SECID ; R("ORGANIZATION_NAME") = SUBJECT ORGANIZATION ; R("ORGANIZATION_ID") = SUBJECT ORGANIZATION ID ; R("UNIQUE_USER_ID") = UNIQUE USER ID ; R("NETWORK_USER_NAME") = NETWORK USERNAME ; R("AD_UPN") = ADUPN ; R("EMAIL") = EMAIL ADDRESS ; R("GENDER") = SEX (M/F) |
|
| IAMAU(R,NAME,SECID,EMAIL,ADUPN,SSN,DOB,STATION,AUTHCODE) | ;RPC. XUS IAM ADD USER - IA #6290
; The XUSPF200 security key is required to add a user without an SSN (file #200 special privileges). ; Input: NAME = SubjectID to be used in SAML Token ; SECID = UniqueUserID to be used in SSOi or SSOe SAML Token ; EMAIL = User's e-mail address ; ADUPN = Active Directory User Principle Name ; SSN = User's Social Security Number or Taxpayer Identification Number ; DOB = User's Date of Birth ; STATION = NEW PERSON file (#200) DIVISION ; AUTHCODE = (Required) Security Phrase for IAM Provisioning Application ; Return: Fail R(0) = "-1^Number of Errors" ; R(1) through R(n) = "Error Message" ; Success R(0) = "DUZ^STATION" |
|
| IAMEU(R,INARRY,AUTHCODE) | ;RPC. XUS IAM EDIT USER - IA #6291
; The XUSHOWSSN security key is required to allow edit of PII (SSN and DoB). ; Input: INARRY("SECID") = SecID - Used to identify entry to be edited ; INARRAY("LASTNAME") = User NAME is "LASTNAME,FIRSTNAME MIDDLENAME SUFFIX" ; INARRAY("FIRSTNAME") ; INARRAY("MIDDLENAME") ; INARRAY("SUFFIX") ; INARRY("ORGANIZATION_NAME")= SUBJECT ORGANIZATION ; INARRY("ORGANIZATION_ID") = SUBJECT ORGANIZATION ID ; INARRY("EMAIL") = EMAIL ADDRESS ; INARRY("AD_UPN") = ADUPN ; INARRY("SSN") = SSN ; INARRY("DOB") = DOB (Date of Birth) ; AUTHCODE = Security Phrase for IAM Provisioning Application ; Return: Fail R(0) = "-1^Number of Errors" ; R(1) through R(n) = "Error Message" ; Success R(0) = DUZ of NEW PERSON file entry that was edited |
|
| IAMTU(R,SECID,TERMDATE,TERMRESN,AUTHCODE) | ;RPC. XUS IAM TERMINATE USER - IA #6292
; Input: SECID = SECID - Used to identify entry to be edited ; TERMDATE = TERMINATION DATE ; TERMRESN = Termination Reason ; AUTHCODE = Security Phrase for IAM Provisioning Application ; Return: Fail R(0) = "-1^Number of Errors" ; R(1) through R(n) = "Error Message" ; Success R(0) = DUZ |
|
| IAMRU(R,SECID,AUTHCODE) | ;RPC. XUS IAM REACTIVATE USER - IA #6293
; Input: SECID = SECID - Used to identify entry to be edited ; AUTHCODE = Security Phrase for IAM Provisioning Application ; Return: Fail R(0) = "-1^Number of Errors" ; R(1) through R(n) = "Error Message" ; Success R(0) = 1 |
|
| ADDTOLST(XR,XCOUNT,XSHOWSSN,XRESULT) | ;Intrinsic Subroutine. Add user to list.
|
|
| NAMECOMP(IEN) | ;Intrinsic Function. Get NAME COMPONENTS.
|
|
| EDITERR(Y,XMSG) | ;Intrinsic Subroutine. Add error to list.
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| RPC Name | Call Tags |
|---|---|
| XUS IAM ADD USER | IAMAU |
| XUS IAM EDIT USER | IAMEU |
| XUS IAM FIND USER | IAMFU |
| XUS IAM DISPLAY USER | IAMDU |
| XUS IAM TERMINATE USER | IAMTU |
| XUS IAM REACTIVATE USER | IAMRU |
