Routine: LRACSUM5

Information

LRACSUM5 ;SLC/DCM - PRINT INDIVIDUAL PATIENT SUMMARY ; 3/3/88 13:32 ;

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Lab Service	3	(LOOP,LRLNS,LRSH,UDT)^LRACSUM3 HEAD^LRACSUM6 (DASH,EQUALS)^LRX

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Lab Service	2	LRACSUM3 LRACSUM4

Entry Points

Name	Comments	DBIA/ICR reference
TS	;from LRACSUM3
LRFDT
GOUT
QRS
QRS1
TXT	;from LRACSUM4
C2
LRLO	;from LRACSUM4
LRHI
TXT1	;from LRACSUM3, LRACSUM4
C
C1	;from LRACSUM4
TS1
TS2

Name	Field # of Occurrence
LOOP^LRACSUM3	LRFDT
LRLNS^LRACSUM3	GOUT
LRSH^LRACSUM3	GOUT
UDT^LRACSUM3	QRS+2
HEAD^LRACSUM6	GOUT
DASH^LRX	TS+12
EQUALS^LRX	TS+1, TXT1+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: TS+4
Function Call: WRITE	Prompt: "Locale " Condition for execution: $D(LRCALE(LRMH,LRSH)) Line Location: TS+4
Function Call: WRITE	Prompt: LRTOPP,?LRCL Line Location: TS+4
Function Call: WRITE	Prompt: $J($E($P(Z,U,3),1,(LRCW-1)),(A+B)),?LRCL Line Location: TS+5
Function Call: WRITE	Prompt: ! Line Location: TS+9
Function Call: WRITE	Prompt: ?9 Condition for execution: $D(LRCALE(LRMH,LRSH)) Line Location: TS+9
Function Call: WRITE	Prompt: $S($L($P(^LAB(64.5,"A",1,LRMH,LRSH,I(J)),U,11)):"Therapeutic",1:"Ref range"),?LRCL Line Location: TS+9
Function Call: WRITE	Prompt: !?LRCL Line Location: TS+11
Function Call: WRITE	Prompt: LRUDT Line Location: QRS+2
Function Call: WRITE	Prompt: ?LRCL Line Location: QRS1+0
Function Call: WRITE	Prompt: X_X1 Line Location: QRS1+1
Function Call: WRITE	Prompt: !?3 Condition for execution: LRVAR>1 Line Location: TXT+2
Function Call: WRITE	Prompt: ^(LRIV,0) Line Location: TXT+2
Function Call: WRITE	Prompt: !!?LRCL Line Location: TXT1+2
Function Call: WRITE	Prompt: "- " Line Location: TXT1+2
Function Call: WRITE	Prompt: " ",$E("COMMENTS",I) Line Location: TXT1+3
Function Call: WRITE	Prompt: " " Line Location: TXT1+4
Function Call: WRITE	Prompt: " -" Line Location: TXT1+4
Function Call: WRITE	Prompt: !?7,"KEY: ""L""=Abnormal low, ""H""=Abnormal high, ""*""=Critical value",! Line Location: TXT1+5
Function Call: WRITE	Prompt: !," " Condition for execution: L(0)>1 Line Location: TXT1+6
Function Call: WRITE	Prompt: ^TMP($J,"TM",C6,L) Line Location: TXT1+6
Function Call: WRITE	Prompt: $J(LRLOHI,(A+B)),?LRCL Line Location: TS1+0
Function Call: WRITE	Prompt: $J($P(^(I(I)),U,7),(A+B)),?LRCL Line Location: TS2+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(64.5 - [#64.5]	TS+2, TS+5, TS+7, TS+9, TS+10, QRS+3, LRLO+1, LRHI, TS1, TS2
^TMP($J	LRFDT, GOUT, QRS, QRS1+1, TXT+2, TXT1+6

Label References

Name	Line Occurrences
C	QRS1+1
C2	C+4
LRFDT	GOUT+2
LRLO	TS1
QRS	GOUT
QRS1	QRS+3
TS	GOUT, GOUT+1
TS1	TS+9
TS2	TS+11
TXT1	GOUT

Naked Globals

Name	Field # of Occurrence
^(	TS+7, TS+10, LRFDT, QRS, QRS1+1, TXT+2, LRLO+1, LRHI, TS2
^(0	QRS1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	TS+5, LRFDT!, TS1, TS2*
B	TS+5, LRFDT!, TS1, TS2*
C6	TXT1+6*, TXT1+7!
I	TS+2!, TS+5, TS+6, TS+7, TS+10, TS+11, QRS, QRS+3, QRS1+1, LRLO+1 , LRHI, TXT1+2, TXT1+3, TXT1+4, TS1*, TS2
I(	TS+2*, TS+5, TS+7, TS+9, TS+10, QRS, QRS+3, QRS1+1, LRLO+1, LRHI , TS1, TS2
IOM	TS+5, QRS1, TXT1+2, TS2
>> J	TS+3*, TS+4, TS+5, TS+7, TS+9, TS+10, TS+11, QRS, QRS+3, TS1
L	TXT1+6*, TXT1+7!
L(0	TXT1+6*
>> LRACT	TS+1, TS+3*, TS+6, GOUT, GOUT+1
>> LRCALE(	TS+3, TS+4, TS+8, TS+9, TS+11, QRS+2
>> LRCL	TS+3, TS+4, TS+5, TS+8, TS+9, TS+11, QRS+2, QRS1, QRS1+1, TXT1+2* , TS1, TS2
>> LRCTR	TS+3, GOUT, GOUT+1, QRS
>> LRCW	TS+5, QRS1, QRS1+1, C+1, C+3, C1+1, C1+2, TS1, TS2*
>> LRCW(1	C+3*, C+4
>> LRDFN	LRFDT, GOUT, QRS, QRS1+1, TXT+2
>> LRDP	QRS1*, C+4
>> LRFALT	TS+3, TS+7, TS+9, TS+10, TS+11, TS+12, QRS, QRS+1, QRS+2, TS2*
>> LRFDT	LRFDT, LRFDT+1, GOUT, GOUT+1*, QRS, QRS1+1, TXT+2
>> LRFFDT	LRFDT*, GOUT+1
>> LRFULL	GOUT*
>> LRG	QRS+3*, QRS1, QRS1+1, C+1, C1+2
>> LRHI	LRHI+1
>> LRII	TS+2*
>> LRIV	TXT+2*
>> LRJS	TS+3, TS+6*, TS+7, TS+10, TS+11, QRS, QRS+3, TS1
>> LRLFDT	LRFDT+1*, GOUT
>> LRLNS	GOUT, GOUT+1
>> LRLO	LRHI+1
>> LRLOHI	LRHI+1*, TS1
>> LRMH	TS+2, TS+3, TS+4, TS+5, TS+7, TS+8, TS+9, TS+10, TS+11, LRFDT , GOUT, QRS, QRS+2, QRS+3, QRS1+1, TXT+2, LRLO+1, LRHI, TS1, TS2
>> LRNP	LRFDT*
>> LRNXSW	QRS+2
>> LRPL	TS+6, GOUT, GOUT+1
>> LRSH	TS+2, TS+3, TS+4, TS+5, TS+7, TS+8, TS+9, TS+10, TS+11, LRFDT , GOUT, QRS, QRS+2, QRS+3, QRS1+1, TXT+2, LRLO+1, LRHI, TS1, TS2
>> LRSHD	TS+4, TS+5
>> LRTLOC	LRFDT*, QRS+2
>> LRTM	QRS+2*
>> LRTM(0	TXT1+6
>> LRTOPP	TS+4
>> LRUDT	QRS+2
>> LRVAR	TXT+1, TXT+2
>> P7	LRHI*
U	TS+5, TS+7, TS+9, TS+10, LRFDT, QRS1, QRS1+1, LRLO+1, LRHI, TXT1+6 , C, C+1, C1+2, TS1, TS2
>> X	QRS1+1, C2, C, C+2, C+4, C1+3
>> X1	QRS1+1, C, C1+1, C1+3
X2	QRS1+2!, C2, C+2*
X3	C2*, C2+1!
>> Z	TS+5, TS+7

Customize PDF page

Package: Lab Service