Routine: LRBLDR1

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIWP ^DIWW
Lab Service	2	H^LRBLDR (D,WAIT,YN)^LRU

Package

Total

Call Graph

VA Fileman

^DIC ^DIWP ^DIWW

Lab Service

H^LRBLDR (D,WAIT,YN)^LRU

Package	Total	Caller Graph
Lab Service	1	LRBLDR

Package

Total

Caller Graph

Lab Service

LRBLDR

Name	Field # of Occurrence
^DIC	A
^DIWP	LRBLDR1+5
^DIWW	LRBLDR1+6
H^LRBLDR	H
D^LRU	LRBLDR1+4
WAIT^LRU	A
YN^LRU	D+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!!!!!,"Donor is in the file as permanently deferred as of ",Y,".",!,"If you have any questions, please see the physician in charge." Line Location: LRBLDR1+4
Function Call: WRITE	Prompt: !,LR("%") Line Location: LRBLDR1+6
Function Call: WRITE	Prompt: !!,"EXAM:",!!,"General appearance:",!!,"Venipuncture site:" Line Location: LRBLDR1+7
Function Call: WRITE	Prompt: !!,"Weight (lb):",?30,"Temp:",?45,"Pulse:",?60,"BP:",!!,"Hb:",?20,"Hct:" Line Location: LRBLDR1+8
Function Call: WRITE	Prompt: !!,"OK to collect unit (Yes or No):" Line Location: LRBLDR1+9
Function Call: WRITE	Prompt: !!,"If not OK to collect reason(s):" Line Location: LRBLDR1+10
Function Call: WRITE	Prompt: !!,"Patient credit:",!!,"Examiner:",?40,"Phlebotomist:" Line Location: LRBLDR1+11
Function Call: WRITE	Prompt: !!,"UNIT NUMBER:",?40,"Bag lot #:" Line Location: LRBLDR1+12
Function Call: WRITE	Prompt: !!,"Time collection started:",?40,"Time completed:" Line Location: LRBLDR1+13
Function Call: WRITE	Prompt: !!,"Donor reaction(s) ? :" Line Location: LRBLDR1+14
Function Call: WRITE	Prompt: !!,"Date/time processed:",!!,"Collected primary unit (gm):",?40,"Empty primary unit container (gm):",!!,"Vol collected (ml):" Line Location: LRBLDR1+15
Function Call: WRITE	Prompt: @IOF,?20,"List of donors for registration forms",! Line Location: S+1
Function Call: WRITE	Prompt: $P(^LRE(Y,0),"^") Line Location: S+2
Function Call: WRITE	Prompt: !!,"OK, LIST DELETED !",!! Line Location: D+2
Function Call: WRITE	Prompt: ! Line Location: A+2
Routine Call	DIC Line Location: A

FileNo	Call Tags
^LAB(65.4 - [#65.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^LRE - [#65.5]	LRBLDR1+5, S+2, A+1
^LRE("AB"	A+1
^LRO(69.2 - [#69.2]	S+2, D+2!, K!, A, A+1, A+2

Name	Line Occurrences
H	LRBLDR1+5, LRBLDR1+7, LRBLDR1+8, LRBLDR1+9, LRBLDR1+10, LRBLDR1+11, LRBLDR1+12, LRBLDR1+13, LRBLDR1+14, LRBLDR1+15
K	S+2

Name	Field # of Occurrence
^(	LRBLDR1+5
^(0	A+2*

Local Variables

Name	Comments	DBIA/ICR reference
K
H
S	;from LRBLDR
A
D	;from LRBLDR

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	D+1*
>> A	LRBLDR1+5, A, A+1
>> B	A+1*, A+2
DIC	A*!
DIC("A"	A*
DIC("S"	A*
DIC(0	A*
>> DIWF	LRBLDR1+5*
>> DIWL	LRBLDR1+5*
>> DIWR	LRBLDR1+5*
>> G	LRBLDR1+4
>> G(16	LRBLDR1+4
IOF	S+1
IOM	LRBLDR1+5
IOSL	LRBLDR1+5, H
>> J	S+2*
>> LR("%"	LRBLDR1+6
>> LR("Q"	LRBLDR1+5, LRBLDR1+6, LRBLDR1+7, LRBLDR1+8, LRBLDR1+9, LRBLDR1+10, LRBLDR1+11, LRBLDR1+12, LRBLDR1+13, LRBLDR1+14 , LRBLDR1+15
>> LRAA	S+2, D+2, K, A, A+1, A+2
LRQ	S+2*, K!
>> LRX	LRBLDR1+5*
>> LRZ	LRBLDR1+5*, LRBLDR1+6
>> W	LRBLDR1+5
>> X	LRBLDR1+5, S+2, K, A+1, A+2
>> Y	LRBLDR1+4, S+2, K, A, A+1, A+2

Customize PDF page

Package: Lab Service

Routine: LRBLDR1

Information

Source Information

Call Graph

Call Graph Total: 5

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: