Routine: HLEVX002

Package	Total	Call Graph
Health Level Seven	6	(CHECKIN,CHECKOUT,MAILIT,START)^HLEVAPI MSGTEXT^HLEVAPI1 ($$LOG,DEBUG)^HLEVAPI2 GENREP^HLEVUTI0 ENDIQ1^HLEVUTIL RECORD^HLEVX000
Kernel	3	$$S^%ZTLOAD ($$FMADD,$$NOW)^XLFDT ($$CJ,$$REPEAT,$$UP)^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
DATA773(IEN773,PROBL)	; Add critical data to Email message...
EOR	;HLEVX002 - VistA HL7 Event Monitor Code ;5/30/03 15:25
CHKAC(WAY,IEN870,IEN773)	; Check AC xref...
ADD(TXT,TRAIL)	; Add TXT to ^TMP($J,"HLEVREP",#)...
MAIL773	; Add collected 773 entry data to email message...
ADDNODE(NODE,NAME,IEN870)	; Add node data prefixed by node name...
CHECKAC	; Check file 773 AC xref...
ERR(WAY,IEN870,IEN773,REA,ETYPE)	; ; ERRNO -- req
NEXTACS(WAY,IEN870,I773)	; Store the next two entries...

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	CHECKAC+25
CHECKIN^HLEVAPI	CHECKAC+26
CHECKOUT^HLEVAPI	CHECKAC+31
MAILIT^HLEVAPI	CHECKAC+43
START^HLEVAPI	CHECKAC+4
MSGTEXT^HLEVAPI1	CHECKAC+38
$$LOG^HLEVAPI2	ERR+4
DEBUG^HLEVAPI2	CHECKAC+3, CHECKAC+33, CHECKAC+45
GENREP^HLEVUTI0	CHECKAC+36
ENDIQ1^HLEVUTIL	DATA773+8
RECORD^HLEVX000	ERR+13
$$FMADD^XLFDT	CHECKAC+11
$$NOW^XLFDT	CHECKAC+9, CHECKAC+27
$$CJ^XLFSTR	MAIL773+10, MAIL773+17, DATA773+3, DATA773+10
$$REPEAT^XLFSTR	ADD+9
$$UP^XLFSTR	CHKAC+26

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HLCS(870 - [#870]	CHKAC+8, CHKAC+26, MAIL773+7, ADDNODE+3
^HLMA - [#773]	CHKAC+12, CHKAC+16
^HLMA("AC"	NEXTACS+3
^TMP($J	CHECKAC+6!, CHECKAC+33, CHECKAC+36, CHECKAC+38, CHECKAC+45, CHECKAC+47!, ERR+14, MAIL773+6, MAIL773+13, MAIL773+15 , MAIL773+20, DATA773+5!, DATA773+10, DATA773+12, DATA773+13, DATA773+15!, ADD+6, ADD+7*
^XTMP(	CHECKAC+11, CHECKAC+14, CHECKAC+27, CHECKAC+28, CHKAC+3, CHKAC+25

Label References

Name	Line Occurrences
$$NEXTACS	ERR+14
ADD	MAIL773+3, MAIL773+9, MAIL773+10, MAIL773+17, ADDNODE+4, DATA773+3, DATA773+13
ADDNODE	MAIL773+11
CHKAC	CHECKAC+29
DATA773	MAIL773+18, MAIL773+23
ERR	CHKAC+9, CHKAC+13, CHKAC+17, CHKAC+27
MAIL773	CHECKAC+37

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABRT	CHECKAC+1~, CHECKAC+18, CHECKAC+19, CHECKAC+21, CHECKAC+23, CHECKAC+25
COL	ADD+1~
CT	NEXTACS+1~, NEXTACS+2, NEXTACS+3, NEXTACS+4, MAIL773+1~, MAIL773+14, MAIL773+16, MAIL773+17
CTERR	CHECKAC+1~, CHECKAC+18*
CTXREF	CHECKAC+1~, CHECKAC+22, CHECKAC+24, CHECKAC+25, CHKAC+20
DATA	MAIL773+7, MAIL773+8, ADDNODE+1~, ADDNODE+3, ADDNODE+4
DATA773	DATA773+1~
ERRNO	CHECKAC+1~, CHECKAC+18, CHECKAC+41, ERR+12
ETYPE	ERR~, ERR+4
GBL	CHECKAC+1~, CHECKAC+16*, CHECKAC+19, CHECKAC+21, CHECKAC+23
>> HLEVTXT(1	CHECKAC+42*
I773	NEXTACS~, NEXTACS+3, NEXTACS+5, MAIL773+1~, MAIL773+22, MAIL773+23
IEN773	CHECKAC+1~, CHECKAC+22, CHECKAC+23, CHECKAC+28, CHECKAC+29, CHKAC~, CHKAC+3, CHKAC+9, CHKAC+12, CHKAC+13 , CHKAC+16, CHKAC+17, CHKAC+25, CHKAC+27, ERR~, ERR+13, ERR+14, MAIL773+1~, MAIL773+14, MAIL773+15 , MAIL773+18, MAIL773+20, DATA773~, DATA773+8, DATA773+10
IEN870	CHECKAC+1~, CHECKAC+20, CHECKAC+21, CHECKAC+23, CHECKAC+28, CHECKAC+29, CHKAC~, CHKAC+3, CHKAC+8, CHKAC+9 , CHKAC+13, CHKAC+17, CHKAC+25, CHKAC+26, CHKAC+27, ERR~, ERR+13, ERR+14, NEXTACS~, NEXTACS+3 , MAIL773+1~, MAIL773+5, MAIL773+6, MAIL773+7, MAIL773+8, MAIL773+11, MAIL773+13, MAIL773+15, MAIL773+20, ADDNODE~ , ADDNODE+3
LEN	ADD+1~, ADD+3*, ADD+9
LINKNM	MAIL773+1~, MAIL773+8*, MAIL773+10
NAME	ADDNODE~, ADDNODE+3
NEXTACS	MAIL773+1~, MAIL773+20*, MAIL773+21, MAIL773+22
NEXTIENS	NEXTACS+1~, NEXTACS+2, NEXTACS+5, NEXTACS+6
NO	DATA773+1~, DATA773+11, DATA773+12, DATA773+13, ADD+1~, ADD+6*, ADD+7
NODE	MAIL773+11*, ADDNODE~, ADDNODE+2, ADDNODE+3
NOW	CHECKAC+1~, CHECKAC+9*, CHECKAC+10, CHECKAC+11, CHECKAC+28, CHKAC+3
>> PCE	MAIL773+21*, MAIL773+22
PFX	ADDNODE+1~, ADDNODE+2*, ADDNODE+3
PROBL	DATA773~, DATA773+3
REA	ERR~, ERR+13
TRAIL	ADD~
TXT	ADD~, ADD+3, ADD+5, ADD+7, ADD+8, ADD+9
TXTOLD	ADD+1~
U	CHECKAC+11, CHECKAC+27, CHKAC+26, NEXTACS+5, MAIL773+8, MAIL773+21, MAIL773+22
WAY	CHECKAC+1~, CHECKAC+18, CHECKAC+19, CHECKAC+21, CHECKAC+23, CHECKAC+28, CHECKAC+29, CHKAC~, CHKAC+3, CHKAC+5 , CHKAC+25, CHKAC+27, ERR~, ERR+13, ERR+14, NEXTACS~, NEXTACS+2, NEXTACS+3, MAIL773+1~, MAIL773+12 , MAIL773+13*, MAIL773+15, MAIL773+17, MAIL773+20
WAY(1	CHKAC+5*, CHKAC+9, CHKAC+13, CHKAC+17
X	CHECKAC+1~, CHECKAC+14*, CHECKAC+33, CHECKAC+45
X("HLEV REP"	CHECKAC+33, CHECKAC+45
XTMP	CHECKAC+1~, CHECKAC+10*, CHECKAC+11, CHECKAC+14, CHECKAC+27, CHECKAC+28, CHKAC+3
XTMP(1	CHECKAC+14*, CHKAC+23, CHKAC+25
>> ZTSK	CHECKAC+11

Customize PDF page

Package: Health Level Seven

Routine: HLEVX002

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: