Routine: LRBLPBR

Package	Total	Call Graph
Lab Service	4	^LRBLPBR1 ^LRDPA (L,S,SSN,V,YN)^LRU (,BEG,END)^LRUTL
VA FileMan	1	FIELD^DID

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 4

Package	Total	Caller Graph
Lab Service	4	LRBLP ADD LRBLP DELETE LRBLP PRINT ALL ON QUEUE LRBLP PRINT SINGLE

Entry Points

Name	Comments	DBIA/ICR reference
GETP
CH
DEV
QUE
LST
SET
SGL
DEL
C
L
A
END

External References

Name	Field # of Occurrence
FIELD^DID	QUE+2
^LRBLPBR1	LST+1
^LRDPA	GETP+2, SGL+2
L^LRU	QUE+1
S^LRU	QUE+1
SSN^LRU	SET+1
V^LRU	END
YN^LRU	CH+3, DEV, DEL+3
^LRUTL	A
BEG^LRUTL	DEV+1
END^LRUTL	LST+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETP+2
Function Call: WRITE	Prompt: $C(7),!?3,"No blood bank data for ",LRP Line Location: GETP+3
Function Call: WRITE	Prompt: !!,"Save reports for reprinting " Line Location: CH+3
Function Call: WRITE	Prompt: !!,"Print component requests " Line Location: DEV+0
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: ! Line Location: SGL+2
Function Call: WRITE	Prompt: $C(7),!?3,"No blood bank data for ",LRP Line Location: SGL+3
Function Call: WRITE	Prompt: $C(7),!!,"OK TO DELETE THE ",LRAA(1)," TEST REPORT QUEUE LIST" Line Location: DEL+2
Function Call: WRITE	Prompt: $C(7),!,"LIST DELETED !" Line Location: DEL+3
Function Call: WRITE	Prompt: !!,"FINE, LET'S FORGET IT",! Line Location: DEL+4
Function Call: WRITE	Prompt: !?30,"(",X," patient",$S(X>1:"s",1:""),")" Line Location: C+1
Function Call: WRITE	Prompt: $C(7),!!,"NO BLOOD BANK PATIENTS ON THE TEST REPORT QUEUE",!! Line Location: L+0

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
63.01	FIELD^DID

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SET
^DIC - [#1]	SET
^LR - [#63]	GETP+3, SET, SET+3, SGL+3
^LRO(69.2 - [#69.2]	GETP+4, GETP+5, GETP+6, GETP+7, GETP+8, QUE+4, LST+2!, DEL+3!*, C, L
^TMP("LRBL"	QUE!, LST+1, LST+3!, SET+5*
^VA(200 - [#200]	SET+3

Label References

Name	Line Occurrences
A	GETP, CH, SGL, DEL
C	CH+2, DEL+2
DEV	SGL+5
END	GETP+1, GETP+2, CH, CH+1, CH+3, DEV+1, LST+3, SGL+1, SGL+2, DEL , DEL+1, DEL+3, A
GETP	GETP+3, GETP+6, GETP+9
L	CH+1, DEL+1
LST	QUE+3
SET	QUE+3, QUE+4
SGL	SGL+3

Naked Globals

Name	Field # of Occurrence
^(	LST+1, SET, SET+3
^(0	GETP+7*, SET+2, SET+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	CH+3, DEV, DEL+3*
>> A	QUE+4*
DIC	GETP+2!, SGL+2!
>> G	CH+1, LST, LST+1, DEL+1, L*
IO	QUE
IOF	LST+3
IOST	LST+3
>> LR	LST+1*
>> LR("Q"	LST+1
>> LR("S"	QUE+3, SGL+5*
>> LRAA	GETP, GETP+1, GETP+4, GETP+5, GETP+6, GETP+7, GETP+8, CH, QUE+4, LST+2 , SGL, SGL+1, DEL+3, C, L
>> LRAA(1	DEL+2
>> LRAPX	CH+2*
>> LRDFN	GETP+2, GETP+3, GETP+4, GETP+5, GETP+7, QUE+4, LST+1, SET, SET+3, SET+5 , SGL+2, SGL+3
>> LRDPAF	SGL+2*
>> LRDPF	SET*
>> LRLLOC	GETP+5, QUE+4, SET+5, SGL+4
>> LRMD	SET+2, SET+3, SET+4*, SET+5
>> LRN(	QUE+2*
>> LRN("LABEL"	QUE+2!
>> LRN(2	DEV*
>> LRP	GETP+3, SGL+3
>> LRSAV	CH+3, LST+2, SGL+5
>> N	LST+1*
>> P	SET*
>> POP	DEV+1
>> SSN	SET*, SET+5
U	C
>> W	SET*, SET+5
>> X	GETP+7, QUE+2, SET, SET+5, C, C+1, A*
>> Y	SET*, DEL
>> Z	SET, SET+2, SET+3, SET+4
>> Z(1	SET*, SET+2
>> ZTRTN	DEV+1*
>> ZTSK	DEV+1

Customize PDF page

Package: Lab Service

Routine: LRBLPBR

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: