Routine: LRVRW

Package	Total	Call Graph
Lab Service	6	STD^LRCAPV ^LRCAPV2 ^LRGVK INIT^LRVR VER^LRVR1 (PT,YMD)^LRX
Automated Lab Instruments	1	(UID,UPDT)^LAGEN

Package

Total

Call Graph

Lab Service

STD^LRCAPV ^LRCAPV2 ^LRGVK INIT^LRVR VER^LRVR1 (PT,YMD)^LRX

Automated Lab Instruments

(UID,UPDT)^LAGEN

Package	Total	Caller Graph
Lab Service	2	LRVRW LRVRW2

Package

Total

Caller Graph

Lab Service

LRVRW LRVRW2

Name	Field # of Occurrence
UID^LAGEN	ISEQ+4
UPDT^LAGEN	ISEQ+5
STD^LRCAPV	QUIT+1
^LRCAPV2	QUIT+2
^LRGVK	QUIT+2
INIT^LRVR	1
VER^LRVR1	L10+11
PT^LRX	L10+5
YMD^LRX	1+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " ACCESSION MISSING" Line Location: L10+1
Function Call: WRITE	Prompt: !!,"Can't use. Entry has data from accession # ",$P(^(0),U,5),!,"Suggest you Clear instrument/worklist data." Line Location: L10+3
Function Call: WRITE	Prompt: !?5," Error in Patient Lookup",! Line Location: L10+6
Function Call: WRITE	Prompt: !,PNM,?40,HRCN Line Location: L10+9
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: READ	Timeout: DTIME Variable: X3 Line Location: WLN+0
Function Call: WRITE	Prompt: !!!,"SEQUENCE #: ",LRCUP,"//" Line Location: WLN+0
Function Call: WRITE	Prompt: !,"ENTER A VALID SEQUENCE NUMBER" Line Location: WLN+1
Function Call: WRITE	Prompt: !,"SEQUENCE NUMBER DOESN'T EXIST" Line Location: WLN+2
Function Call: READ	Timeout: DTIME Variable: X2 Line Location: WLN2+0
Function Call: READ	Timeout: DTIME Variable: X3 Line Location: WLN2+0
Function Call: WRITE	Prompt: !!!,"TRAY: ",LRTRAY,"//" Line Location: WLN2+0
Function Call: WRITE	Prompt: " CUP: ",LRCUP,"//" Line Location: WLN2+0
Function Call: WRITE	Prompt: !,"ENTER A VALID TRAY, CUP FROM THE LOAD/WORK LIST" Line Location: WLN2+1
Function Call: WRITE	Prompt: !,"TRAY, CUP DOESN'T EXIST" Line Location: WLN2+2
Function Call: WRITE	Prompt: !,"LAST IN LIST" Line Location: NX2+1
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: !,?5,I Line Location: FIND+0
Function Call: WRITE	Prompt: !,"No data for that tray & cup" Line Location: T3+0
Function Call: READ	Prompt: "Choose sequence number: " Formatting: ! Timeout: DTIME Variable: X Line Location: T3+1
Function Call: WRITE	Prompt: !,"Enter a number" Line Location: T3+1
Function Call: WRITE	Prompt: !,"No data there" Line Location: T3+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAH(	L10+3, ISEQ+1, ISEQ+2, ISEQ+3, ISEQ+6, ISEQ+7, ISEQ+8, FIND, FIND+1, T3+3
^LR - [#63]	L10+5
^LRO(68 - [#68]	L10+1, L10+4, END, ISEQ+4, QUIT+1
^LRO(68.2 - [#68.2]	L10+1, WLN+2, WLN2+2, NX2, ISEQ+9*, FIND+1
^XTMP("LRCAP"	QUIT!

Name	Line Occurrences
END	L10+1, L10+11
FIND	L10+2
ISEQ	L10+2
L10	L10+1, L10+3, L10+6, L10+12
NEXT	1+1, L10+3, L10+6, L10+11
NX2	NX2
QUIT	1, END+1
T3	T3+1
WLN	L10+1, WLN+1, WLN+2
WLN2	WLN, WLN2+1, WLN2+2
YN	YN

Name	Field # of Occurrence
^(	L10+4
^(0	L10+3, L10+5
^(2	END*

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %H	1+1*
C5	L10!
>> DFN	L10+5*
DIC	L10!
DTIME	YN, WLN, WLN2, T3+1
DUZ	QUIT
>> HRCN	L10+9
>> I	LIST, FIND, FIND+1*
>> LRAA	L10+1*, L10+4, END, ISEQ+3, ISEQ+4, QUIT+1
LRAB	L10!
>> LRAD	L10+1*, L10+4, END, ISEQ+3, ISEQ+4
>> LRAN	L10+1*, L10+3, L10+4, END, ISEQ+3, ISEQ+4, ISEQ+7
>> LRCSQ	QUIT
>> LRCUP	1+1, L10+1, WLN, WLN+3, WLN2, WLN2+3, NEXT, NX2+1, NX2+2*, ISEQ+3 , ISEQ+6, ISEQ+9, FIND, FIND+1
LRDEL	L10!
>> LRDFN	L10+5*
>> LRDPF	L10+5*
>> LREND	1, L10+1, L10+6, L10+11, WLN, WLN2, END, STOP*
LRFP	L10!
LRLDT	L10!
>> LRLL	L10+1, L10+3, WLN+2, WLN2+2, NX2, ISEQ+1, ISEQ+2, ISEQ+3, ISEQ+4, ISEQ+5 , ISEQ+6, ISEQ+7, ISEQ+8, ISEQ+9, FIND, FIND+1, T3+3
LRNG	L10!
LRNM	L10!
>> LRODT	L10+5*
LRORU3	L10+4*, QUIT+2!
>> LRPARAM	QUIT+1
LRPRGSQ	L10+2, FIND!, T3+2!
LRPRGSQ(	FIND, FIND+1, T3+3!
LRSET	L10!
>> LRSN	L10+5*
>> LRSQ	L10+3, ISEQ+2, ISEQ+3, ISEQ+4, ISEQ+5, ISEQ+6, ISEQ+7, ISEQ+9, FIND, T3+3*
LRTEST	L10!
>> LRTM60	1+1*
>> LRTRAY	1+1, L10+1, WLN, WLN+2, WLN2, WLN2+3, NEXT, NX2+1, NX2+2*, ISEQ+3 , ISEQ+6, ISEQ+9, FIND, FIND+1
>> LRTRCP	FIND*
>> LRTST(	LIST
>> LRTYPE	WLN
LRVER	L10!
>> N	FIND, FIND+1, T3, T3+1, T3+3
>> PNM	L10+9
T	L10!
U	L10+1, L10+3, L10+5, WLN, WLN2, END, NX2+1, ISEQ+3, QUIT+1
>> X	1+1, L10+1, L10+4, L10+5, YN, T3, T3+1*, T3+2, T3+3
>> X2	WLN2, WLN2+1, WLN2+2, WLN2+3, NEXT, NX2*, NX2+1, NX2+2
>> X3	WLN, WLN+1, WLN+2, WLN+3, WLN2, WLN2+1, WLN2+2, WLN2+3, NEXT, NX2 , NX2+1, NX2+2
Y	L10!
Z	L10!

Customize PDF page

Package: Lab Service

Routine: LRVRW

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: