Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: XOBSCAV1

Package: VistALink Security

Routine: XOBSCAV1


Information

XOBSCAV1 ;oak/kec - VistaLink Access/Verify Security ;12/09/2002

Source Information

Source file <XOBSCAV1.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Kernel 7 $$GETPEER^%ZOSV  $$PROD^XUPROD  $$AUTOXWB^XUS1B  $$AVHLPTXT^XUS2  $$CPCHK^XUSAP  ($$POST,LOGOUT,NOW,SETUP,VALIDAV)^XUSRB  (DIVGET,DIVSET)^XUSRB2  
VistALink 3 ($$CHARCHK,$$GETRATE)^XOBVLIB  SAML^XOBVSAML  ($$TRUNCCH,DUZSV)^XOBVSYSI  
VistALink Security 2 ($$ADDDIVS,$$FAILURE,$$LOGGEDON,$$PARTIAL,$$POSTTXT,$$SUCCESS,ERROR,FSERVER,MSGLGON,MSGLGOUT,MSGSELDV,MSGSETUP,MSGTAG,PARTTAG,RESTYPE,SCHLGON,SCHPARTS,SCHSETUP,SCHSIMPL,SENDSEC)^XOBSCAV  GETINTRO^XOBSCAV2  
VA FileMan 1 $$EZBLD^DIALOG  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
VistALink Security 2 XOBSCAV  XOBSRA  
VistALink 1 XOBVLL  

Entry Points

Name Comments DBIA/ICR reference
SENDITXT ; Do Setup and send Intro Text
LOGON ; process login request
LOGFIN ; check the divisions, finish login now
LOGBADCD ; response if bad a/v code pair
LOGCVC ; response if need to change vc
LOGSELDV(XOBDIVS) ; response if need to select division
LOGOK ; response if everything's looking good
LOGOUT ; logout
CLEAN ; logout
DIVSLCT ; select division
DIVSLCT0(XOBTEXT) ; send
DIVSLCT1 ; success
PRODMISM() ; returns 1 if production mismatch, 0 if not
STATMISM() ; return 1 if primary station mismatch, 0 if not
STRPSUFF(XOBSTAT) ; strip alpha suffix from sta# e.g. AAC "200M"
ISCPROXY() ; c/proxy check
; returns 1 if c/proxy user, 0 if not
CHXHDR ; Check the xml header and add to the saml token temp global if not there.

External References

Name Field # of Occurrence
$$GETPEER^%ZOSV SENDITXT+6
$$EZBLD^DIALOG SENDITXT+12, SENDITXT+16, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, ISCPROXY+6
$$ADDDIVS^XOBSCAV LOGSELDV+4
$$FAILURE^XOBSCAV LOGBADCD+3, DIVSLCT0+3
$$LOGGEDON^XOBSCAV LOGON+3
$$PARTIAL^XOBSCAV LOGCVC+5, LOGSELDV+5
$$POSTTXT^XOBSCAV LOGCVC+2, LOGSELDV+3, LOGOK+2
$$SUCCESS^XOBSCAV SENDITXT+51, LOGOK+3, LOGOUT+6, DIVSLCT1+2
ERROR^XOBSCAV SENDITXT+12, SENDITXT+16, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, ISCPROXY+6
FSERVER^XOBSCAV SENDITXT+12, SENDITXT+16, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, ISCPROXY+6
MSGLGON^XOBSCAV LOGBADCD+3, LOGCVC+5, LOGSELDV+5, LOGOK+3
MSGLGOUT^XOBSCAV LOGOUT+6
MSGSELDV^XOBSCAV DIVSLCT0+3, DIVSLCT1+2
MSGSETUP^XOBSCAV SENDITXT+51
MSGTAG^XOBSCAV LOGBADCD+2, LOGCVC+4, DIVSLCT0+2
PARTTAG^XOBSCAV LOGCVC+3
RESTYPE^XOBSCAV SENDITXT+51, LOGBADCD+3, LOGCVC+5, LOGSELDV+5, LOGOK+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2
SCHLGON^XOBSCAV LOGOK+3
SCHPARTS^XOBSCAV LOGCVC+5, LOGSELDV+5
SCHSETUP^XOBSCAV SENDITXT+51
SCHSIMPL^XOBSCAV LOGBADCD+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2
SENDSEC^XOBSCAV SENDITXT+51, LOGBADCD+3, LOGCVC+5, LOGSELDV+5, LOGOK+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2
GETINTRO^XOBSCAV2 SENDITXT+49
$$CHARCHK^XOBVLIB SENDITXT+12, SENDITXT+16, SENDITXT+43, SENDITXT+47, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, LOGBADCD+2
LOGCVC+3, LOGCVC+4, DIVSLCT0+2, ISCPROXY+6
$$GETRATE^XOBVLIB SENDITXT+47
SAML^XOBVSAML LOGON+9
$$TRUNCCH^XOBVSYSI STRPSUFF+1
DUZSV^XOBVSYSI LOGFIN+4, DIVSLCT+7
$$PROD^XUPROD SENDITXT+11, PRODMISM+3
$$AUTOXWB^XUS1B SENDITXT+29
$$AVHLPTXT^XUS2 LOGCVC+3
$$CPCHK^XUSAP ISCPROXY+4
$$POST^XUSRB SENDITXT+30
LOGOUT^XUSRB CLEAN+1
NOW^XUSRB SENDITXT+30
SETUP^XUSRB SENDITXT+24, SENDITXT+27
VALIDAV^XUSRB LOGON+10
DIVGET^XUSRB2 LOGFIN+1
DIVSET^XUSRB2 DIVSLCT+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP( CHXHDR+2!, CHXHDR+4*, CHXHDR+6*, CHXHDR+8, CHXHDR+10, CHXHDR+12, CHXHDR+13!
^XTMP( LOGON+9, LOGON+40!, CHXHDR+1, CHXHDR+4, CHXHDR+7!, CHXHDR+12*

Label References

Name Line Occurrences
$$ISCPROXY LOGON+36
$$PRODMISM SENDITXT+10
$$STATMISM SENDITXT+14
$$STRPSUFF STATMISM+4
CHXHDR LOGON+9
CLEAN LOGOUT+3
DIVSLCT0 DIVSLCT+3, DIVSLCT+8
DIVSLCT1 DIVSLCT+6
LOGBADCD LOGON+20
LOGCVC LOGON+23, LOGON+33
LOGFIN SENDITXT+34, LOGON+39
LOGOK LOGFIN+3
LOGSELDV LOGFIN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT CHXHDR+3~, CHXHDR+4*
DUZ SENDITXT+25, SENDITXT+29*!, SENDITXT+30!, SENDITXT+32, LOGON+6!, LOGFIN+1, LOGFIN+4, DIVSLCT+3, DIVSLCT+7
END CHXHDR+3~, CHXHDR+4*, CHXHDR+8*, CHXHDR+9, CHXHDR+11*
N CHXHDR+3~, CHXHDR+4*
>> NODE CHXHDR+10*, CHXHDR+11
TXT CHXHDR+5~, CHXHDR+6*
U ISCPROXY+6
XOBAC LOGON+1~
XOBCCMSK SENDITXT+1~
XOBCPCHK ISCPROXY+2~, ISCPROXY+4*, ISCPROXY+5, ISCPROXY+6
>> XOBDATA("CLIENTIP" SENDITXT+8
>> XOBDATA("CLIENTISPRODUCTION" SENDITXT+11, PRODMISM+2
>> XOBDATA("CLIENTPRIMARYSTATION" SENDITXT+15, STATMISM+4
XOBDATA("XOB SECAV" , LOGON+9, LOGON+10, LOGON+12!, LOGON+33, DIVSLCT+4
XOBDIVS LOGSELDV~, LOGSELDV+4
XOBI SENDITXT+1~
XOBLINE LOGCVC+1~, LOGCVC+2*, LOGCVC+3, LOGCVC+4, LOGSELDV+2~, LOGSELDV+3*, LOGSELDV+4*, LOGOK+1~, LOGOK+2*
XOBMSG SENDITXT+1~, SENDITXT+51, LOGBADCD+1~, LOGBADCD+3, LOGCVC+1~, LOGCVC+2, LOGCVC+5, LOGSELDV+2~, LOGSELDV+3, LOGSELDV+4
, LOGSELDV+5, LOGOK+1~, LOGOK+2, LOGOK+3, LOGOUT+5~, LOGOUT+6, DIVSLCT0+1~, DIVSLCT0+3, DIVSLCT1+1~, DIVSLCT1+2
XOBMSG( LOGCVC+3*, LOGCVC+4*
XOBMSG(1 SENDITXT+43*, SENDITXT+47*, LOGBADCD+2*, DIVSLCT0+2*
>> XOBNULL SENDITXT+20, LOGON+7, LOGOUT+1
XOBOK ISCPROXY+2~, ISCPROXY+3*, ISCPROXY+5*, ISCPROXY+7
>> XOBPORT SENDITXT+33, SENDITXT+41, LOGON+13, LOGOUT+4
XOBPROD SENDITXT+1~, PRODMISM+2*, PRODMISM+3
>> XOBR SENDITXT+12, SENDITXT+16, SENDITXT+51, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, LOGBADCD+3, LOGCVC+5
, LOGSELDV+5, LOGOK+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2, ISCPROXY+6
XOBRET LOGON+1~, LOGON+9, LOGON+10, LOGCVC+2, LOGSELDV+3, LOGOK+2, DIVSLCT+1~, DIVSLCT+4, DIVSLCT+5
XOBRET(0 LOGON+16, LOGON+23, LOGON+25, ISCPROXY+4
XOBRET(1 LOGON+16, LOGON+23
XOBRET(2 LOGON+16, LOGON+23
XOBRET(3 LOGON+18, LOGON+19, LOGON+27, LOGBADCD+2, LOGCVC+4
XOBRET(5 SENDITXT+34*
XOBRETDV LOGON+1~, LOGFIN+1~, LOGFIN+6
XOBRETDV(0 LOGFIN+2
XOBSPAR SENDITXT+11~, SENDITXT+12, SENDITXT+15~, SENDITXT+16, LOGON+26~, LOGON+29, LOGON+30
XOBSPAR(1 SENDITXT+11*, SENDITXT+15*, LOGON+27*, LOGON+29
XOBSPAR(2 SENDITXT+11*, SENDITXT+15*
XOBSTAT STATMISM+2~, STATMISM+4*, STATMISM+6, STRPSUFF~, STRPSUFF+1*, STRPSUFF+3*, STRPSUFF+4
XOBSTINF SENDITXT+1~, SENDITXT+24, SENDITXT+27
XOBSTINF(0 SENDITXT+43
XOBSTINF(1 SENDITXT+47
XOBSTINF(2 SENDITXT+47
XOBSTINF(3 SENDITXT+47
XOBSTINF(4 SENDITXT+47
>> XOBSYS("ENV" SENDITXT+23, LOGON+19, LOGON+36, PRODMISM+1, STATMISM+1
>> XOBSYS("PRIMA RY STATION#" , SENDITXT+15, STATMISM+6
XOBTEXT DIVSLCT0~, DIVSLCT0+2
XOBTMP SENDITXT+1~
XOBTMP1 SENDITXT+1~
XOBVC LOGON+1~
>> XUMSG SENDITXT+30*
>> XWBTIP SENDITXT+6*, SENDITXT+8*
XWBVER SENDITXT+26*, SENDITXT+36!
XX CHXHDR+8~*, CHXHDR+10, CHXHDR+12

Marked Items

Name Field # of Occurrence
$T(FSERVER^XOBSCAV SENDITXT+12, SENDITXT+16, LOGON+4, LOGON+18, LOGON+19, LOGON+29, LOGON+30, ISCPROXY+6
$T(MSGLGON^XOBSCAV LOGBADCD+3, LOGCVC+5, LOGSELDV+5, LOGOK+3
$T(MSGLGOUT^XOBSCAV LOGOUT+6
$T(MSGSELDV^XOBSCAV DIVSLCT0+3, DIVSLCT1+2
$T(MSGSETUP^XOBSCAV SENDITXT+51
$T(MSGTAG^XOBSCAV LOGBADCD+2, LOGCVC+4, DIVSLCT0+2
$T(PARTTAG^XOBSCAV LOGCVC+3
$T(RESTYPE^XOBSCAV SENDITXT+51, LOGBADCD+3, LOGCVC+5, LOGSELDV+5, LOGOK+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2
$T(SCHLGON^XOBSCAV LOGOK+3
$T(SCHPARTS^XOBSCAV LOGCVC+5, LOGSELDV+5
$T(SCHSETUP^XOBSCAV SENDITXT+51
$T(SCHSIMPL^XOBSCAV LOGBADCD+3, LOGOUT+6, DIVSLCT0+3, DIVSLCT1+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All