XOBSCAV2 ;; kec/oak - VistaLink Access/Verify Security ; 12/09/2002 17:00
Source file <XOBSCAV2.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 3 | $$KSP^XUPARAM (CVC,INTRO)^XUSRB (DIVGET,USERINFO)^XUSRB2 |
VA FileMan | 2 | $$EZBLD^DIALOG GETS^DIQ |
VistALink | 1 | $$CHARCHK^XOBVLIB |
VistALink Security | 1 | ($$ADDDIVS,$$FAILURE,$$LOGGEDON,$$MSGTYP,$$PARTIAL,$$SUCCESS,ERROR,FSERVER,MSGTAG,MSGUPDVC,MSGUSERD,RESTYPE,SCHPARTS,SCHSIMPL,SCHUSERD,SENDSEC)^XOBSCAV |
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 |
---|---|---|
VistALink Security | 2 | XOBSCAV XOBSCAV1 |
VistALink | 1 | XOBVSYSI |
Name | Comments | DBIA/ICR reference |
---|---|---|
SENDDEM | ; respond to user demographics request
|
|
SENDDEM1 | ; success
|
|
SENDDEM0(XOBTEXT) | ; failure
|
|
ELEST(ELE,ATR) | ; -- element start event handler
|
|
ELEND(ELE) | ; -- element end event handler
|
|
CHR(TEXT) | ; -- character value event handler <tag>TEXT</tag)
; -- need to concatenate because MXML parses on ENTITY characters (<>& etc.) and ; callback gets hit multiple times even though the tag text value is just one piece of data. ; (Yes, this seems kludgie!) |
|
SENDNVC | ; respond to "change verify code" request. Use of CVC^XUSRB per DBIA #4054
|
|
SENDNVC1 | ; send verify code update success
|
|
SENDNVC0 | ; send verify code update error
|
|
SENDNVCD(XOBDIVS) | ; send verify code partial success, need divisions
|
|
GETINTRO(XOBSREF,XOBSCNTR) | ;
; XOBSREF: variable in which to store intro text (at one level descendant) ; XOBSCNT: integer subscript counter value at which to start storing text ; returns: XOBSREF containing <IntroText> element text with intro text lines in CDATA section ; XOBSCNT incremented to last subscript at which text was stored (if passed as dot-arg) ; |
FileNo | Call Tags |
---|---|
^VA(20 - [#20] | GETS^DIQ |
^VA(200 - [#200] | GETS^DIQ |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ATR | ELEST~ |
ATR("clientIp" | ELEST+13 |
ATR("clientIsProduction" | ELEST+23 |
ATR("clientPrimaryStation" | ELEST+24 |
ATR("ien" | ELEST+37 |
ATR("messageType" | ELEST+4 |
ATR("mode" | ELEST+3 |
ATR("requestCvc" | ELEST+31 |
ATR("type" | ELEST+10 |
ATR("version" | ELEST+7 |
DUZ | SENDDEM1+3, SENDDEM1+8, SENDDEM1+24, SENDNVC+2, SENDNVC+5, SENDNVC+7, SENDNVC+12* |
ELE | ELEST~, ELEST+2, ELEST+6, ELEST+9, ELEST+22, ELEST+30, ELEST+37, ELEST+40, ELEST+41, ELEST+42 , ELEND~, ELEND+2, ELEND+3, ELEND+6, ELEND+7, ELEND+8 |
TEXT | CHR~, CHR+4, CHR+5, CHR+6, CHR+7 |
U | SENDDEM1+26, SENDNVC+3 |
XOBAVCOD | ELEST+30*, ELEND+2!, ELEND+4!, CHR+4* |
XOBCCMSK | GETINTRO+6~, GETINTRO+10*, GETINTRO+14 |
>> XOBDATA("CLIENTIP" | ELEST+13* |
>> XOBDATA("CLIENTISPRODUCTION" | ELEST+23* |
>> XOBDATA("CLIENTPRIMARYSTATION" | ELEST+24* |
>> XOBDATA("MODE" | ELEST+3* |
>> XOBDATA("XOB | SECAV" , ELEST+4*, ELEST+7*, ELEST+10*, ELEST+12, ELEST+15, ELEST+18, ELEST+21, ELEST+26, ELEST+29 , ELEST+31*, ELEST+33, ELEST+36, ELEST+37*, ELEST+39, ELEND+3, ELEND+4*, ELEND+5, ELEND+6*, ELEND+7* , ELEND+8*, SENDNVC+3, SENDNVC+4! |
XOBDIV | SENDDEM1+1~ |
XOBDIVS | SENDNVCD~, SENDNVCD+3 |
XOBERR | SENDDEM1+1~, SENDDEM1+4, SENDDEM1+11 |
XOBERR("DIERR" | SENDDEM1+6, SENDDEM1+13 |
XOBI | SENDDEM1+1~, SENDDEM1+5*, SENDDEM1+6*, SENDDEM1+12*, SENDDEM1+13*, SENDDEM1+18*, SENDDEM1+19*, SENDNVC0+2~, SENDNVCD+2~, GETINTRO+6~ , GETINTRO+10* |
XOBITINF | GETINTRO+6~, GETINTRO+8 |
XOBITINF( | GETINTRO+13, GETINTRO+14 |
XOBLINE | SENDNVCD+2~, SENDNVCD+3* |
XOBMSG | SENDDEM1+1~, SENDDEM1+28, SENDDEM0+1~, SENDDEM0+3, SENDNVC1+2~, SENDNVC1+3, SENDNVC0+2~, SENDNVC0+4, SENDNVCD+2~, SENDNVCD+3 , SENDNVCD+4 |
XOBMSG(1 | SENDDEM1+21*, SENDDEM1+22*, SENDDEM1+23*, SENDDEM0+2*, SENDNVC0+3* |
XOBMSG(2 | SENDDEM1+24*, SENDDEM1+25* |
XOBMSG(3 | SENDDEM1+26* |
XOBMSG(4 | SENDDEM1+27* |
XOBNC | SENDDEM1+1~, SENDDEM1+8*, SENDDEM1+10, SENDDEM1+19, SENDDEM1+21, SENDDEM1+22, SENDDEM1+23 |
XOBNC(200 | SENDDEM1+8 |
XOBNC1 | SENDDEM1+1~ |
XOBNC1(20 | SENDDEM1+19*, SENDDEM1+21, SENDDEM1+22, SENDDEM1+23 |
>> XOBR | SENDDEM1+7, SENDDEM1+14, SENDDEM1+28, SENDDEM0+3, SENDNVC1+3, SENDNVC0+4, SENDNVCD+4 |
XOBRET | SENDDEM1+1~, SENDDEM1+16, SENDNVC+1~, SENDNVC+3 |
XOBRET( | SENDDEM1+18* |
XOBRET(1 | SENDDEM1+23, SENDNVC0+3 |
XOBRET(2 | SENDDEM1+23 |
XOBRET(3 | SENDDEM1+26 |
XOBRET(4 | SENDDEM1+24 |
XOBRET(5 | SENDDEM1+24 |
XOBRET(6 | SENDDEM1+24 |
XOBRET(7 | SENDDEM1+24 |
XOBRET(8 | SENDDEM1+25 |
XOBRETDV | SENDNVC+1~, SENDNVC+7, SENDNVC+10 |
XOBRETDV(0 | SENDNVC+8 |
XOBSCNTR | GETINTRO~, GETINTRO+12, GETINTRO+14*, GETINTRO+15* |
XOBSDUZ | SENDNVC+1~, SENDNVC+2*, SENDNVC+12 |
XOBSREF | GETINTRO~, GETINTRO+12, GETINTRO+14, GETINTRO+15 |
XOBTEXT | SENDDEM0~, SENDDEM0+2 |
XOBTMP1 | GETINTRO+6~, GETINTRO+13*, GETINTRO+14 |
XOBTXT | SENDDEM1+1~, SENDDEM1+5*, SENDDEM1+6*, SENDDEM1+7, SENDDEM1+12*, SENDDEM1+13*, SENDDEM1+14 |
XOBVCCHK | ELEST+42*, ELEND+2!, ELEND+8!, CHR+7* |
XOBVCNEW | ELEST+41*, ELEND+2!, ELEND+7!, CHR+6* |
XOBVCOLD | ELEST+40*, ELEND+2!, ELEND+6!, CHR+5* |
Name | Field # of Occurrence |
---|---|
$T(FSERVER^XOBSCAV | SENDDEM1+7, SENDDEM1+14 |
$T(MSGTAG^XOBSCAV | SENDDEM0+2, SENDNVC0+3 |
$T(MSGUPDVC^XOBSCAV | SENDNVC1+3, SENDNVC0+4, SENDNVCD+4 |
$T(MSGUSERD^XOBSCAV | SENDDEM1+28, SENDDEM0+3 |
$T(RESTYPE^XOBSCAV | SENDDEM1+28, SENDDEM0+3, SENDNVC1+3, SENDNVC0+4, SENDNVCD+4 |
$T(SCHPARTS^XOBSCAV | SENDNVCD+4 |
$T(SCHSIMPL^XOBSCAV | SENDDEM0+3, SENDNVC1+3, SENDNVC0+4 |
$T(SCHUSERD^XOBSCAV | SENDDEM1+28 |