Routine: LRVR

Call Graph Total: 19

Package	Total	Call Graph
Lab Service	15	(AUTO,STD)^LRCAPV EXPLODE^LRGP2 ^LRMIEDZ P15^LROE1 ^LRPARAM REV^LRVER ($$SELPL,CMTDSP)^LRVERA ^LRVR1 ^LRVRA ^LRVRKIL W^LRWRKLST ADATE^LRWU LRAN^LRWU3 $$SELBY^LRWU4 PT^LRX
Kernel	2	^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT
VA Fileman	2	^DIC ^DIR

Package

Total

Call Graph

(AUTO,STD)^LRCAPV EXPLODE^LRGP2 ^LRMIEDZ P15^LROE1 ^LRPARAM REV^LRVER ($$SELPL,CMTDSP)^LRVERA ^LRVR1
^LRVRA ^LRVRKIL W^LRWRKLST ADATE^LRWU LRAN^LRWU3 $$SELBY^LRWU4 PT^LRX

Kernel

^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT

VA Fileman

^DIC ^DIR

Package	Total	Caller Graph
Lab Service	4	LRFLAG LRVR LRVRA LRVRW

Package

Total

Caller Graph

Lab Service

LRFLAG LRVR LRVRA LRVRW

External References

Name	Field # of Occurrence
^%ZTLOAD	CLEAN+6
^DIC	INIT+4, INIT+8
^DIR	WLN+6
AUTO^LRCAPV	INIT+16
STD^LRCAPV	CLEAN+2
EXPLODE^LRGP2	EXPAND
^LRMIEDZ	INIT+17
P15^LROE1	WLN+23
^LRPARAM	INIT+2
REV^LRVER	REV+2
$$SELPL^LRVERA	INIT+12
CMTDSP^LRVERA	INIT+23
^LRVR1	L10+3
^LRVRA	LRVR+6
^LRVRKIL	CLEAN+4
W^LRWRKLST	LW+6
ADATE^LRWU	DAT
LRAN^LRWU3	LW+3
$$SELBY^LRWU4	LRVR+4
PT^LRX	WLN+16
$$DT^XLFDT	LW+4
$$FMADD^XLFDT	DAT+6
$$FMTE^XLFDT	WLN+21, LW+4
$$NOW^XLFDT	WLN+26

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: YN+0
Function Call: WRITE	Prompt: !,"Answer 'Y' or 'N': " Line Location: YN+0
Function Call: WRITE	Prompt: !,"NOT ON FILE" Line Location: WLN+9
Function Call: WRITE	Prompt: !?10,"No UID number for this accession",! Line Location: WLN+13
Function Call: WRITE	Prompt: !,PNM,?30,SSN Line Location: WLN+14
Function Call: WRITE	Prompt: !,"ORDER #: ",LRCEN Condition for execution: LRCEN Line Location: WLN+14
Function Call: WRITE	Prompt: !,PNM,?30,HRCN Line Location: WLN+16
Function Call: WRITE	Prompt: !,"ORDER #: ",LRCEN Condition for execution: LRCEN Line Location: WLN+16
Function Call: WRITE	Prompt: !,">>>>ERROR - NO POINTER TO FILE #63 - PLEASE NOTIFY SYSTEM MANAGER^ <<<<<",! Line Location: WLN+36
Function Call: WRITE	Prompt: !,">>>>ERROR - NO ENTRY IN FILE #63 - PLEASE NOTIFY SYSTEM MANAGER<<^ <<<",! Line Location: WLN+37
Function Call: WRITE	Prompt: !,"This Order # has not been collected",$C(7) Line Location: WLN+39
Function Call: WRITE	Prompt: !,"You cannot verify an accession which has not been collected.",$C(7) Line Location: WLN+40
Function Call: WRITE	Prompt: !,"Enter range of accession numbers which might apply." Line Location: LW+2
Function Call: WRITE	Prompt: !,"LAST IN WORK LIST" Line Location: NEXT+0
Function Call: WRITE	Prompt: " the following tests: " Line Location: LIST+0
Function Call: WRITE	Prompt: !,?10,$P(LRTST(I),"^",1) Line Location: LIST+0
Function Call: WRITE	Prompt: !,"No profile defined." Line Location: INIT+6
Function Call: WRITE	Prompt: !?10,$C(7),"Error in your DATABASE. There is not an accession area # ",LRAA,!! Line Location: INIT+9
Routine Call	DIC Line Location: INIT+4 INIT+8
Routine Call	DIR Line Location: WLN+6

FileNo	Call Tags
^LRO(68.2 - [#68.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	INIT+20
^LAB(69.9 - [#69.9]	DAT+5
^LR - [#63]	WLN+16, WLN+37
^LRO(68 - [#68]	DAT+1, DAT+2, WLN+9, WLN+11, WLN+12, WLN+18, WLN+19, WLN+26, WLN+28, WLN+29 , WLN+32, WLN+35, QUIT, CLEAN+2, NEXT, INIT+9, INIT+16, INIT+17, INIT+18, INIT+21
^LRO(68.2 - [#68.2]	INIT+5, INIT+7, INIT+9
^LRO(69 - [#69]	WLN+39, WLN+40
^XTMP("LRCAP"	CLEAN+1!

Name	Line Occurrences
EXPAND	INIT+19
INIT	LRVR+3
L10	L10+4
NEXT	L10+3, WLN+41
QUIT	LRVR+3, LRVR+5, LRVR+6, DAT, L10+2
STOP	WLN+7, INIT+4, INIT+8, INIT+18, INIT+19
WLN	L10+2, WLN+41
YN	YN

Name	Field # of Occurrence
^(	WLN+11, WLN+39
^(0	DAT+5, WLN+11, WLN+16
^(2	DAT+2, QUIT*
^(3	DAT+1, WLN+26*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	WLN+20~
%DT("B"	WLN+21*
>> B	INIT+7*, INIT+8
C5	L10+1!
>> DFN	WLN+16*
DIC	L10+1!, INIT+1~, INIT+3, INIT+8
DIC("S"	INIT+3*, INIT+4!
DIC(0	INIT+3*
DIR	WLN+2!, WLN+6!, CLEAN+3!
DIR("?"	WLN+4*
DIR("A"	WLN+4*
DIR("B"	WLN+5*
DIR(0	WLN+3*
DIRUT	WLN+2!, WLN+7
DT	DAT+6
DTIME	YN
DTOUT	WLN+2!
DUOUT	WLN+2!
DUZ	CLEAN+1
DUZ(2	INIT+12, INIT+14
>> EAMODE	L10*
>> HRCN	WLN+16
>> I	DAT+1, LIST, INIT+20*
>> J	INIT+20*
LRA1	WLN+20~, WLN+22*, WLN+24
LRA2	WLN+20~, WLN+22*, WLN+24
LRA3	WLN+20~, WLN+22*, WLN+24
>> LRAA	DAT+1, DAT+2, WLN+9, WLN+11, WLN+12, WLN+18, WLN+19, WLN+22, WLN+24, WLN+26 , WLN+28, WLN+29, WLN+32, WLN+35, LW+5, LW+7, QUIT, CLEAN+2, NEXT, INIT+9* , INIT+16, INIT+17, INIT+18, INIT+21
LRAB	L10+1!
>> LRAD	DAT, DAT+1, DAT+2, WLN+9, WLN+11, WLN+12, WLN+18, WLN+19, WLN+22, WLN+24* , WLN+26, WLN+28, WLN+29, WLN+35, LW+5, LW+7*, QUIT, NEXT
>> LRAN	DAT+1, DAT+2, WLN+5, WLN+8, WLN+9, WLN+11, WLN+12, WLN+18, WLN+19, WLN+22 , WLN+24, WLN+26, WLN+28, WLN+29, WLN+35, LW+5, LW+7, QUIT, NEXT, INIT+2*
>> LRCDT	WLN+18, WLN+21, WLN+25, WLN+29, WLN+30*
>> LRCEN	WLN+11*, WLN+16
>> LRCFL	L10*
LRCMTDSP	CLEAN+3!
>> LRCSQ	CLEAN+1
LRDEL	L10+1!
>> LRDFN	WLN+11*, WLN+16, WLN+37
LRDL	L10+1!
>> LRDPF	WLN+16*
>> LRDT	LW+4*
LRDUZ	LRVR+2~, INIT+2!
LRDUZ(2	INIT+14*
>> LREND	LRVR+3, L10+2, LW+3, LW+7, QUIT, NEXT+1, STOP, INIT+2, INIT+6, INIT+13* , INIT+16, INIT+17, INIT+19
LRFP	L10+1!
LRIDIV	CLEAN+2!
>> LRIDT	WLN+35*, WLN+36, WLN+37
LRLDT	L10+1!
>> LRLL	INIT+4*, INIT+5, INIT+7, INIT+8, INIT+9
LRNG	L10+1!
LRNM	L10+1!
LRNOP	WLN+1, WLN+9, WLN+10, WLN+13, WLN+16, WLN+19, WLN+25, WLN+28, WLN+30, WLN+33* , WLN+36, WLN+37, WLN+39, WLN+40, WLN+41, CLEAN+3!
>> LRODT	WLN+11*, WLN+39, WLN+40
LRORD	INIT+2!
LRORD(	INIT+20*
>> LRORU3	WLN+12*, WLN+13
>> LRPANEL	INIT+9*
>> LRPARAM	CLEAN+2, INIT+16
LRPER	REV+1!
>> LRPROF	INIT+5, INIT+6, INIT+7, INIT+8, INIT+9
LRSET	L10+1!
>> LRSN	WLN+11*, WLN+39, WLN+40
>> LRSS	WLN+32*, WLN+33, WLN+37
>> LRSTATUS	WLN+22*
LRTEST	L10+1!
>> LRTM60	DAT+6*
>> LRTSE	INIT+21*
>> LRTST(	LIST
>> LRTYPE	INIT+4*
LRVBY	LRVR+2~, LRVR+4*, LRVR+5, LRVR+6
LRVER	L10+1!
>> LRVTS(0	SKPEX, INIT+19
LRX	INIT+1~, INIT+12*, INIT+13, INIT+14
>> PNM	WLN+16
S	LW+1~
S("LRAA"	LW+5*, LW+7
S("LRAD"	LW+5*, LW+7
S("LRAN"	LW+5*, LW+7
T	L10+1!
U	DAT+1, DAT+2, DAT+5, WLN+11, WLN+13, WLN+16, WLN+18, WLN+26, WLN+28, WLN+29 , WLN+32, WLN+35, WLN+40, QUIT, CLEAN+2, INIT+4, INIT+9, INIT+16, INIT+17, INIT+18 , INIT+20
X	DAT+4~, DAT+5, DAT+6, YN, INIT+9, INIT+12, INIT+20
XP	CLEAN+3!
Y	L10+1!, WLN+8, INIT+4, INIT+8, INIT+21*
Y(0	INIT+4
Z	L10+1!
>> ZTDESC	CLEAN+5*
>> ZTDTH	CLEAN+5*
>> ZTIO	CLEAN+5*
>> ZTRTN	CLEAN+5*
ZTSK	CLEAN+6!

Customize PDF page

Package: Lab Service

Routine: LRVR

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

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:

Name	Comments	DBIA/ICR reference
QUIT
CLEAN	;
STOP
YN
LIST
L10
NEXT
DAT
LW	;
INIT	;from LRVRW
WLN	;
SKPEX
REV	;
EXPAND