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
FAIL(IP) ;If user fails logon, Call to inc XUFAC
; and check if time to lock. IP is optional.
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 LOCKSEC+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, LOCKSEC+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