Routine: LRBLDA

Package	Total	Call Graph
Lab Service	5	(,EN,EN1)^LRBLDA1 ^LRBLDAA (,EN)^LRBLDAL (D,F,H,H1,L,M,S,V,YN)^LRU (,BEG,END)^LRUTL
VA Fileman	2	^%DT ^DIC

Package	Total	Caller Graph
Lab Service	1	LRBLDL

Entry Points

External References

Name	Field # of Occurrence
^%DT	L+3
^DIC	L+5, LTR, ASK
^LRBLDA1	I+4
EN^LRBLDA1	A
EN1^LRBLDA1	LTR
^LRBLDAA	L+2
^LRBLDAL	C+1
EN^LRBLDAL	ASK+2
D^LRU	L+3, W+2
F^LRU	H+1
H^LRU	S+1
H1^LRU	F+1
L^LRU	QUE
M^LRU	H
S^LRU	QUE
V^LRU	QUE+2, END
YN^LRU	L+2, L+4, A, ASK+1
^LRUTL	LRBLDA+4
BEG^LRUTL	A+1, I+3, C, ASK+2
END^LRUTL	QUE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!?24,"PRINT BLOOD DONOR LIST/LABELS/LETTERS" Line Location: LRBLDA+5
Function Call: READ	Timeout: DTIME Variable: X Line Location: L+0
Function Call: WRITE	Prompt: !!?14,"1. DONOR LIST",!?14,"2. DONOR LABELS",!?14,"3. DONOR PRE -VISIT LETTERS",!?14,"4. DONOR POST-VISIT LETTERS",!,"Select (1-4): " Line Location: L+0
Function Call: WRITE	Prompt: $C(7),!,"Enter a number from 1 to 4" Line Location: L+1
Function Call: WRITE	Prompt: !!,"Letter for a single donor " Line Location: L+2
Function Call: WRITE	Prompt: !! Line Location: L+2
Function Call: WRITE	Prompt: !!,"DONORS FROM A SPECIFIC GROUP AFFILIATION " Line Location: L+4
Function Call: READ	Prompt: "Start with BLOOD DONOR NAME: FIRST// " Formatting: !! Timeout: DTIME Variable: X Line Location: S+0
Function Call: READ	Prompt: "Go to BLOOD DONOR NAME: LAST// " Formatting: ! Timeout: DTIME Variable: X Line Location: F+0
Function Call: WRITE	Prompt: !,LRP Line Location: W+2
Function Call: WRITE	Prompt: ?31,$E(Y,1,12) Line Location: W+2
Function Call: WRITE	Prompt: ?31,$E(Y,1,12) Line Location: W+2
Function Call: WRITE	Prompt: !?45,$E($P(^(0),"^",3),1,30) Line Location: W+4
Function Call: WRITE	Prompt: !,LRAA(1),!,"NO " Line Location: H+1
Function Call: WRITE	Prompt: LR(2)," " Condition for execution: LR(2)]"" Line Location: H+1
Function Call: WRITE	Prompt: "DONATIONS SINCE ",LRSTR Line Location: H+1
Function Call: WRITE	Prompt: !,"Donor",?31,"Last donation",?55,"Group" Line Location: H+2
Function Call: WRITE	Prompt: ?76,"Home phone",?93,"Work phone" Condition for execution: IOM>118 Line Location: H+2
Function Call: WRITE	Prompt: !?5,"Home phone",?25,"Work phone" Condition for execution: IOM<119 Line Location: H+2
Function Call: WRITE	Prompt: !,LR("%") Line Location: H+2
Function Call: WRITE	Prompt: !!?33,"REMEMBER TO",!?13,"ALIGN THE PRINT HEAD ON THE FIRST LINE OF THE LABEL" Line Location: B+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: I+0
Function Call: WRITE	Prompt: ! Line Location: I+4
Function Call: WRITE	Prompt: ! Line Location: C+1
Function Call: WRITE	Prompt: ! Line Location: ASK+0
Function Call: WRITE	Prompt: ! Line Location: ASK+2
Routine Call	DIC Line Location: L+5 LTR ASK

FileNo	Call Tags
^LRE - [#65.5]	Classic Fileman Calls
^LAB(65.9 - [#65.9]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(69.2	I+1
^LAB(65.4 - [#65.4]	W+2, W+4
^LRE - [#65.5]	QUE+1, W, W+1, W+3, W+4
^LRE("B"	QUE+1
^LRO(69.2 - [#69.2]	B
^TMP("LRBLY"	END!

Name	Field # of Occurrence
^(	QUE+1
^(0	W+2, W+4, B
^(1	W+3
^(3	I+1
^(4	I+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	L+2, L+4, L+5, A*, ASK+1
%DT	L+3*!
%DT("A"	L+3*
%DT(0	L+3*
>> B	W+4*
DIC	L+5!, LTR!, ASK*!
DIC("A"	L+5, LTR
DIC("S"	L+5, LTR
DIC(0	L+5, LTR, ASK*
DTIME	L, S, F, I
IO	QUE
IOF	LRBLDA+5
IOM	W+3, H+2
IOSL	W+1
IOST	H
>> LR	L+3, L+5, W+1
>> LR("%"	H+2
>> LR("F"	QUE*, H
>> LR("Q"	QUE+1, W+1, H
>> LR(1	B, I, I+2
>> LR(2	L+3, L+5, H+1
>> LRA	QUE+1*
>> LRAA	B
>> LRAA(1	H+1
>> LRABO	A*, W
>> LRF	LRBLDA+4*
>> LRI	QUE+1, W, W+1, W+3, W+4, ASK+1
>> LRJ	LTR
>> LRL	LTR*
>> LRP	QUE+1, W+2, ASK+1
>> LRP(1	S, S+2, QUE+1
>> LRP(2	S, F, F+2*, QUE+1
>> LRRH	A*, W
>> LRS	L+2*, A+1
>> LRSDT	L+3*, QUE+1
>> LRSTR	L+3*, H+1
>> LRW	QUE+1*, W+1, W+2
>> LRW(7	W+1*, W+2, W+4
>> LRY	LRBLDA+4, L+5
>> O	W+3*
>> POP	A+1, I+3, C, ASK+2
U	L, L+5, S, F, I, LTR, ASK+1
>> X	LRBLDA+4, L, L+1, L+2, L+5, S, S+1, S+2, F, F+1 , F+2, W, W+3, I*, I+1, I+2
>> X(1	S+2*
>> Y	LRBLDA+4, L+3, L+5, A, W+2, W+3, LTR*, C, O, ASK , ASK+1
>> Y(0	L+5, ASK+1
>> ZTRTN	A+1, I+3, C, ASK+2
>> ZTSK	A+1, I+3, C, ASK+2

Customize PDF page

Package: Lab Service

Routine: LRBLDA

Information

Source Information

Call Graph

Call Graph Total: 7

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:

Name	Line Occurrences
A	S, F
ASK	ASK+1
B	A+1
C	A+1
END	LRBLDA+4, L, L+3, L+4, L+5, S, F, A, A+1, I+3 , C, O, ASK, ASK+2
F	F+1
H	QUE, W+1
I	I+1
L	L+1
LTR	C, O
O	L+2
S	S+1
W	QUE+1