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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: XUS3

Package: Kernel

Routine: XUS3


Information

XUS3 ;SF-ISC/STAFF - SIGNON ;5/31/2006

Source Information

Source file <XUS3.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 $$EZBLD^DIALOG  ^DIC  UPDATE^DIE  ^DIK  
Kernel 3 XOPT^XUS  ^XUSTZ  ($$IP,$$IPCHECK)^XUSTZIP  
MailMan 1 ^XMB  

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: 11

Package Total Caller Graph
Kernel 10 XUESSO4  XUP  XUS  XUS5  XUSG  XUSRA  XUSRB  XUSRB5  
XUSTZ  XUSTZIP  
VistALink Security 1 XOBSRAKJ  

Entry Points

Name Comments DBIA/ICR reference
TT ;Terminal Type select
WAIT ;** doesn't work with virtual device
LOCK
Q
SEC ;Check device's security and time lock.
NOPE
H3(%) ;Convert $H to seconds.
GETFAC(IP) ;Set XUFAC from saved value, Failed Access Count
TS() ;Is IP a Terminal Server (check TSCHK in XUSTZIP).
FINDFAC(IP) ;Find the entry
SETFAC(IP) ;Set the value of Failed Access atempts
CLRFAC(IP) ;Clear FAC from the global
  • ICR #4764
    • Status: Active
    • Usage: Controlled Subscription
    FAIL(IP) ;If user fails logon, Call to inc XUFAC
    ; and check if time to lock. IP is optional.
  • ICR #4764
    • Status: Active
    • Usage: Controlled Subscription
    NO() ;Fail, R/S entry. Reference to XGWIN has been removed.
    TXT(%) ;Call by R/S and Broker
    ZZ ;;Halt;Error Messages
    1 ;;1;No Signons.
    2 ;;1;Maximum users.
    3 ;;1;Bad device.
    4 ;;0;Invalid A/V code.
    5 ;;0;No Access for User.
    6 ;;0;Invalid device password.
    7 ;;0;Device locked.
    8 ;;1;This device is out of service.
    9 ;;0;*** MULTIPLE SIGN-ONS NOT ALLOWED ***
    10 ;;1;You don't have access to this device!
    11 ;;0;Access code terminated.
    12 ;;0;Change VERIFY code.
    13 ;;1;Time limited device.
    14 ;;0;Bad UCI!
    15 ;;0;Bad Routine.
    16 ;;0;No PRIMARY MENU.
    17 ;;0;User Time limited.
    18 ;;0;User lockout
    19 ;;0;Signon not allowed as you have required forms to sign in terminal mode.
    20 ;;0;Client IP address not setup.
    21 ;;0;Null Verify code

    External References

    Name Field # of Occurrence
    $$EZBLD^DIALOG TXT+5
    ^DIC TT+3
    UPDATE^DIE SETFAC+5
    ^DIK CLRFAC+3
    ^XMB LOCK, SEC+7, NOPE
    XOPT^XUS FAIL+3
    ^XUSTZ NO+7
    $$IP^XUSTZIP FAIL+2
    $$IPCHECK^XUSTZIP GETFAC+16

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Device: ",$I,!!,$$TXT(XUM),!
    • Line Location: NO+2
    Function Call: WRITE
    • Prompt: !,$$TXT(7)
    • Line Location: NO+5
    Routine Call
    • DIALOG
    • Line Location:
      • TXT+5
    Routine Call
    • DIC
    • Line Location:
      • TT+3
    Routine Call
    • DIE
    • Line Location:
      • SETFAC+5

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZIS(1 - [#3.5] TT+2, SEC+4, SEC+10
    ^DISV("XU" WAIT+2
    ^VA(200 - [#200] TT+6*
    ^XTV(8989.3 - [#8989.3] TS+1
    ^XUSEC(4 - [#3.084] GETFAC+8, GETFAC+9, GETFAC+10, FINDFAC+2, FINDFAC+5, SETFAC+2

    Label References

    Name Line Occurrences
    $$FAIL NO+3
    $$FINDFAC GETFAC+5, CLRFAC+2
    $$H3 GETFAC+12
    $$TS GETFAC+16
    $$TXT NO+2, NO+5
    CLRFAC GETFAC+12
    GETFAC FAIL+3
    NOPE SEC+12
    SETFAC FAIL+4

    Naked Globals

    Name Field # of Occurrence
    ^("SUBTYPE" TT+2
    ^(95 SEC+5, SEC+7

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % H3~, H3+1, NO+1~, NO+3*, NO+4, TXT~, TXT+3, TXT+4, TXT+5*, TXT+7
    %A SEC+2~, SEC+3*, SEC+4, SEC+5, SEC+7, SEC+10*, SEC+11, SEC+12, SEC+13, NOPE
    , NOPE+1
    %B SEC+2~, SEC+3*, SEC+5*, SEC+6
    %H SEC+2~, SEC+5*, SEC+11*, SEC+12, SEC+13
    DA CLRFAC+1~, CLRFAC+3*
    DIC TT+3*!
    DIC("B" TT+2*
    DIC("S" TT+3*
    DIC(0 TT+3*
    DIK CLRFAC+1~, CLRFAC+3*
    DUZ TT+6
    FDA SETFAC+1~
    FDA( SETFAC+4*
    >> H WAIT+2*
    I FINDFAC+1~, FINDFAC+5*, FINDFAC+6, FINDFAC+7, SETFAC+1~, SETFAC+3*, SETFAC+4, CLRFAC+1~, CLRFAC+2*, CLRFAC+3
    IEN SETFAC+1~
    IEN(1 SETFAC+6
    IO("IP" NO+3
    IO("ZIO" WAIT+1
    IP GETFAC~, GETFAC+3, GETFAC+5, GETFAC+12, GETFAC+16, TS+1, FINDFAC~, FINDFAC+4, FINDFAC+5, SETFAC~
    , SETFAC+4, CLRFAC~, CLRFAC+2, FAIL~, FAIL+2*, FAIL+3, FAIL+4
    R GETFAC+4~, GETFAC+9*, GETFAC+12, GETFAC+13
    >> T WAIT+2*
    U TT+6, WAIT+2, LOCK, SEC+3, SEC+5, SEC+7, SEC+10, NOPE, GETFAC+13, FAIL+5
    X WAIT+2*, LOCK, GETFAC+4~, GETFAC+5*, GETFAC+7, GETFAC+8, GETFAC+9, GETFAC+10
    >> XMB LOCK*, SEC+7*, NOPE*
    >> XMB(1 LOCK*, SEC+7*, NOPE*
    >> XMB(2 LOCK*, SEC+7*, NOPE*
    >> XMB(3 LOCK*, SEC+7*
    >> XMB(4 SEC+7*, NOPE*
    >> XOPT WAIT+2, SEC+1, FAIL+3, FAIL+5
    XU1 TXT+1~, TXT+4*, TXT+5
    >> XUCI LOCK
    >> XUDEV TT+2, WAIT+2, SEC+4, SEC+10
    XUEXIT NO+1~, NO+3*, NO+4, NO+5, NO+7, NO+9, TXT+3*
    >> XUFAC GETFAC+1, GETFAC+2*, GETFAC+13*, GETFAC+16*, SETFAC+4, FAIL+4*, FAIL+5
    >> XUFAC(1 FINDFAC+2, FINDFAC+3!, FINDFAC+6*, SETFAC+2!, SETFAC+3, SETFAC+6*
    >> XUHALT NO+3
    >> XUIOP TT+2, TT+6*
    >> XUIOP(1 TT+1
    >> XUM SEC+8*, NOPE+1*, NO+2, NO+5
    >> XUM(0 NOPE+1*, TXT+5, TXT+6!
    >> XUSER(0 SEC+3, SEC+7, NOPE
    >> XUT WAIT+2*, LOCK*
    >> XUVOL LOCK
    Y TT+3, TT+6, SEC+2~, SEC+5*, SEC+11*, SEC+12, SEC+13
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All