Routine: XOBVTCP

Information

XOBVTCP ;; mjk/alb - VistALink TCP Utilities ; 07/27/2002 13:00

Source Information

Source file <XOBVTCP.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA Fileman	3	(,$$FIND1)^DIC ^DIE ^DIK
VistALink	3	SPAWN^XOBVLL ($$LOCK,UPDATE)^XOBVTCP ($$NEWOK,LOGINERR)^XOBVTCPL
Kernel	2	HOME^%ZIS GETENV^%ZOSV

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
VistALink	5	XOBV LISTENER STARTUP XOBVLL XOBVPOST XOBVTCP XOBVTCPL
Foundations	2	XOBUM XOBUM1

Entry Points

Name	Comments	DBIA/ICR reference
ESET	;Set inital error trap
GETBOX()	; -- get box ien
UPDLOG(XOBDA,XOBPORT,XOBSTAT,XOBCFG)	; -- do edit
STARTCFG(XOBCFG)	; -- start a configurations listeners
START(XOBPORT,XOBCFG)	; ; ; -- set up environment
STARTUP	; -- called by TaskMan startup option [Option: XOBV LISTENER STARTUP] ; and could be called by VMS .com procedure
UPDATE(XOBPORT,XOBSTAT,XOBCFG)	; -- update VISTALINK LISTENER STARTUP LOG for listener
UCX	; -- VMS TCPIP (UCX) multi-thread entry point ; -- Called from VistALink .com files
CACHEVMS	; -- VMS TCPIP (UCX) multi-thread entry point for Cache for VMS ; -- Called from VistALink .com files
GETENV()	; -- get environment variable
CFGQ	;
UNLOCK(XOBPORT)	;-- Unlock port
LOCK(XOBPORT)	;-- Lock port
STARTUPQ	;
ACTION(ACTION,XOBPORT)	; -- do lock action
CLEARLOG	; -- clear log of non-active listeners
GETBOXN()	; -- get box name
GETOS()	;-- Get operating system
GETCFG()	; -- get config ien for current BOX-VOL pair

External References

Name	Field # of Occurrence
HOME^%ZIS	START+5
GETENV^%ZOSV	GETENV+3
^DIC	UPDATE+11
$$FIND1^DIC	GETBOX+2
^DIE	UPDLOG+13
^DIK	CLEARLOG+9
SPAWN^XOBVLL	UCX+11, CACHEVMS+13
$$LOCK^XOBVTCP	STARTCFG+17
UPDATE^XOBVTCP	STARTCFG+19
$$NEWOK^XOBVTCPL	UCX+9, CACHEVMS+11
LOGINERR^XOBVTCPL	UCX+10, CACHEVMS+12

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^%ZIS(14.7 - [#14.7]	FIND1^DIC
^XOB(18.04 - [#18.04]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("OS"	GETOS+11
^TMP("XOB DSM CONNECT FAILURE"	UCX+7*
^XOB(18.01 - [#18.01]	ACTION+10, ACTION+11, GETCFG+1
^XOB(18.03 - [#18.03]	STARTCFG+2, STARTCFG+11, STARTCFG+12
^XOB(18.04 - [#18.04]	CLEARLOG+4, CLEARLOG+5, UPDLOG+3, UPDLOG+14

Label References

Name	Line Occurrences
$$ACTION	LOCK+11, UNLOCK+11
$$GETBOX	GETCFG+1
$$GETBOXN	UPDATE+2
$$GETCFG	STARTUP+8
$$GETENV	ACTION+5, GETBOX+2, GETBOXN+2
$$GETOS	STARTUP+4, STARTCFG+8
$$LOCK	START+10, CLEARLOG+8
$$START	STARTCFG+20
CFGQ	STARTCFG+5, STARTCFG+8
CLEARLOG	STARTUP+6
ESET	UCX+4, CACHEVMS+4
STARTCFG	STARTUP+8
STARTUPQ	STARTUP+4
UNLOCK	START+11, CLEARLOG+10, STARTCFG+18
UPDATE	STARTCFG+21
UPDLOG	UPDATE+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTION	ACTION~, ACTION+10, ACTION+11
BOX	ACTION+1~, ACTION+8*, ACTION+10, ACTION+11
CFG0	STARTCFG+1~, STARTCFG+2*, STARTCFG+5
DA	CLEARLOG+1~, CLEARLOG+9, UPDLOG+1~, UPDLOG+5
DIC	UPDATE+1~, UPDATE+5*
DIC("DR"	UPDATE+7*
DIC("S"	UPDATE+8*
DIC(0	UPDATE+6*
DIE	UPDLOG+1~, UPDLOG+6*
DIK	CLEARLOG+1~, CLEARLOG+9*
DR	UPDLOG+1~, UPDLOG+7, UPDLOG+9, UPDLOG+11*
DUZ	UPDLOG+11
ENV	ACTION+1~, ACTION+5*, ACTION+6, ACTION+7, ACTION+8
IO	UCX+5, UCX+7, UCX+8, UCX+10, CACHEVMS+5, CACHEVMS+8, CACHEVMS+9, CACHEVMS+12
IO(0	UCX+5, CACHEVMS+5
LSTR	STARTCFG+1~, STARTCFG+10, STARTCFG+11, STARTCFG+12
LSTR0	STARTCFG+1~, STARTCFG+12*, STARTCFG+13, STARTCFG+14
STARTUP	STARTCFG+1~, STARTCFG+14*, STARTCFG+17
U	START+5, ESET+1, CLEARLOG+6, STARTCFG+13, STARTCFG+14, ACTION+6, ACTION+7, ACTION+8, GETBOX+2, GETBOXN+2 , GETCFG+1
UCI	ACTION+1~, ACTION+7*, ACTION+10, ACTION+11
VOL	ACTION+1~, ACTION+6*, ACTION+10, ACTION+11
X	UNLOCK+10~, UNLOCK+11, UPDATE+1~, UPDATE+9, UPDLOG+1~
XOB0	CLEARLOG+1~, CLEARLOG+5*, CLEARLOG+6
XOBBOX	UPDATE+1~, UPDATE+2*, UPDATE+9
XOBCFG	START~, STARTCFG~, STARTCFG+2, STARTCFG+11, STARTCFG+12, STARTCFG+19, STARTCFG+20, STARTCFG+21, UPDATE~, UPDATE+13 , UPDLOG~, UPDLOG+9
XOBDA	UPDLOG~, UPDLOG+3, UPDLOG+5, UPDLOG+14
XOBEC	UCX+3~, UCX+9, UCX+10, UCX+11, CACHEVMS+3~, CACHEVMS+11, CACHEVMS+12, CACHEVMS+13
XOBI	CLEARLOG+1~, CLEARLOG+3, CLEARLOG+4, CLEARLOG+5, CLEARLOG+9
XOBOK	START+3~, START+4, START+14, START+16, START+17, STARTCFG+1~, STARTCFG+20, STARTCFG+21
XOBPORT	START~, START+8~, START+10, START+11, CLEARLOG+1~, CLEARLOG+6, CLEARLOG+8, CLEARLOG+10, STARTCFG+1~, STARTCFG+13* , STARTCFG+17, STARTCFG+18, STARTCFG+19, STARTCFG+20, STARTCFG+21, LOCK~, LOCK+11, UNLOCK~, UNLOCK+11, ACTION~ , ACTION+3*, ACTION+10, ACTION+11, UPDATE~, UPDATE+7, UPDATE+8, UPDATE+13, UPDLOG~, UPDLOG+7
XOBSTAT	UPDATE~, UPDATE+13, UPDLOG~, UPDLOG+7
Y	CLEARLOG+1~, UPDATE+1~, UPDATE+13, UPDLOG+1~, GETENV+2~, GETENV+4

Customize PDF page

Package: VistALink

Routine: XOBVTCP

Call Graph Total: 8

Caller Graph Total: 7