Routine: LRUMDM

Package	Total	Call Graph
Lab Service	4	(D,F,L,L1,M,S,SSN,V,YN)^LRU (EN,EN1)^LRUMDP (BEG,END)^LRUTL $$Y2K^LRX

Package

Total

Call Graph

Lab Service

(D,F,L,L1,M,S,SSN,V,YN)^LRU (EN,EN1)^LRUMDP (BEG,END)^LRUTL $$Y2K^LRX

Package	Total	Caller Graph
Lab Service	1	LRUMD

Package

Total

Caller Graph

Lab Service

LRUMD

Name	Field # of Occurrence
D^LRU	L
F^LRU	H+2
L^LRU	QUE+1
L1^LRU	QUE+1
M^LRU	H
S^LRU	QUE+1
SSN^LRU	I+2
V^LRU	END
YN^LRU	LRUMDM+4
EN^LRUMDP	QUE+2
EN1^LRUMDP	QUE+2
BEG^LRUTL	LRUMDM+5
END^LRUTL	END
$$Y2K^LRX	W+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"New page for each patient " Line Location: LRUMDM+4
Function Call: WRITE	Prompt: !,"SSN:",SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP Line Location: I+3
Function Call: WRITE	Prompt: !,"HRCN:",HRCN,?19,"LOC:",LRL,?44,"Patient: ",LRP Line Location: I+4
Function Call: WRITE	Prompt: !,LR("%1") Line Location: I+5
Function Call: WRITE	Prompt: !?13,O," ",$P(B(1),"^",2) Line Location: O+1
Function Call: WRITE	Prompt: !?9,X Line Location: O+2
Function Call: WRITE	Prompt: !,$S(LRF=1:"BACT",LRF=5:"PARASITE",LRF=8:"MYCOLOGY",LRF=11:"TB",LRF=16:"VIROLOGY",1:""),?9,"RPT DATE:",Y,?44,$P($P(LRS,Z,2),";") Line Location: L+0
Function Call: WRITE	Prompt: !,LRDATE,?17,$E($P($G(^LAB(61,T,0)),"^"),1,28),?44,LRC,?62,LRN Line Location: W+5
Function Call: WRITE	Prompt: !?3,X Condition for execution: X]"" Line Location: W+5
Function Call: WRITE	Prompt: ! Line Location: W+6
Function Call: WRITE	Prompt: ?3,"Tests:" Condition for execution: LRB(3)=1 Line Location: W+6
Function Call: WRITE	Prompt: ?10,$S($D(^LAB(60,LRB(2),0)):$P(^(0),"^"),1:"") Line Location: W+6
Function Call: WRITE	Prompt: !?15,$P($P(LRM,Z,2),";")," ",$P(X,U,4) Line Location: M+0
Function Call: WRITE	Prompt: !?15,$P(B(1),"^",11) Line Location: C+0
Function Call: WRITE	Prompt: !?15,LRZ Line Location: C1+0
Function Call: WRITE	Prompt: !,LR("%") Line Location: H+1
Function Call: WRITE	Prompt: !,LR("%") Line Location: H+2
Function Call: WRITE	Prompt: W Line Location: H1+0
Function Call: WRITE	Prompt: !,"SSN:",SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP Line Location: H1+0
Function Call: WRITE	Prompt: W Line Location: H1+1
Function Call: WRITE	Prompt: !,"HRCN:",HRCN,?19,"LOC:",LRL,?44,"Patient: ",LRP Line Location: H1+1
Function Call: WRITE	Prompt: !,"Date",?13,"Site/specimen",?44,"Collection sample",?62,"Accession number" Line Location: A+0

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.05	QUE
^DIC - [#1]	I+2
^LAB(60 - [#60]	W+6
^LAB(61 - [#61]	W+5
^LAB(61.2 - [#61.2]	O+1
^LAB(62 - [#62]	W+3
^LR - [#63]	I+2, T, O+1, O+2, L, W+1, W+5, C+1, C1
^LRO(68 - [#68]	QUE, W+2, W+6
^LRO(69.2 - [#69.2]	QUE+3, I
^TMP($J	QUE!, QUE+2
^VA(200 - [#200]	H+2

Name	Line Occurrences
A	W+4
C	O+1
C1	C+1
END	LRUMDM+4, LRUMDM+5, QUE+1, QUE+3
H	QUE+1, I+4, H1+1
H1	O, O+1, O+2, W+5, W+6, C+1, C1
I	QUE+1, QUE+2, QUE+3
L	O
M	L
O	T
T	I+4
W	T

Name	Field # of Occurrence
^(	I+2, O+1, O+2, L, C+1, C1
^(0	W+3, W+6
^(1	I
^(99	W+5

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	LRUMDM+4*
>> B	O+1, O+2, C+1, C1
>> B(1	O+1*, C
>> DFN	I+2*
DUZ	QUE+3, I, H+2
>> E	T*
>> HRCN	I+4, H1+1
IO	QUE
IOF	END
IOSL	I+4, O, O+1, O+2, W+5, W+6, C+1, C1
IOST	END, H, H+2
>> LR("%"	O+3, H+2
>> LR("%1"	I+5
>> LR("F"	QUE+1*, H
>> LR("Q"	QUE+2, QUE+3, I+4, I+5, T, O, O+1, O+2, W, W+4 , W+5, W+6, C+1, C1, H, H1+1
>> LRA	I, H+2
>> LRAA	QUE+3, I
>> LRB	W+4*, W+6
>> LRB(1	W+4*, W+6
>> LRB(2	W+6*
>> LRB(3	W+6*
>> LRC	W+1, W+3, W+5
>> LRDATE	W+3*, W+5
>> LRDFN	QUE+2, QUE+3, I, I+2, T, O+1, O+2, L, W+1, W+5 , C+1, C1
>> LRDFN(1	QUE+1
>> LRDPF	I+2*
>> LRE	QUE+2, QUE+3, H+2
>> LRE(1	H+2
>> LRF	O, O+1, O+2*, L, C, C+1, C1
>> LRG	QUE+2, QUE+3
>> LRI	T*, O+1, O+2, L, W+1, W+5, C+1, C1
>> LRJ	QUE, W+1, W+2*, W+6
>> LRK	LRUMDM+4*, QUE+1, I+4
>> LRL	I+2*, I+4, H1+1
>> LRLDT	T
>> LRM	QUE*, M
>> LRN	W+1*, W+4, W+5
>> LRP	I+2*, I+4, H1+1
>> LRS	QUE*, L
>> LRSDT	T
>> LRZ	C+1, C1
>> O	O+1*
>> P	QUE+1, QUE+2, QUE+3*
>> POP	LRUMDM+5
>> R	QUE+2, QUE+3
>> SSN	I+2*
>> T	W+1*, W+5
U	QUE, M
>> V	I+2, C1
>> W(1	T, O+3, W+1, W+4, H1+1
>> X	I+2, O+2, L, W+1, W+4, W+5*, M
>> Y	I+2, L, W+1*, W+3
>> Z	L, M, C+1*, C1
>> ZTRTN	LRUMDM+5*
>> ZTSK	LRUMDM+5

Customize PDF page

Package: Lab Service

Routine: LRUMDM

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
A
C
END
I
H
H1	;D H Q:LR("Q") I W(1)>1 W !,"SSN:",SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP
M
L
O
QUE
T
W
C1