XUESSO4 ;ISD/HGW Enhanced Single Sign-On Utilities ;03/23/2020 08:58
Source file <XUESSO4.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 14 | POSTAL^XIPUTIL $$LOW^XLFSTR PARENT^XUAF4 ($$ADDUSER,$$FINDUSER,$$GETCNTXT)^XUESSO2 $$PROD^XUPROD ($$UVALID,USER)^XUS $$TXT^XUS3 $$EN^XUSAML SETCNTXT^XUSBSE1 $$ACTIVE^XUSER $$SHAHASH^XUSHSH $$CHKDGT^XUSNPI ($$INHIBIT,$$POST,NOW,POST2,VAX)^XUSRB $$LKCHECK^XUSTZIP |
VA FileMan | 3 | ^DIC FILE^DICN (,FILE,UPDATE)^DIE |
RPC Broker | 1 | $$STATE^XWBSEC |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Kernel | 3 | XUS ESSO VALIDATE XUS IAM BIND USER XUS IS USER ACTIVE |
Outpatient Pharmacy | 1 | PSONVAP2 |
VistALink | 1 | XOBVSAML |
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 |
|
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
|
Name | Field # of Occurrence |
---|---|
^DIC | VACAA+85 |
FILE^DICN | VACAA+90 |
^DIE | VACAA+81, VACAA+96 |
FILE^DIE | IAMBU+29 |
UPDATE^DIE | APPLY+4 |
POSTAL^XIPUTIL | VACAA+62 |
$$LOW^XLFSTR | IAMBU+26 |
PARENT^XUAF4 | VACAA+37 |
$$ADDUSER^XUESSO2 | VACAA+49 |
$$FINDUSER^XUESSO2 | IAMBU+17, VACAA+42, VACAA+48 |
$$GETCNTXT^XUESSO2 | IAMBU+13 |
$$PROD^XUPROD | VACAA+26 |
$$UVALID^XUS | ESSO+28 |
USER^XUS | ESSO+27 |
$$TXT^XUS3 | ESSO+37 |
$$EN^XUSAML | ESSO+24 |
SETCNTXT^XUSBSE1 | ESSO+36 |
$$ACTIVE^XUSER | VACAA+48, VACAA+76, ACTIVE+3 |
$$SHAHASH^XUSHSH | VACAA+25 |
$$CHKDGT^XUSNPI | VACAA+36 |
$$INHIBIT^XUSRB | ESSO+21 |
$$POST^XUSRB | ESSO+31 |
NOW^XUSRB | ESSO+17 |
POST2^XUSRB | ESSO+33 |
VAX^XUSRB | ESSO+21, ESSO+23, ESSO+25, ESSO+30 |
$$LKCHECK^XUSTZIP | ESSO+23 |
$$STATE^XWBSEC | ESSO+19 |
RPC Name | Call Tags |
---|---|
XUS ESSO VALIDATE | ESSO |
XUS IAM BIND USER | IAMBU |
XUS IS USER ACTIVE | ACTIVE |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("VOL" | ESSO+20 |
^DD("DILOCKTM" | VACAA+81, VACAA+90, VACAA+96 |
^DD(200 | VACAA+88 |
^DIC(5 - [#5] | VACAA+59 |
^DIC(7 - [#7] | VACAA+93 |
^TMP("DIERR" | IAMBU+20!, APPLY+2! |
^VA(200 - [#200] | VACAA+71, VACAA+73, VACAA+74, VACAA+81, VACAA+82, VACAA+83, VACAA+88*, VACAA+90, VACAA+91, VACAA+96 , VACAA+97 |
^XTV(8989.3 - [#8989.3] | IAMBU+23, IAMBU+24 |
^XWB(8994.5 - [#8994.5] | IAMBU+14, ESSO+35 |
Name | Line Occurrences |
---|---|
$$REMOTEOK | ESSO+29, ESSO+32 |
APPLY | VACAA+66, VACAA+72, VACAA+75, VACAA+79 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADUPN | IAMBU~, IAMBU+26 |
AUTH | REMOTEOK+1~, REMOTEOK+3*, REMOTEOK+4 |
AUTHCODE | IAMBU~, IAMBU+12, IAMBU+13, VACAA~, VACAA+25 |
>> DA | VACAA+80*, VACAA+84*, VACAA+95* |
>> DA(1 | VACAA+89* |
DD | VACAA+90! |
DIC | VACAA+85!*, VACAA+86!, VACAA+89*, VACAA+90! |
DIC("DR" | VACAA+89* |
DIC(0 | VACAA+85*, VACAA+89*, APPLY+3* |
>> DIE | VACAA+80*, VACAA+95* |
>> DIERR | IAMBU+31 |
>> DINUM | VACAA+89* |
>> DLAYGO | VACAA+89* |
DO | VACAA+90! |
DOC | ESSO~, ESSO+24 |
DR | VACAA+80*, VACAA+90!, VACAA+95* |
DT | VACAA+83, VACAA+89 |
DUZ | IAMBU+10, IAMBU+18, IAMBU+21, IAMBU+32, VACAA+89, VACAA+97, ESSO+17*, ESSO+24*, ESSO+25, ESSO+27 , ESSO+29, ESSO+31, ESSO+32*, ESSO+33, ESSO+37, REMOTEOK~, ACTIVE+2 |
DUZ("AUTHENTICATION" | REMOTEOK+3 |
DUZ("REMAPP" | ESSO+34, ESSO+35, REMOTEOK+2 |
DUZ(0 | IAMBU+28*, IAMBU+30*, VACAA+40*, VACAA+97*, ESSO+17* |
DUZ(2 | VACAA+37 |
DUZZERO | IAMBU+9~, IAMBU+28*, IAMBU+30 |
FADA | VACAA+24~, VACAA+86*, VACAA+88, VACAA+89, VACAA+90 |
FDR | IAMBU+9~, IAMBU+29, VACAA+24~, VACAA+66!, VACAA+72!, VACAA+75!, VACAA+79, APPLY~, APPLY+4 |
FDR(200 | IAMBU+22*, IAMBU+23*, IAMBU+24*, IAMBU+25*, IAMBU+26*, VACAA+52*, VACAA+53*, VACAA+54*, VACAA+55*, VACAA+56* , VACAA+57*, VACAA+64*, VACAA+65*, VACAA+71*, VACAA+73*, VACAA+74*, VACAA+78* |
IEN | IAMBU+9~, IAMBU+21*, IAMBU+22, IAMBU+23, IAMBU+24, IAMBU+25, IAMBU+26, VACAA+24~, VACAA+51*, VACAA+52 , VACAA+53, VACAA+54, VACAA+55, VACAA+56, VACAA+57, VACAA+64, VACAA+65, VACAA+66*, VACAA+71, VACAA+72* , VACAA+73, VACAA+74, VACAA+75*, VACAA+78, VACAA+79, APPLY~, APPLY+4! |
INARRAY | VACAA~ |
INARRAY(0 | VACAA+27, VACAA+39 |
INARRAY(1 | VACAA+28, VACAA+47 |
INARRAY(10 | VACAA+33, VACAA+36, VACAA+41 |
INARRAY(11 | VACAA+67 |
INARRAY(12 | VACAA+77, VACAA+80 |
INARRAY(13 | VACAA+34, VACAA+44 |
INARRAY(14 | VACAA+35, VACAA+45 |
INARRAY(2 | VACAA+52 |
INARRAY(3 | VACAA+53 |
INARRAY(4 | VACAA+29, VACAA+54 |
INARRAY(5 | VACAA+55 |
INARRAY(6 | VACAA+56 |
INARRAY(7 | VACAA+30, VACAA+57 |
INARRAY(8 | VACAA+31, VACAA+58, VACAA+59, VACAA+60 |
INARRAY(9 | VACAA+32, VACAA+62, VACAA+65 |
IO("IP" | ESSO+23 |
REMOTE | REMOTEOK+1~, REMOTEOK+2*, REMOTEOK+4 |
RES | ACTIVE~, ACTIVE+3* |
RET | ESSO~ |
RET(0 | ESSO+15*, ESSO+37* |
RET(1 | ESSO+37* |
RET(2 | ESSO+37* |
RET(3 | ESSO+37* |
RET(4 | ESSO+37* |
RET(5 | ESSO+15* |
SECID | IAMBU~, IAMBU+11, IAMBU+16, IAMBU+17, IAMBU+22, IAMBU+25 |
U | IAMBU+14, IAMBU+23, IAMBU+24, VACAA+38, VACAA+71, VACAA+73, VACAA+74, VACAA+97, ESSO+15*, ESSO+35 |
VCCH | ESSO+14~, ESSO+18* |
VIEN | VACAA+24~, VACAA+38* |
VISN | VACAA+24~, VACAA+38*, VACAA+39 |
X | VACAA+24~, VACAA+85*, VACAA+87*, VACAA+89, VACAA+90!, VACAA+92*, VACAA+93*, VACAA+94, VACAA+95, ESSO+14~ |
XARRY | IAMBU+9~, IAMBU+17, ESSO+14~ |
XARRY(7 | IAMBU+16* |
XATTRIB | VACAA+24~, VACAA+42, VACAA+48, VACAA+49 |
XATTRIB(1 | VACAA+44* |
XATTRIB(2 | VACAA+45* |
XATTRIB(3 | VACAA+46* |
XATTRIB(4 | VACAA+47* |
XATTRIB(8 | VACAA+41*, VACAA+46 |
XDIV | ESSO+14~ |
XDIVA | ESSO+14~ |
XDUZ | VACAA+24~, VACAA+42*, VACAA+48*, VACAA+49*, VACAA+50, VACAA+51, VACAA+66, VACAA+71, VACAA+72, VACAA+73 , VACAA+74, VACAA+75, VACAA+76, VACAA+80, VACAA+81, VACAA+82, VACAA+83, VACAA+84, VACAA+86, VACAA+91 , VACAA+95, VACAA+96, VACAA+98 |
XIP | VACAA+24~, VACAA+61*, VACAA+62 |
XIP("STATE PO | INTER" , VACAA+63 |
XOPT | ESSO+14~, ESSO+19* |
XOPTION | ESSO+14~, ESSO+35*, ESSO+36 |
XRESULT | IAMBU+9~, IAMBU+17*, IAMBU+18 |
XSEC | VACAA+24~ |
XSTATE | VACAA+24~, VACAA+59*, VACAA+63*, VACAA+64 |
XTAXID | VACAA+24~, VACAA+67*, VACAA+68, VACAA+69*, VACAA+70*, VACAA+71 |
XUDEV | ESSO+14~, ESSO+15* |
XUENTRY | IAMBU+9~, IAMBU+13*, IAMBU+14 |
XUF | ESSO+14~, ESSO+15* |
XUHOME | ESSO+14~ |
XUIAM | IAMBU+9~, IAMBU+15*, VACAA+24~, VACAA+40* |
XUIEN | ACTIVE~, ACTIVE+2*, ACTIVE+3 |
XUM | ESSO+14~, ESSO+15*, ESSO+21*, ESSO+26*, ESSO+37 |
XUMSG | ESSO+14~, ESSO+15*, ESSO+21*, ESSO+23*, ESSO+26*, ESSO+28*, ESSO+29*, ESSO+30, ESSO+31*, ESSO+32 , ESSO+37 |
XUVISN | VACAA+24~ |
XUVISN("P" | VACAA+38 |
XUVOL | ESSO+14~, ESSO+20* |
Y | IAMBU~, IAMBU+10*, IAMBU+11*, IAMBU+12*, IAMBU+13*, IAMBU+14*, IAMBU+18*, IAMBU+31*, IAMBU+32*, VACAA+24~ , VACAA+87, VACAA+90!, ESSO+14~ |