Routine: HLCSDL

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC $$EC^%ZOSV ^%ZTER
Health Level Seven	3	START^HLCSDL1 $$RUN^HLCSDL2 MONITOR^HLCSDR2
VA Fileman	3	NOW^%DTC DT^DICRW ^DIE

Entry Points

Name	Comments	DBIA/ICR reference
EN	;-- entry point for X3.28 protocol
END	;-- file stats
FILE	;-- file startup stats
XSETUP()	;-- This function will set up all parameters required by the X3.28 ; protocol. ; This function will return a 1 if it fails, else 0
EN1	;-- check device init
EXIT2	;
XSETQ
INIT()	;-- check for device, open ; This fucntion will return a 1 if it fails else 0
EXIT	;-- exit cleanup
INITQ
ERROR	;
ENQ
CTRLS	;X3.28 control settings

FileNo	Call Tags
^HLCS(870 - [#870]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	INIT+17
^%ZOSF("EOFF"	INIT+23
^%ZOSF("EON"	EXIT2+1, EXIT+1
^%ZOSF("RM"	INIT+23
^%ZOSF("TRAP"	EN+7
^%ZOSF("TRMON"	INIT+23
^HLCS(870 - [#870]	INIT+8, INIT+11, FILE+3, FILE+8, END+3, END+6
^TMP("HLLOG"	XSETUP+22!

Name	Field # of Occurrence
>> %	INIT+5
DA	FILE+7!, END+5!
DIE	FILE+7!, END+5!
DR	FILE+7!, END+5!
DTIME	FILE+3, END+3
HLACK0	EXIT+2!
HLACK1	EXIT+2!
HLACK2	EXIT+2!
HLACK3	EXIT+2!
HLACK4	EXIT+2!
HLACK5	EXIT+2!
HLACK6	EXIT+2!
HLACK7	EXIT+2!
HLBLOCK	EXIT+2!
>> HLCTRL(	XSETUP+21*
HLDAPP	EXIT+3!
>> HLDBLOCK	XSETUP+10*
HLDBSIZE	EXIT+3!
HLDEND	EXIT+3!
HLDEVICE	INIT+17*, INIT+18, INIT+21, EXIT+3!
HLDEVPTR	INIT+13*, INIT+15, INIT+17, EXIT+3!
HLDLE	EXIT+2!
HLDNODE	EXIT+3!
HLDP	INIT+5, INIT+6, INIT+8, INIT+9, INIT+11, INIT+20, INIT+21, FILE+3, FILE+7, FILE+8 , END+2, END+3, END+5, END+6, EXIT+3!, ERROR+3
HLDREAD	EXIT+3!
HLDSTRT	EXIT+3!
HLDVER	EXIT+3!
HLDWRITE	EXIT+3!
HLENQ	EXIT+2!
HLEOT	EXIT+2!
HLETB	EXIT+2!
HLETX	EXIT+2!
>> HLLOG	XSETUP+22*
HLMMS	XSETUP+8*, EXIT+2!
HLNAK	EXIT+2!
>> HLPARM	INIT+11*, INIT+13, XSETUP+8, XSETUP+10, XSETUP+12, XSETUP+14, XSETUP+16, XSETUP+18
HLRETPRM	EXIT+3!
HLRINT	EXIT+2!
HLSOH	EXIT+2!
HLSTX	EXIT+2!
HLTERM	EXIT+2!
HLTIMA	XSETUP+12*, EXIT+2!
HLTIMB	XSETUP+14*, EXIT+2!
HLTIMD	XSETUP+16*, EXIT+2!
HLTIME	XSETUP+18*, EXIT+2!
HLTRACE	XSETUP+22, EXIT+3!
I	XSETUP+19~*
IO	INIT+23
>> IOP	INIT+21*
J	XSETUP+19~*, XSETUP+20, XSETUP+21
K	XSETUP+19~, XSETUP+20*, XSETUP+21
>> POP	INIT+21
RESULT	INIT+3~, INIT+4, INIT+6, INIT+9, INIT+15, INIT+18, INIT+21, INITQ, XSETUP+4~, XSETUP+5* , XSETQ
U	INIT+13, XSETUP+8, XSETUP+10, XSETUP+12, XSETUP+14, XSETUP+16, XSETUP+18
X	EN+7, INIT+23, EXIT+3!
ZTIO	INIT+21!
ZTSK	FILE+6*, EXIT+3!

Name	Field # of Occurrence
$T(CTRLS+I	XSETUP+19