Routine: INHULOG

Package	Total	Call Graph
Kernel	2	^%ZIS $$DEVID^%ZTOS
Uncategorized	1	SETDT^UTDT

Package

Total

Call Graph

Kernel

^%ZIS $$DEVID^%ZTOS

Uncategorized

SETDT^UTDT

Package	Total	Caller Graph
IHS Generic Interface System	4	INHUVUT1 INHVCRA INHVCRV INTSUT

Package

Total

Caller Graph

IHS Generic Interface System

INHUVUT1 INHVCRA INHVCRV INTSUT

Entry Points

Name	Comments	DBIA/ICR reference
CLRSTOR	; Clear out scratch storage, similar to K2^XUS
SETENV(NEWDUZ,NEWDIV)	; function, setup environment variables, returns false on success ; NEWDUZ= User IEN (required), NEWDIV = Division IEN (optional) - Not used.
RV(V)	; random value increment
LGNLOG(USR)	; Logon log subroutine, USR=userIEN, T=date&time, D=device ID
DIVCHK(USR,REQDIV)	; $$function - Division validation for USR. ; Verify: ; - default division exists for USR ; - default division is one of USR's allowable divisions (if allowables ; are specified) ; - if REQDIV is passed in, verify that requested division: ; - is a valid MEDICAL CENTER DIVISION IEN ; - is one of USR's allowables (if allowables are specified)
DTIME(INUSR,INDEF)	; function, returns timed-read (in seconds) for INUSR. ; Default=300. For remote systems, result represents the # of seconds ; to wait for remote system to communicate before connection is closed. ; Input: INUSR - (req) USER IEN ; INDEF - (opt) customized default (e.g. for remote systems)
TICKET()	; function, returns access ticket, 6 to 10 alphanumerics
VALIDIP(INBPN,INADDR)	; $$function - Validate remote system IP address. ; Verify: ; - minimum length ; - format = 1-3N.1-3N.1-3N.1-3N ; - exists on authorized address list (BACKGROUND PROCESS CONTROL file, ; Client IP Address multiple)
GETDUZ(AC,VC,ZN)	; function, returns User IEN and ^DIC(3,IEN,0), or false on failure ; input: AC=Access, VC=Verify, hashed codes (required), ZN=zero node, returned by reference
PROHBTM(T)	; boolean function, check for prohibited signon time

Name	Field # of Occurrence
^%ZIS	SETENV+19
$$DEVID^%ZTOS	LGNLOG+1
SETDT^UTDT	GETDUZ+5, SETENV+7, LGNLOG+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("VOL"	LGNLOG+4, LGNLOG+6
^DG(40.8 - [#40.8]	DIVCHK+18
^DIC(3 - [#3]	GETDUZ+3, GETDUZ+4, GETDUZ+5, SETENV+7, DTIME+5, DIVCHK+19, DIVCHK+22, DIVCHK+24
^DIJUSV(	SETENV+20!, CLRSTOR+4!
^DIJUSV($I	CLRSTOR+4!
^INTHPC - [#4004]	VALIDIP+19, VALIDIP+21
^ORB("AMA"	CLRSTOR+3!
^ORB("ANEW"	CLRSTOR+3!
^UTILITY(	CLRSTOR+2!
^UTILITY("NSR"	CLRSTOR+1!
^UTILITY($J	CLRSTOR+1!
^XMB(1 - [#4.3]	DTIME+8
^XMB7(	LGNLOG+6*
^XUSEC(0 - [#3.081]	LGNLOG+3, LGNLOG+4*
^ZUTL("XQ"	LGNLOG+5!, CLRSTOR+1!

Name	Line Occurrences
$$DIVCHK	SETENV+11
$$DTIME	SETENV+14
$$PROHBTM	GETDUZ+9
$$RV	TICKET+1, TICKET+2

Name	Field # of Occurrence
^(	GETDUZ+5, CLRSTOR+2!, CLRSTOR+4!
^($J	LGNLOG+5*
^(100	LGNLOG+6*
^(200	DTIME+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SETENV+7~, SETENV+8, SETENV+9, SETENV+11, CLRSTOR+2
A	GETDUZ+4~, GETDUZ+5, GETDUZ+6, GETDUZ+9, GETDUZ+11, DTIME+6~, DTIME+8*, DTIME+9
AC	GETDUZ~, GETDUZ+2*, GETDUZ+3, GETDUZ+4
ALLOWDIV	DIVCHK+17~, DIVCHK+24*
ALLOWDIV(	DIVCHK+25
B	PROHBTM+5~*, PROHBTM+6, PROHBTM+7, PROHBTM+8
C	TICKET+1~, TICKET+2*
D	GETDUZ+4~, GETDUZ+5, GETDUZ+11, LGNLOG+1~, LGNLOG+4, LGNLOG+6
DEFDIV	DIVCHK+17~, DIVCHK+19*, DIVCHK+20, DIVCHK+25
DEFOK	DIVCHK+17~, DIVCHK+22, DIVCHK+23, DIVCHK+25
DT	GETDUZ+6, SETENV+9, LGNLOG+3
DTIME	SETENV+14*
DUZ	SETENV+2, SETENV+4, SETENV+13!, SETENV+14, SETENV+20, CLRSTOR+4
DUZ(0	SETENV+13*
E	PROHBTM+5~*, PROHBTM+6, PROHBTM+7, PROHBTM+8
H	PROHBTM+5~*, PROHBTM+6, PROHBTM+7, PROHBTM+8
INADDR	VALIDIP~, VALIDIP+16, VALIDIP+17, VALIDIP+19, VALIDIP+21
INBPN	VALIDIP~, VALIDIP+19, VALIDIP+21
INDEF	DTIME~, DTIME+9
INUSR	DTIME~, DTIME+5
IO	SETENV+19
IO(0	SETENV+19
ION	LGNLOG+4
>> IOP	SETENV+19*
K	TICKET+1~, TICKET+2, TICKET+3
L	TICKET+1~*, TICKET+2
NEWDIV	SETENV~
NEWDUZ	SETENV~, SETENV+3, SETENV+4, SETENV+7, SETENV+11, SETENV+13
>> ORDFN	CLRSTOR+3
REQDIV	DIVCHK~, DIVCHK+18, DIVCHK+19*, DIVCHK+22, DIVCHK+23, DIVCHK+25
REQOK	DIVCHK+17~, DIVCHK+22, DIVCHK+23, DIVCHK+25
T	PROHBTM~, PROHBTM+3, PROHBTM+5, LGNLOG+1~, LGNLOG+3*, LGNLOG+4, LGNLOG+5, LGNLOG+6
U	GETDUZ+5, GETDUZ+6, GETDUZ+9, SETENV+2*, SETENV+8, SETENV+9, SETENV+13, DTIME+6, DTIME+8, DIVCHK+19
USR	DIVCHK~, DIVCHK+19, DIVCHK+20, DIVCHK+22, DIVCHK+24, LGNLOG~, LGNLOG+1, LGNLOG+4, LGNLOG+6
V	GETDUZ+4~, GETDUZ+5, GETDUZ+9, TICKET+1~, TICKET+2, RV~, RV+1
VC	GETDUZ~, GETDUZ+2*, GETDUZ+5
X	SETENV+7~, SETENV+8, SETENV+9, SETENV+13, DIVCHK+17~, DIVCHK+25, VALIDIP+15~, VALIDIP+19*, VALIDIP+20, VALIDIP+21
XMDUZ	SETENV+13!
ZN	GETDUZ~, GETDUZ+2, GETDUZ+11

Customize PDF page

Package: IHS Generic Interface System

Routine: INHULOG

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: