Routine: LRAC6

Package	Total	Call Graph
Lab Service	3	ENT^LRAC7 REG^LRAC9 (DASH,EQUALS)^LRX

Package	Total	Caller Graph
Lab Service	4	LRAC3 LRAC4 LRAC5 LRAC7

Entry Points

External References

Name	Field # of Occurrence
ENT^LRAC7	WR
REG^LRAC9	MDT+1
DASH^LRX	WR+5
EQUALS^LRX	WR, END

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,PNM,?20,$G(HRCN),?33,"AGE: ",AGE Line Location: TOP+5
Function Call: WRITE	Prompt: ?(IOM-42)," LOC: ",LRWRD Line Location: TOP+7
Function Call: WRITE	Prompt: ?(IOM-22),$S($D(LRCDT):LRCDT,1:"??"),?(IOM-13),"PAGE: " Line Location: TOP+8
Function Call: WRITE	Prompt: $S($D(LRMISC):"MISC",1:LRMH),":",LRPG Line Location: TOP+12
Function Call: WRITE	Prompt: ! Line Location: LRBOT+1
Function Call: WRITE	Prompt: ! Line Location: Y+0
Function Call: WRITE	Prompt: $E(PNM,1,20),?21,$G(HRCN),?(IOM-46),"ROUTING: ",$E(LRLLOC,1,15),?(IOM-26) Line Location: Y+3
Function Call: WRITE	Prompt: $S(LRFULL!(LRPERM):" PERMANENT",1:" ") Line Location: Y+5
Function Call: WRITE	Prompt: " CHART COPY" Line Location: Y+6
Function Call: WRITE	Prompt: ?(IOM-22),$S($D(LRCDT):LRCDT,1:"??"),?(IOM-13),"PAGE: " Line Location: Y+13
Function Call: WRITE	Prompt: $S($D(LRMISC):"MISC",1:LRMH),":",LRPG Line Location: Y+14
Function Call: WRITE	Prompt: !?LRTAB,$E(LRMHN,1,IOM-LRTAB) Line Location: Y+15
Function Call: WRITE	Prompt: !,"COMMENT: ",LRVAL Line Location: LRMIT+6
Function Call: WRITE	Prompt: !!,LRUDT,?15,LRSPEM,?36,LRNAME,":",?50,@$S(LRPC="":"X",1:LRPC)," " Line Location: WR1+1
Function Call: WRITE	Prompt: X1," ",LRUNT,?67 Line Location: WR1+2
Function Call: WRITE	Prompt: LRLO,"-",LRHI Condition for execution: $L(LRLO) Line Location: WR1+2
Function Call: WRITE	Prompt: !,IA Line Location: WR1+3
Function Call: WRITE	Prompt: !!!?LRCL Line Location: WR+1
Function Call: WRITE	Prompt: "* " Line Location: WR+1
Function Call: WRITE	Prompt: " ",$E(LRMHN,I) Line Location: WR+2
Function Call: WRITE	Prompt: " " Line Location: WR+3
Function Call: WRITE	Prompt: " *" Line Location: WR+3
Function Call: WRITE	Prompt: !!," Date Time Specimen",?37,"Test",?50,"Results" Line Location: WR+4
Function Call: WRITE	Prompt: ?64,"Ref ranges" Line Location: WR+5
Function Call: WRITE	Prompt: !,^(I,0) Line Location: TXT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	LRMIT+7, LRMIT+8
^LAB(61 - [#61]	LRMIT+5
^LAB(64.5 - [#64.5]	TOP+13, Y+10
^LAC(	MHI, MDT, MDT+3, LRMIT, LRMIT+1, LRMIT+3, TXT+1, PRE+1, PRE+5, LRCNT+1 , LRCNT+2
^LAC("LGOT"	LRMISC
^LAC("LRKILL"	LRFD1, HEAD1+1
^LR - [#63]	LRFD1+1, LRFD1+2, HEAD1+1, PRE+3
^TMP($J	LRFD1, HEAD1+1, TOP+15!, LRMISC!, MDT+3, LRMIT+1, WR!

Label References

Name	Line Occurrences
END	MDT
HEAD	LRKILL, WR
HEAD1	LRKILL
LRBOT	HEAD+1, END+1
LRCNT	MDT+2
LRFD1	HEAD1+1
LRMISC	PRE+6
LRMIT	LRMIT+6, WR1+4
LRUDT	MDT+2
MDT	TXT+2
TOP	HEAD+1, LRMISC+1
TXT	LRMIT
WR	MHI, MDT+2
Y	Y

Naked Globals

Name	Field # of Occurrence
^(	HEAD1+1, LRMIT+7, TXT+1, PRE+3
^(0	LRFD1+1, TOP+13, Y+10, LRMIT+3, LRMIT+8, PRE+1, PRE+5*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AGE	TOP+5
DUZ("AG"	MDT+1
>> HRCN	TOP+5, Y+3
>> I	LRUDT, WR+1, WR+2, WR+3, TXT, TXT+1, LRCNT, LRCNT+1
IA	WR1+3!
IADA	WR1+3!
IARNO	WR1+3!
IAX	WR1+3!
IOF	TOP+1
IOM	TOP+7, TOP+8, Y+3, Y+13, Y+15
IOSL	Y, MDT+2, WR
IOST	TOP+1
>> J	LRCNT+2*
K	LRFD1, HEAD1+1*, HEAD1+2!
K(2	HEAD1+1*
K(3	LRFD1+1, LRFD1+2, HEAD1+1*
>> LRAG	TOP+15*
>> LRBOT	TOP+13, Y+10, Y+12
>> LRCDT	TOP+8, Y+13
>> LRCL	WR+1*
>> LRCNT	MHI, MDT+2, WR, LRCNT, LRCNT+1, LRCNT+3
>> LRCTN	LRCNT+2*, LRCNT+3
>> LRCW	WR1*
>> LRDFN	LRFD1, LRFD1+1, LRFD1+2, HEAD1+1, LRMISC, MHI, MDT, MDT+3, LRMIT, LRMIT+1 , LRMIT+3, TXT+1, PRE+1, PRE+3, PRE+5, LRCNT+1, LRCNT+2
>> LRDPF	TOP+7, MDT+1
LRFD	LRFD1, HEAD1+1*, HEAD1+2!
>> LRFD1	LRFD1*
>> LRFDT	LRUDT, LRUDT+2, LRMISC+1, MDT, MDT+3, LRMIT, LRMIT+1, LRMIT+3, TXT+1, LRCNT+1 , LRCNT+2
>> LRFULL	HEAD1, Y+5, WR*
>> LRHI	LRMIT+2*, WR1+2
>> LRJ02	TOP+1, TOP+2*
>> LRKL	HEAD1, TOP+15
>> LRLLOC	Y+3
>> LRLO	LRMIT+2, WR1+2, END+1
>> LRMH	LRFD1, LRFD1+2, HEAD1+1, TOP+12, TOP+13, Y+10, Y+14, Y+15, MHI, PRE+3 , PRE+4*, LRCNT+1, LRCNT+2
>> LRMHN	Y+15, MHI*, WR+1, WR+2
LRMISC	TOP+12, Y+14, END+1!, PRE+2*
>> LRMIT	MDT+3, LRMIT, LRMIT+1, LRMIT+3
>> LRNAME	LRMIT+7*, WR1+1
>> LRPC	LRMIT+7*, WR1+1
>> LRPERM	HEAD1, Y+5, LRMISC
>> LRPG	LRFD1+2, HEAD1+1, TOP+12, Y+14, Y+16, LRMISC, PRE+3*, PRE+5
>> LRPG1	Y+16, LRMISC, PRE+3
>> LRRE	HEAD1+1, PRE+3, PRE+5
LRSB	END+1!
>> LRSPE	LRMIT+4*, LRMIT+5, LRMIT+8
>> LRSPEM	LRMIT+5*, WR1+1
>> LRTAB	Y+15*
>> LRTEST	LRMIT+4*, LRMIT+6, LRMIT+7, LRMIT+8
>> LRTIM	LRUDT, LRUDT+1, LRUDT+2
>> LRUDT	LRUDT+2*, WR1+1
>> LRUNT	LRMIT+7, LRMIT+8, WR1+2
>> LRVAL	LRMIT+3*, LRMIT+6, WR1
>> LRWRD	TOP+7
>> LRX19	LRMIT+3*, LRMIT+4
>> LRX21	PRE+1*, PRE+3
>> LRXLR	MHI, MDT, MDT+3, LRMIT, LRMIT+1, LRMIT+3, TXT+1, PRE+1, PRE+5, LRCNT+1 , LRCNT+2
>> P	LRFD1+1*, LRFD1+2
>> PNM	TOP+5, Y+3
U	LRFD1+1, LRFD1+2, HEAD1+1, TOP+13, Y+10, MHI, LRMIT+1, LRMIT+3, LRMIT+4, LRMIT+5 , LRMIT+7, LRMIT+8, PRE+3, PRE+5
>> X	WR1*
>> X1	LRMIT+4*, WR1+2
>> Z	HEAD1+1*

Customize PDF page

Package: Lab Service

Routine: LRAC6

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
PRE	;from LRAC3
HEAD	;from LRAC3, LRAC4, LRAC5, LRAC7
LRKILL
HEAD1
MHI
TOP	;from LRAC3
LRFD1
LRMISC
LRUDT
WR
LRCNT
WR1
Y
END
TXT
LRBOT	;from LRAC3
LRMIT
MDT