Routine: LREPI1A

Package	Total	Call Graph
DRG Grouper	1	$$ICDDX^ICDEX
Health Level Seven	1	$$HLDATE^HLFNC
Kernel	1	$$UP^XLFSTR
Lab Service	1	SITECD^LREPI1

Package	Total	Caller Graph
Lab Service	1	LREPI1

Entry Points

Name	Comments	DBIA/ICR reference
CY	;BUILD HL7 MSG FOR CY SUBSCRIPT
EXIT	;KILL THEN EXIT
EN(LRDFN,SS,IVDT,SEQ)	;Entry to build the HL7 Segment

External References

Name	Field # of Occurrence
$$HLDATE^HLFNC	CY+9, CY+42, CY+44, CY+55, CY+57
$$ICDDX^ICDEX	CY+20
SITECD^LREPI1	CY+59
$$UP^XLFSTR	CY+13, CY+24, CY+47, CY+61, CY+80

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(	CY+71, CY+72
^LAB(60 - [#60]	CY+30, CY+33, CY+40
^LAB(61 - [#61]	CY+60
^LAM - [#64]	CY+34, CY+35, CY+36
^LR - [#63]	CY+2, CY+4, CY+8, CY+10, CY+11, CY+14, CY+15, CY+17, CY+27, CY+28 , CY+41, CY+43, CY+50, CY+54, CY+56, CY+58, CY+66, CY+68, CY+70, CY+78
^TMP("HL7"	EN+6!, CY+13, CY+24, CY+47, CY+61, CY+80*

Label References

Name	Line Occurrences
@(	EN+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	EN+8, EXIT+1!, CY+13, CY+24, CY+47, CY+61, CY+80
DGCNT	CY+16, CY+22, CY+24, CY+25!, CY+48!
>> HLFS	CY+6, CY+7, CY+8, CY+9, CY+12, CY+13, CY+22, CY+39, CY+40, CY+41 , CY+42, CY+46, CY+47, CY+52, CY+53, CY+54, CY+55, CY+60, CY+61, CY+73 , CY+74, CY+75, CY+76, CY+79, CY+80
>> ICD9	CY+17*, CY+20
IND	EXIT+1!
IVDT	EN~, EN+9, CY+2, CY+4, CY+8, CY+9, CY+10, CY+11, CY+14, CY+15 , CY+17, CY+27, CY+28, CY+41, CY+42, CY+43, CY+50, CY+54, CY+55, CY+56 , CY+58, CY+66, CY+68, CY+70, CY+78
LRAND	EXIT+1!
LRANT	EXIT+1!
>> LRCODE	CY+60
>> LRCS	CY+7, CY+12, CY+23, CY+32, CY+35, CY+36, CY+37, CY+40, CY+46, CY+53 , CY+60, CY+75
LRDATA	EXIT+1!, CY+5!, CY+6, CY+7, CY+8, CY+9, CY+12, CY+13, CY+21!, CY+22 , CY+23, CY+24, CY+25!, CY+38!, CY+39, CY+40, CY+41, CY+42, CY+46, CY+47 , CY+48!, CY+51!, CY+52, CY+53, CY+54, CY+55, CY+60, CY+61, CY+69!, CY+73 , CY+74, CY+75, CY+76, CY+79, CY+80
LRDFN	EN~, EN+9, CY+2, CY+4, CY+8, CY+10, CY+11, CY+14, CY+15, CY+17 , CY+27, CY+28, CY+41, CY+43, CY+50, CY+54, CY+56, CY+58, CY+66, CY+68 , CY+70, CY+78
LRES	EXIT+1!
>> LRI	CY+70*, CY+71, CY+72
>> LRIC	CY+14*, CY+15, CY+17
LRINLT	EXIT+1!, CY+33*, CY+34, CY+35, CY+36, CY+48!
LRNLT	CY+32, CY+35, CY+36, CY+37, CY+40, CY+48!
LRNT	EXIT+1!
>> LRNX	CY+67, CY+68, CY+70, CY+78
>> LRO	CY+72*, CY+75
LRRDTE	EXIT+1!, CY+43, CY+44, CY+56, CY+57, CY+76
LRREF	EXIT+1!
>> LRRES	CY+77, CY+78, CY+79
>> LRSI	CY+10*, CY+11
>> LRSUB	CY+65*, CY+66, CY+68, CY+70, CY+71, CY+72, CY+78
LRTMP	CY+18~, CY+20*, CY+22, CY+23
>> LRTOP	CY+50*, CY+58, CY+66, CY+68, CY+70, CY+78
LRTST	EXIT+1!, CY+31*, CY+40, CY+48!
LRUNIT	EXIT+1!
LRWKDT	CY+28*, CY+29, CY+30, CY+31, CY+33, CY+45, CY+48!
>> LRWKI	CY+27*, CY+28
ND	EXIT+2!, CY+63*, CY+71, CY+72
NLT	EXIT+2!
NLTP	EXIT+2!
ORGNB	EXIT+2!
ORGPT	EXIT+2!
SEQ	EN~, EN+7, EXIT+3, CY+6, CY+13, CY+39, CY+47, CY+52, CY+61
SEQX	EXIT+2!, CY+64, CY+73, CY+80
SITE	EXIT+2!, CY+10, CY+11, CY+12, CY+45, CY+46, CY+58, CY+60
SS	EN~, EN+9, EN+10, CY+2, CY+4, CY+8, CY+10, CY+11, CY+14, CY+15 , CY+17, CY+27, CY+28, CY+41, CY+43, CY+50, CY+54, CY+56, CY+58, CY+66 , CY+68, CY+70, CY+78
TYPE	EXIT+2!
U	CY+8, CY+11, CY+17, CY+22, CY+23, CY+29, CY+30, CY+31, CY+33, CY+35 , CY+36, CY+40, CY+41, CY+43, CY+45, CY+54, CY+56, CY+58, CY+60, CY+70 , CY+75, CY+78

Customize PDF page

Package: Lab Service

Routine: LREPI1A

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items