Routine: LRBLDEX2

Package	Total	Call Graph
VA Fileman	3	$$EXTERNAL^DILFD ^DIWP ^DIWW
Lab Service	1	(EN,EN1)^LRBLDEX1

Package	Total	Caller Graph
Lab Service	1	LRBLDEX1

Entry Points

External References

Name	Field # of Occurrence
$$EXTERNAL^DILFD	R+2, R+7, R+8, R+12, D+2
^DIWP	W
^DIWW	W+1
EN^LRBLDEX1	EN+1, R+2, R+6, R+7, R+11, R+13, R+14, D+3, O, W
EN1^LRBLDEX1	R+1, R+9, R+12, D+1, D+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: Q:LR("Q") Line Location: EN+2
Function Call: WRITE	Prompt: ! Line Location: EN+2
Function Call: WRITE	Prompt: !,"Donation ",Y,"" Line Location: R+0
Function Call: WRITE	Prompt: " Site:",X Condition for execution: X]"" Line Location: R+0
Function Call: WRITE	Prompt: " Group:",X Condition for execution: X]"" Line Location: R+1
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+9) Line Location: R+1
Function Call: WRITE	Prompt: " Edit:",Y Line Location: R+1
Function Call: WRITE	Prompt: !,"Donation type:",$$EXTERNAL^DILFD(65.54,1.1,"",X) Line Location: R+2
Function Call: WRITE	Prompt: " ",$$EXTERNAL^DILFD(65.54,1,"",X) Line Location: R+2
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+39) Line Location: R+3
Function Call: WRITE	Prompt: " Reaction:",$E($P(^LAB(65.4,X,0),"^",3),1,30) Line Location: R+3
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+40) Line Location: R+4
Function Call: WRITE	Prompt: " Taken by:",$P(M,"^",9) Line Location: R+4
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+43) Line Location: R+5
Function Call: WRITE	Prompt: " Credit for:",$P(M,"^",5) Line Location: R+5
Function Call: WRITE	Prompt: !,"UNIT ID: ",X Line Location: R+6
Function Call: WRITE	Prompt: !,^LRE(LRI,5,W,3,B,0) Line Location: R+7
Function Call: WRITE	Prompt: " (lot#",X,")" Condition for execution: X]"" Line Location: R+9
Function Call: WRITE	Prompt: " tot gm:",X Condition for execution: X Line Location: R+9
Function Call: WRITE	Prompt: " empty wt:",X Condition for execution: X Line Location: R+9
Function Call: WRITE	Prompt: " empty wt:",X Condition for execution: X Line Location: R+9
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+10) Line Location: R+9
Function Call: WRITE	Prompt: " tech: ",Y Line Location: R+9
Function Call: WRITE	Prompt: !,"Collection start:",Y Line Location: R+10
Function Call: WRITE	Prompt: " stop:",Y Line Location: R+10
Function Call: WRITE	Prompt: " stop:",Y Line Location: R+10
Function Call: WRITE	Prompt: !,"Test",?31,"Tech" Line Location: R+11
Function Call: WRITE	Prompt: !,$E(LR(M),1,15),?16,$$EXTERNAL^DILFD(65.54,M,"",Z(1)),?31 Line Location: R+12
Function Call: WRITE	Prompt: Y,?35,$P(Z,"^",3) Line Location: R+12
Function Call: WRITE	Prompt: !,$P(^LAB(66,M(1),0),"^"),?41,$P(M,"^",5) Line Location: R+14
Function Call: WRITE	Prompt: ?47,Y Line Location: D+0
Function Call: WRITE	Prompt: ?62,Y Line Location: D+0
Function Call: WRITE	Prompt: !,"Label tech:",Y Line Location: D+1
Function Call: WRITE	Prompt: " Disposition:",$$EXTERNAL^DILFD(65.66,.08,"",X)," date:" Line Location: D+2
Function Call: WRITE	Prompt: Y," tech:" Line Location: D+2
Function Call: WRITE	Prompt: Y," tech:" Line Location: D+2
Function Call: WRITE	Prompt: !,^LRE(LRI,5,W,66,M(1),1,E,0) Line Location: D+3
Function Call: WRITE	Prompt: !,$P(^LAB(65.4,M,0),"^",3) Line Location: O+0
Function Call: WRITE	Prompt: Line Location: W+0

Name	Comments	DBIA/ICR reference
EN	;from LRBLDEX1
D
O
R
T
W

Name	Line Occurrences (* Changed, ! Killed)
^LAB(65.4 - [#65.4]	R, R+1, R+3, O
^LAB(66 - [#66]	R+14
^LRE - [#65.5]	EN+1, EN+2, R+7, R+8, R+11, R+12, R+14, D+3, O, W
^TMP("LRBL"	R+6*
^UTILITY($J	W!

Name	Field # of Occurrence
^(	R+12, R+14, O
^(0	R, R+1
^(11	R+11
^(12	R+11
^(13	R+11
^(14	R+11
^(15	R+11
^(16	R+11
^(17	R+11
^(18	R+11
^(19	R+11
^(2	R+8
^(20	R+11

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> B	EN+1, R+7
>> C	O*
>> DIWF	W*
>> DIWL	W*
>> DIWR	W*
>> E	D+3*
IOM	R+1, R+3, R+4, R+5, R+9, W
IOSL	EN+1, R+2, R+6, R+7, R+13, R+14, D+3, O, W
>> LR(	R+12
>> LR("Q"	EN+1, EN+2, R+1, R+2, R+6, R+7, R+8, R+13, R+14, D+3 , O, W, W+1
>> LRI	EN+1, EN+2, R+7, R+8, R+11, R+12, R+14, D+3, O, W
>> LRP	R+6
>> LRR	W*, W+1
>> LRX	W*
M	EN+1, R, R+1, R+2, R+3, R+4, R+5, R+6, R+8!, R+9 , R+10, R+12, R+14, D, D+1, D+2, O*
M(1	R+13, R+14, D+3
>> N	O*
U	R+8, D+1, D+2
>> W	EN+1*, R+7, R+8, R+11, R+12, R+14, D+3, O
>> X	R, R+1, R+2, R+3, R+6, R+7, R+8, R+9, D+2, W*
>> Y	T, EN+1, R, R+1, R+9, R+10, R+12, D, D+1, D+2*
>> Z	R+12, R+14
>> Z(1	R+12*

Customize PDF page

Package: Lab Service

Routine: LRBLDEX2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

FileNo	Call Tags
65.54	EXTERNAL^DILFD
65.66	EXTERNAL^DILFD