Routine: HLCSTCP1

Information

HLCSTCP1 ;SFIRMFO/RSD - BI-DIRECTIONAL TCP ;09/13/2006

Source Information

Source file <HLCSTCP1.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Health Level Seven	4	MONITOR^HLCSDR2 ($$STOP,LLCNT,MON)^HLCSTCP ($$MAID,TCP)^HLTF NEW^HLTP3
Kernel	2	$$EC^%ZOSV (,UNWIND)^%ZTER
VA Fileman	1	^DIK

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Health Level Seven	2	HLCSTCP HLCSTCP2

Entry Points

Name	Comments	DBIA/ICR reference
RESET	;reset info as a result of no end block
DELMSG(HLMAMT)	;delete message from Message Administration/Message Text files.
CLEAN	;reset var. for next message
MIEN	; sets HLIND1=ien in 773^ien in 772 for message
PROCESS	;check message and reply
SAVE(SRC,DEST)	;save into global & set top node
READ()	;read 1 message, returns ien in 773^ien in 772 for message
PING	;process PING message
CC(X)	;cleanup and close
PMSH(MSH,P)	;get piece P from MSH array (passed by ref.)
ERROR	; Error trap for disconnect error and return back to the read loop.
RDBLK

External References

Name	Field # of Occurrence
$$EC^%ZOSV	ERROR+2, ERROR+3
^%ZTER	ERROR+4
UNWIND^%ZTER	ERROR+2, ERROR+3, ERROR+5
^DIK	DELMSG+3, DELMSG+5
MONITOR^HLCSDR2	MIEN+22
$$STOP^HLCSTCP	HLCSTCP1+12
LLCNT^HLCSTCP	PROCESS+5, PROCESS+8
MON^HLCSTCP	HLCSTCP1+9, HLCSTCP1+12, READ+1, MIEN+22, CC+1
$$MAID^HLTF	MIEN+13
TCP^HLTF	MIEN+16
NEW^HLTP3	PROCESS+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: X,! Line Location: PING+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^HL(772 - [#772]	Classic Fileman Calls
^HLMA - [#773]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HL(772 - [#772]	RDBLK+55*, MIEN+4, MIEN+12
^HLMA - [#773]	MIEN+3, MIEN+11!, MIEN+24
^TMP("HLCSTCP"	HLCSTCP1+10!, READ+7, READ+8!, READ+11*

Label References

Name	Line Occurrences
$$PMSH	MIEN+6
$$READ	HLCSTCP1+13
CC	ERROR+3, ERROR+4
CLEAN	RDBLK+5, RDBLK+38, RDBLK+52, MIEN+20
DELMSG	READ+12
MIEN	RDBLK+23
PING	RDBLK+21
PROCESS	HLCSTCP1+15
RDBLK	READ+9
RESET	RDBLK+19, RDBLK+50
SAVE	RDBLK+33, MIEN+14, MIEN+26

Naked Globals

Name	Field # of Occurrence
^("IN"	MIEN+12!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RESET+1~, RESET+3*
DA	DELMSG+1~, DELMSG+2, DELMSG+4
DEST	SAVE~, SAVE+2, SAVE+3
DIK	DELMSG+1~, DELMSG+2, DELMSG+4
DT	SAVE+3
FS	PMSH+1~, PMSH+2*, PMSH+3, PMSH+5
HLACKWT	READ+2~, READ+7, RDBLK+5
HLASTMSG	HLCSTCP1+8~, HLCSTCP1+11*
>> HLCSOUT	ERROR+4*
HLDB	READ+2~, RDBLK*, RDBLK+1
>> HLDBACK	READ+7
>> HLDBSIZE	RDBLK, RDBLK+43
HLDEND	READ+2~, READ+4*, RDBLK+27, RDBLK+43, PING+2
>> HLDP	PROCESS+3, PROCESS+5, PROCESS+8, MIEN+22
>> HLDREAD	RDBLK+1, RDBLK+5
HLDSTRT	READ+2~, READ+4*, RDBLK+14, RDBLK+15, RDBLK+16, RDBLK+17, RDBLK+18, RDBLK+43, RDBLK+46, RDBLK+48 , RDBLK+49
HLDT	READ+2~, MIEN+16
HLHDR	READ+2~, READ+7, RDBLK+5, RDBLK+14, RDBLK+25, RDBLK+49*, RDBLK+50
HLIND1	READ+2~, READ+7, READ+12, READ+13, RDBLK+29, RDBLK+33, RDBLK+36, RDBLK+52, RDBLK+55, MIEN+2 , MIEN+3, MIEN+4, MIEN+9, MIEN+11, MIEN+12, MIEN+13, MIEN+14, MIEN+15, MIEN+24*, MIEN+26
HLINE	READ+2~, READ+7, RDBLK+12, RDBLK+14, RDBLK+15, RDBLK+16, RDBLK+17, RDBLK+18, RDBLK+19, RDBLK+25* , RDBLK+27, RDBLK+31, RDBLK+40, RDBLK+44, RDBLK+49, RDBLK+50, RDBLK+54, SAVE+3, CLEAN+2, RESET+2 , RESET+3, RESET+4
HLLSTN	MIEN+20!
HLMAMT	DELMSG~, DELMSG+2, DELMSG+4
HLMID	MIEN+1~, MIEN+6*, MIEN+13, MIEN+16
HLMIEN	HLCSTCP1+8~, HLCSTCP1+11, HLCSTCP1+12, HLCSTCP1+13, HLCSTCP1+14, PROCESS+3, PROCESS+6
HLMSG	READ+2~, RDBLK+24!, RDBLK+33, RDBLK+55, RDBLK+57!, MIEN+6, MIEN+14, MIEN+26, CLEAN+1!
HLMSG(	RDBLK+12, RDBLK+14, RDBLK+15, RDBLK+16, RDBLK+17, RDBLK+18, RDBLK+27, RDBLK+31!, RDBLK+40, RDBLK+44* , RDBLK+49*, RESET+2, RESET+3!
HLMSG(0	RDBLK+54
HLMSG(1	RDBLK+21, MIEN+6, PING+1, RESET+2*
HLRDOUT	READ+2~, READ+7, READ+9, RDBLK+10, RDBLK+41, CLEAN+2
HLRS	READ+2~, READ+4*, RDBLK+10, RDBLK+12, RDBLK+43
HLTCP	PROCESS+2~, PROCESS+3*
HLTCPI	PROCESS+2~, PROCESS+3*
HLTCPO	PROCESS+2~, PROCESS+3*
HLX	READ+2~, READ+7, READ+11, RDBLK, RDBLK+5, RDBLK+8, RDBLK+10, RDBLK+12, RDBLK+43, RDBLK+44 , RDBLK+46, RDBLK+48, RDBLK+49
I	PMSH+1~, PMSH+3*, PMSH+5
IO	RDBLK+1, RDBLK+3, PING+2
IO(0	RDBLK+3, PING+2
L	PMSH+1~, PMSH+3, PMSH+4, PMSH+5, PMSH+6
L1	PMSH+1~, PMSH+3*, PMSH+4
L2	PMSH+1~, PMSH+2, PMSH+5, PMSH+6
MSH	PMSH~
MSH(	PMSH+3, PMSH+5
MSH(1	PMSH+2
P	PMSH~, PMSH+5
SRC	SAVE~, SAVE+2
U	READ+12, RDBLK+33, RDBLK+36, RDBLK+55, DELMSG+4, MIEN+4, MIEN+12, MIEN+15, MIEN+24
X	READ+2~, RDBLK+1, RDBLK+5, RDBLK+8, RDBLK+16, RDBLK+17, RDBLK+48, MIEN+1~, MIEN+6, MIEN+13* , MIEN+16, MIEN+17, MIEN+24, PMSH+1~, PMSH+2, PMSH+3, PMSH+5, PMSH+7, PING+1*, PING+2 , CC~, CC+1
Y	PMSH+1~, PMSH+2, PMSH+3, PMSH+5, PMSH+6

Customize PDF page

Package: Health Level Seven

Routine: HLCSTCP1

Call Graph Total: 7

Caller Graph Total: 2