Routine: DG53149P

Package	Total	Call Graph
VA FileMan	5	^DIC ^DIE EN^DIEZ $$ROUSIZE^DILF EN^DIPZ
Kernel	1	(BMES,MES)^XPDUTL
Registration	1	$$SITE^VASITE

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;Pre-Install for DG5.3149
POST	;Post-Install for DG5.3149
HL7SITE	;Update FACILITY in the HL7 APPLICATION PARAMETER file.
COMPILE
AFIELDS	;;,.01,.02,.03,.05,.08,.09,.111,.1112,.112,.113,.114,.115,.117,.131,.132,.211,.219,.2403,.301,.302,.31115,.323,.351,391,991.01,991.02,991.03,991.04,991.05,991.06,9910.7,1901,

Name	Field # of Occurrence
^DIC	HL7SITE+5
^DIE	HL7SITE+7
EN^DIEZ	COMPILE+35
$$ROUSIZE^DILF	COMPILE+34
EN^DIPZ	COMPILE+36
$$SITE^VASITE	HL7SITE+2
BMES^XPDUTL	PRE+1, PRE+2, PRE+3, COMPILE+2, COMPILE+7, COMPILE+9, COMPILE+10, COMPILE+24, COMPILE+28, COMPILE+40
MES^XPDUTL	COMPILE+44

Name	Line Occurrences
Function Call: WRITE	Prompt: !!! Line Location: COMPILE+38
Routine Call	DIC Line Location: HL7SITE+5
Routine Call	DIE Line Location: HL7SITE+7

FileNo	Call Tags
^HL(771 - [#771]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^VAT(391.71 - [#391.71]	PRE+3, POST+3
^XTMP("ADT/HL7 VAFC BATCH UPDATE"	PRE+2, POST+2
^XTMP("NO NEW JOBS"	PRE+1, POST+1

Name	Line Occurrences
AFIELDS	COMPILE+4

Name	Field # of Occurrence
CFIELD	COMPILE~, COMPILE+16*, COMPILE+18
DA	HL7SITE+1~, HL7SITE+6*, HL7SITE+8!
DIC	HL7SITE+1~, HL7SITE+4*, HL7SITE+8!
DIC(0	HL7SITE+4*
DIE	HL7SITE+1~, HL7SITE+6*, HL7SITE+8!
>> DMAX	COMPILE+34*
DR	HL7SITE+1~, HL7SITE+6*, HL7SITE+8!
FIELD	COMPILE~, COMPILE+12, COMPILE+14, COMPILE+16, COMPILE+21
FIELD(	COMPILE+30, COMPILE+32*, COMPILE+41
GLOBAL	COMPILE~, COMPILE+6*, COMPILE+7, COMPILE+8, COMPILE+14, COMPILE+21, COMPILE+22, COMPILE+26, COMPILE+27, COMPILE+29 , COMPILE+35, COMPILE+36
I	HL7SITE+1~, HL7SITE+8!
NFIELD	COMPILE~, COMPILE+4*, COMPILE+18
>> PRINT	COMPILE+44
>> PRINT(	COMPILE+42*
SITE	HL7SITE+1~, HL7SITE+2*, HL7SITE+8!
TEMPLATN	COMPILE~, COMPILE+22*, COMPILE+23, COMPILE+24, COMPILE+28
TEMPLATP	COMPILE~, COMPILE+20, COMPILE+21, COMPILE+22, COMPILE+26, COMPILE+27, COMPILE+29, COMPILE+33
X	HL7SITE+1~, HL7SITE+4, HL7SITE+8!, COMPILE+26, COMPILE+27, COMPILE+29, COMPILE+30, COMPILE+32, COMPILE+39, COMPILE+41 , COMPILE+42
>> XPDABORT	PRE+1, PRE+2, PRE+3*
Y	HL7SITE+1~, HL7SITE+5, HL7SITE+6, HL7SITE+8!, COMPILE+33, COMPILE+39, COMPILE+42*

Name	Field # of Occurrence
$T(AFIELDS	COMPILE+4