Routine: XUESSO4

Information

XUESSO4 ;ISD/HGW Enhanced Single Sign-On Utilities ;03/23/2020 08:58

Source file <XUESSO4.m>

Name	Comments	DBIA/ICR reference
IAMBU(Y,SECID,AUTHCODE,ADUPN)	;RPC. XUS IAM BIND USER - ICR #6294
VACAA(INARRAY,AUTHCODE)	; Veterans Access, Choice, and Accountability Act of 2014 (VACAA) ; Bulk-load non-VA provider information. ; This interface is available under a private Integration Agreement (#6230) for support ; of VACAA only, and should not be used under any other circumstances. ; Input: INARRAY(0) = VISN ; INARRAY(1) = NAME ; INARRAY(2) = DEGREE ; INARRAY(3) = SEX ; INARRAY(4) = STREET ADDRESS 1 ; INARRAY(5) = STREET ADDRESS 2 ; INARRAY(6) = STREET ADDRESS 3 ; INARRAY(7) = CITY ; INARRAY(8) = STATE ; INARRAY(9) = ZIP ; INARRAY(10) = NPI ; INARRAY(11) = (Optional) TAX ID ; INARRAY(12) = DEA # ; INARRAY(13) = Subject Organization ; INARRAY(14) = Subject Organization ID ; Return: Fail = "-1^Error Message" ; Neutral = 0 (not an error, but entry should not be made at this site) ; Success = IEN of NEW PERSON file (#200) entry	ICR #6230 Status: Active Usage: Private
APPLY(FDR,IEN)	; Apply the changes, used by "VACAA"
ESSO(RET,DOC)	; RPC. XUS ESSO VALIDATE - IA #6295
REMOTEOK(DUZ)	;
ACTIVE(RES,XUIEN)	; XUS ACTIVE USER RPC #6294