Routine: LRBLDEX1

Package	Total	Call Graph
Lab Service	3	EN^LRBLDEX2 (F,M,V)^LRU END^LRUTL
VA Fileman	1	$$EXTERNAL^DILFD

Package	Total	Caller Graph
Lab Service	2	LRBLDEX LRBLDEX2

Entry Points

External References

Name	Field # of Occurrence
$$EXTERNAL^DILFD	L+9
EN^LRBLDEX2	L+10
F^LRU	HDR+1
M^LRU	HDR
V^LRU	OUT
END^LRUTL	OUT

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,A,?15,^TMP("LRBL",$J,A) Line Location: LRBLDEX1+4
Function Call: WRITE	Prompt: D Line Location: L+0
Function Call: WRITE	Prompt: !,LRP," (Donor #: ",LRI,")",?40,Y,?49,$P(W,"^",2),?52,$J($P(W,"^",5),2),?55,$P(W,"^",6),?62,$S($P(W,"^",4)=1:"YES",1:"NO"),?73,$S($P(W,"^",10):"YES",1:"NO") Line Location: L+0
Function Call: WRITE	Prompt: !,"Reg/edited: " Line Location: L+1
Function Call: WRITE	Prompt: Y Line Location: L+1
Function Call: WRITE	Prompt: " cum donations: ",$P(W,"^",7) Condition for execution: $P(W,"^",7) Line Location: L+1
Function Call: WRITE	Prompt: " total awards: ",$P(W,"^",8) Condition for execution: $P(W,"^",8) Line Location: L+1
Function Call: WRITE	Prompt: " demog ent/edit by:" Condition for execution: $P(W,"^",9) Line Location: L+1
Function Call: WRITE	Prompt: Y Line Location: L+1
Function Call: WRITE	Prompt: I Line Location: L+2
Function Call: WRITE	Prompt: W Line Location: L+2
Function Call: WRITE	Prompt: !,$P(W,"^")," ",$P(W,"^",2)," ",$P(W,"^",3)," ",$P(W,"^",4)," " Line Location: L+2
Function Call: WRITE	Prompt: !,$P(W,"^")," ",$P(W,"^",2)," ",$P(W,"^",3)," ",$P(W,"^",4)," " Line Location: L+2
Function Call: WRITE	Prompt: " ",W(6) Condition for execution: W(6) Line Location: L+2
Function Call: WRITE	Prompt: F Line Location: L+4
Function Call: WRITE	Prompt: Q:'W!(LR("Q")) S W(1)=$P(^(W,0),"^",2) W:'B Line Location: L+4
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+31) Line Location: L+4
Function Call: WRITE	Prompt: " ",$P(^(0),"^") Line Location: L+4
Function Call: WRITE	Prompt: "(",W(1),")" Condition for execution: W(1)]"" Line Location: L+4
Function Call: WRITE	Prompt: F Line Location: L+5
Function Call: WRITE	Prompt: Q:'W S W(1)=$P(^(W,0),"^",2) W:'B Line Location: L+5
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+31) Line Location: L+5
Function Call: WRITE	Prompt: " ",$P(^(0),"^") Line Location: L+5
Function Call: WRITE	Prompt: "(",W(1),")" Condition for execution: W(1)]"" Line Location: L+5
Function Call: WRITE	Prompt: F Line Location: L+6
Function Call: WRITE	Prompt: Q:'W S W(1)=$P(^(W,0),"^",2) W:'B Line Location: L+6
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+31) Line Location: L+6
Function Call: WRITE	Prompt: " ",$P(^(0),"^") Line Location: L+6
Function Call: WRITE	Prompt: "(",W(1),")" Condition for execution: W(1)]"" Line Location: L+6
Function Call: WRITE	Prompt: F Line Location: L+7
Function Call: WRITE	Prompt: Q:'W S W(1)=$P(^(W,0),"^",2) W:'B Line Location: L+7
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+31) Line Location: L+7
Function Call: WRITE	Prompt: " ",$P(^(0),"^") Line Location: L+7
Function Call: WRITE	Prompt: "(",W(1),")" Condition for execution: W(1)]"" Line Location: L+7
Function Call: WRITE	Prompt: F Line Location: L+8
Function Call: WRITE	Prompt: Q:'W W:'B Line Location: L+8
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+31) Line Location: L+8
Function Call: WRITE	Prompt: " ",$P(^(0),"^") Line Location: L+8
Function Call: WRITE	Prompt: F Line Location: L+9
Function Call: WRITE	Prompt: Q:'W S X=^(W,0) W:'B Line Location: L+9
Function Call: WRITE	Prompt: ! Condition for execution: IOM<($X+10) Line Location: L+9
Function Call: WRITE	Prompt: " ",$$EXTERNAL^DILFD(65.53,.01,"",X) Line Location: L+9
Function Call: WRITE	Prompt: !,LRAA(1)," NO DONATIONS SINCE ",LRSTR Line Location: HDR+1
Function Call: WRITE	Prompt: !?10,"Donor (Reg #)",?42,"DOB",?48,"SEX",?52,"ABO/Rh",?59,"APHERESIS",?69,"PERM DEFER",!,LR("%") Line Location: H+0
Function Call: WRITE	Prompt: !,LRP," (Donor #: ",LRI,") <continued from page ",LRQ-1,">" Line Location: EN+1
Function Call: WRITE	Prompt: !,"Donor ID",?15,"DONOR NAME",!,LR("%") Line Location: H2+0

Name	Line Occurrences (* Changed, ! Killed)
^DIC(5 - [#5]	L+2
^LAB(61.3 - [#61.3]	L+4, L+5, L+6, L+7
^LAB(65.4 - [#65.4]	L+8
^LRE - [#65.5]	L, L+2, L+4, L+5, L+6, L+7, L+8, L+9
^LRO(69.2 - [#69.2]	LRBLDEX1+3
^TMP("LRBL"	LRBLDEX1+4, OUT!
^VA(200 - [#200]	EN1+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	LRBLDEX1+3, LRBLDEX1+4
>> B	LRBLDEX1+4, L+4, L+5, L+6, L+7, L+8, L+9*
IOM	L+3, L+4, L+5, L+6, L+7, L+8, L+9
IOSL	LRBLDEX1+4, L, L+4, L+5, L+6, L+7, L+8, L+9
IOST	HDR
>> LR("%"	H, H2
>> LR("F"	LRBLDEX1+3*, HDR
>> LR("Q"	LRBLDEX1+4, L, L+4, L+5, L+6, L+7, L+8, L+9, L+10, HDR , H, EN+1, H2
>> LRAA	LRBLDEX1+3
>> LRAA(1	HDR+1
>> LRI	LRBLDEX1+3*, L, L+2, L+4, L+5, L+6, L+7, L+8, L+9, EN+1
>> LRP	LRBLDEX1+3*, L, EN+1
>> LRQ	EN+1
>> LRSTR	HDR+1
W	L, L+1, L+2!, L+3, L+4, L+5, L+6, L+7, L+8, L+9
W(1	L+4, L+5, L+6, L+7
W(6	L+2*
W(7	L+3*
W(8	L+3*
>> X	L+2, L+9
>> Y	T, L, L+1, EN1+1

Customize PDF page

Package: Lab Service

Routine: LRBLDEX1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
EN	L+4, L+5, L+6, L+7, L+8, L+9
EN1	L+1
H	LRBLDEX1+3, L, EN+1
H2	LRBLDEX1+4
HDR	H, H2
L	LRBLDEX1+3
OUT	LRBLDEX1+4
T	L, L+1

Name	Field # of Occurrence
^(	L+4, L+5, L+6, L+7, L+9
^(0	L+4, L+5, L+6, L+7, L+8, EN1+1
^(1	L+2