Routine: LRAPAUL

Package	Total	Call Graph
Lab Service	5	^LRAP D^LRAUAW (B,F,L,M,S,SSN,V,XR,YN)^LRU (BEG,END)^LRUTL DD^LRX
VA Fileman	3	^%DTC (,IX)^DIC FIELD^DID

Package

Total

Call Graph

Lab Service

^LRAP D^LRAUAW (B,F,L,M,S,SSN,V,XR,YN)^LRU (BEG,END)^LRUTL DD^LRX

VA Fileman

^%DTC (,IX)^DIC FIELD^DID

Package	Total	Caller Graph
Lab Service	1	LRAPAUL

Package

Total

Caller Graph

Lab Service

LRAPAUL

Name	Field # of Occurrence
^%DTC	PRT+4
^DIC	ASK+4
IX^DIC	P
FIELD^DID	QUE
^LRAP	LRAPAUL+4
D^LRAUAW	PRT+4
B^LRU	R+1
F^LRU	H+2
L^LRU	QUE
M^LRU	H
S^LRU	QUE
SSN^LRU	PRT+2
V^LRU	END
XR^LRU	QUE
YN^LRU	R, R+2, R+3
BEG^LRUTL	DEV
END^LRUTL	QUE+2
DD^LRX	DT

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?17,"1. ",LRO(68)," list by ",LRP,!?17,"2. ",LRO(68)," list by Senior Pathologist",!?17,"3. ",LRO(68)," list by Surgeon/Physician",!,"Select 1,2 or 3: " Line Location: ASK+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+1
Function Call: WRITE	Prompt: $C(7)," Enter 1, 2 or 3" Line Location: ASK+1
Function Call: WRITE	Prompt: !!,"List only reports not released " Line Location: R+0
Function Call: WRITE	Prompt: ! Line Location: R+0
Function Call: WRITE	Prompt: !!,"Print total count only " Line Location: R+2
Function Call: WRITE	Prompt: !!,"Print Topography and Morphology entries " Line Location: R+3
Function Call: WRITE	Prompt: Y,?35 Line Location: PRT+1
Function Call: WRITE	Prompt: $P(V,"^") Line Location: PRT+1
Function Call: WRITE	Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18 Line Location: PRT+2
Function Call: WRITE	Prompt: Y,?35 Line Location: PRT+2
Function Call: WRITE	Prompt: Y,?35 Line Location: PRT+2
Function Call: WRITE	Prompt: ?62,$J(X,2) Line Location: PRT+4
Function Call: WRITE	Prompt: !?16,B Line Location: PRT+6
Function Call: WRITE	Prompt: !?21,N Line Location: M+0
Function Call: WRITE	Prompt: !?16,B Line Location: WR+3
Function Call: WRITE	Prompt: !?21,N Line Location: MR+0
Function Call: WRITE	Prompt: !,LR("%") Line Location: H+1
Function Call: WRITE	Prompt: !,LRB(1)," ",LRO(68)," list from:",LRSTR," to:",LRLST Line Location: H+2
Function Call: WRITE	Prompt: !,"List of reports not released" Condition for execution: LRD Line Location: H+2
Function Call: WRITE	Prompt: !,LR("%") Line Location: H+3
Function Call: WRITE	Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18 Line Location: H1+0
Function Call: WRITE	Prompt: Y,?31,$P(V,"^") Line Location: H1+0
Function Call: WRITE	Prompt: !?16,B Line Location: H2+0
Routine Call	DIC Line Location: ASK+4
Routine Call	DIC Line Location: P

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^LR - [#63]	FIELD^DID

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	PRT+2
^LAB(61 - [#61]	PRT+6, WR+3
^LAB(61.1 - [#61.1]	M, MR
^LR - [#63]	QUE+1, W, W+1, PRT+2, PRT+6, M, SP, WR!, WR+1, WR+3 , MR
^LR("AAU"	W!
^VA(200 - [#200]	ASK+4

Name	Line Occurrences
@(	QUE+1
ASK	ASK+1
DEV	R+2
DT	PRT+2, H1
END	LRAPAUL+4, ASK+1, ASK+3, ASK+4, R, R+1, R+2, R+3, DEV, QUE+2
H	QUE, W, PRT, H1
H1	PRT+6, WR, WR+3, H2
H2	M, MR
M	PRT+6
MR	WR+3
P	ASK+3
PRT	WR+2
R	ASK+3
WR	SP

Name	Field # of Occurrence
^(	PRT+6, M, WR+3, MR
^("AU"	W+1
^(0	PRT+6, M, WR+3, MR

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	R, R+2, R+3*
>> B	PRT+6, WR+3, H2
>> D	P*
>> DA	PRT+4*
DIC	ASK+4!, P!
DIC("A"	ASK+4, P
DIC(0	ASK+4, P
DTIME	ASK+1
>> HRCN	PRT+2
IO	QUE
IOSL	W, PRT, PRT+6, M, WR, WR+3, MR
IOST	H
>> LR("%"	H+3
>> LR("F"	QUE*, H
>> LR("Q"	QUE+1, W, PRT, PRT+6, M, WR, WR+3, MR, H, H1 , H2
>> LR(63	PRT+4
>> LRA	ASK+2, ASK+4, W+1, WR+1, P*
>> LRABV	W+1, WR+1
>> LRB	ASK+4, W+1, WR+1, P
>> LRB(1	R*, H+2
>> LRC	QUE+1*, W, SP, WR
>> LRD	R*, WR+1, H+2
>> LRDPF	PRT+2*
>> LRE	QUE, QUE+2, W+1, PRT+2, WR+2*, H1
>> LRF	R+2*, QUE+2, PRT
>> LRI	SP*, WR, WR+1, WR+3, MR
>> LRLDT	R+1*, QUE+1
>> LRLST	H+2
>> LRO(68	ASK, QUE+2, H+2
>> LRP	LRAPAUL+5, ASK, ASK+4, QUE+1, W, W+1, PRT+2, PRT+4, PRT+6, M , SP, WR, WR+1, WR+3, MR
>> LRS	QUE*, PRT+5
>> LRS("POINTER"	QUE
>> LRSDT	R+1*, QUE+1
>> LRSS	LRAPAUL+5, ASK+2, R, QUE, QUE+1, PRT+2, WR, WR+1, WR+3, MR , H+3
>> LRSTR	H+2
>> LRV	R+2, R+3, PRT+5, WR+2
>> LRXR	QUE+1, SP, WR
>> M	M, MR
>> N	M, MR
>> POP	DEV
>> SSN	PRT+2*
>> T	PRT+6, M, WR+3, MR
U	ASK+1, ASK+2, ASK+4, W+1, WR+1, P
>> V	PRT+2*, PRT+4, H1
>> X	ASK+1, ASK+2, ASK+3, ASK+4, R, PRT+2, PRT+4, PRT+5, WR+1, WR+2 , P*
>> X1	PRT+4*
>> X2	PRT+4*
>> Y	LRAPAUL+4, ASK+2, ASK+3, ASK+4, R+1, PRT+2, P, H1*
>> Z	W+1, PRT+2, PRT+5, WR+2, H1
>> ZTRTN	DEV*
>> ZTSK	DEV

Customize PDF page

Package: Lab Service

Routine: LRAPAUL

Information

Source Information

Call Graph

Call Graph Total: 8

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: