Routine: HLUPDATE

Package	Total	Call Graph
IHS VA Utilities	1	^XBKVAR
VA Fileman	1	FILE^DICN

Entry Points

Name	Comments	DBIA/ICR reference
ABTMSG	; write abort message
ADDVER	; Add new HL versions to one message or event type
DEFINE	; define one file entry (if it doesn't already exist)
ADD(FILE,FIELD,SUB)	; Add new versions to one file

Name	Field # of Occurrence
FILE^DICN	DEFINE+4
^XBKVAR	HLUPDATE+9

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Creating New HL7 Message Definitions.",! Line Location: HLUPDATE+11
Function Call: WRITE	Prompt: !,"Adding New HL7 Versions to All Message and Event Types.",! Line Location: HLUPDATE+39
Function Call: WRITE	Prompt: !,"HL File Update is Complete.",! Line Location: HLUPDATE+48
Function Call: WRITE	Prompt: !,7," Aborting due to Fileman error *" Line Location: ABTMSG+2
Function Call: WRITE	Prompt: !,"* Update is not complete. *" Line Location: ABTMSG+3

Name	Line Occurrences (* Changed, ! Killed)
^DD(	ADD+3
^DD(869.2	HLUPDATE+26
^HL(	ADD+5
^HL(771.5 - [#771.5]	HLUPDATE+42

Name	Line Occurrences
ABTMSG	HLUPDATE+15, HLUPDATE+19, HLUPDATE+35, HLUPDATE+42, ADD+5
ADD	HLUPDATE+45, HLUPDATE+46
ADDVER	ADD+5
DEFINE	HLUPDATE+15, HLUPDATE+19, HLUPDATE+35, ADDVER+3

Name	Field # of Occurrence
^("DT"	HLUPDATE+26*
^(0	HLUPDATE+26*

Name	Field # of Occurrence
%	HLUPDATE+8~
DA	HLUPDATE+8~
DA(1	ADD+5*
DD	DEFINE+4!
DIC	HLUPDATE+8~, HLUPDATE+13, HLUPDATE+17, HLUPDATE+30, HLUPDATE+37!, ADD+5, DEFINE+2
DIC("DR"	HLUPDATE+14, HLUPDATE+18, HLUPDATE+33*
DIC("P"	ADD+3*
DIC(0	HLUPDATE+13, HLUPDATE+17, HLUPDATE+31, ADD+2
DLAYGO	HLUPDATE+13, HLUPDATE+17, HLUPDATE+32*, HLUPDATE+37!
DO	DEFINE+4!
DR	HLUPDATE+37!
FIELD	ADD~, ADD+3
FILE	ADD~, ADD+3, ADD+5
GBL	HLUPDATE+8~, DEFINE+2*, DEFINE+3
I	HLUPDATE+8~, HLUPDATE+22, ADD+4, ADD+5*
SUB	ADD~, ADD+5
U	HLUPDATE+26, ADD+3
V	HLUPDATE+8~, HLUPDATE+34, HLUPDATE+35, HLUPDATE+41, HLUPDATE+42, HLUPDATE+43, ADDVER+2, ADDVER+3
VER	HLUPDATE+8~
VER(	HLUPDATE+22, HLUPDATE+35, HLUPDATE+42, ADDVER+3
VSET	HLUPDATE+8~, HLUPDATE+21, HLUPDATE+22, HLUPDATE+26
X	HLUPDATE+8~, HLUPDATE+13, HLUPDATE+17, HLUPDATE+35, ADDVER+3, DEFINE+2
Y	HLUPDATE+8~, HLUPDATE+15, HLUPDATE+19, HLUPDATE+35, HLUPDATE+36, HLUPDATE+45, HLUPDATE+46, ADD+5, ADDVER+3, DEFINE+3* , DEFINE+4!