Routine: LRVER1

Information

LRVER1 ;DALOI/FHS/JAH - LAB ROUTINE DATA VERIFICATION ;8/10/04

Source Information

Source file <LRVER1.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
VA Fileman	2	$$FIND1^DIC $$GET1^DIQ
Kernel	1	$$HTFM^XLFDT
Lab Service	1	^LRVER2

Caller Graph

Caller Graph Total: 23

Package	Total	Caller Graph
Lab Service	20	LRBEBA3 LRBEBA5 LRBEPEND LRBEPRPT LREXPD LRFAST LRGVP LRLNC63 LRLNCV LRSLOW LRSTUF2 LRVER LRVER3 LRVER4 LRVER5 LRVR1 LRVR4 LRVR5 LRVRPOC LRWLST11
Automated Lab Instruments	2	LA7CHLU5 LA7VHLU5
IHS Laboratory Point of Care	1	BLRPOC2

Entry Points

Name	Comments	DBIA/ICR reference
LD
VER	; from LRGVP
RNLT(X)	;
MSG(VAL)	;Set output message
NLT(X)	;
LDEF(Y)	;Find the default LOINC code for WKLD CODE
TMPSB(LRSB)	; Get LOINC code from ^TMP("LR",$J,"TMP",LRSB,"P")
EX2	;
LNC(LRNLT,LRCDEF,LRSPEC)	;reture the LOINC code for WKLD Code/Specimen ; Call with (nlt code,method suffix,test specimen) ; TA = Time Aspect
EXP	; Get the list of tests for this ACC. from LRGVG1 ; Do not process tests which have been "NP" (not performed).
EX1	; Expand the list of tests to edit.
ORD	; ; LRNX is set by caller

Name	Field # of Occurrence
$$FIND1^DIC	LNC+18, LNC+30
$$GET1^DIQ	LNC+13, LNC+14, LNC+21, LNC+23, LNC+34, LNC+36, LDEF+2, MSG+4
^LRVER2	LD+4
$$HTFM^XLFDT	EXP+23

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$P(^LRO(69,LRODT,1,LRSN,1),U,6) Line Location: VER+2
Routine Call	DIC Line Location: LNC+18 LNC+30

FileNo	Call Tags
^LAB(61 - [#61]	GET1^DIQ
^LAM - [#64]	FIND1^DIC, GET1^DIQ
64.02	GET1^DIQ
^LAB(64.061 - [#64.061]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	EXP+15, EX2+6, EX2+18, EX2+19, NLT+2, RNLT+3
^LAB(61 - [#61]	LNC+14
^LAB(62 - [#62]	LD+2
^LAB(69.9 - [#69.9]	VER+2
^LAM - [#64]	NLT+2, RNLT+4, LNC+22, LNC+35
^LR - [#63]	LD+1
^LRO(68 - [#68]	VER+3, VER+5, EXP+4, EXP+5, EXP+6, EX2+20
^LRO(69 - [#69]	VER+2, VER+4
^TMP("LR"	LD+3!, EX1+2, EX1+3, EX2+12, ORD+4, ORD+8, ORD+9*, ORD+13, TMPSB+1

Name	Line Occurrences
$$LDEF	LNC+25, LNC+38
$$LNC	RNLT+5, TMPSB+3
$$NLT	EXP+10, ORD+9
$$RNLT	ORD+8, ORD+9
EX1	EXP+19
EX2	EX1+4, EX2+21
EXP	VER+7
MSG	LNC+20, LNC+25, LNC+33, LNC+38
ORD	EX2+12

Name	Field # of Occurrence
^(	EX2+19
^(0	VER+2, VER+3, VER+4, LD+1, LD+2, EXP+16, NLT+2, RNLT+4
^(1	EXP+18
^(3	VER+3, VER+5, EXP+18
^(4	EX2+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ERR	LNC+3~
I	EXP+2~, EXP+4, EXP+5, EXP+6, EXP+9, EXP+22, EXP+23
IX	EXP+2~, EXP+4*, EXP+18, EXP+20!
J	EX1+3, EX1+5!, EX2+16, EX2+17, EX2+18, EX2+19, EX2+22
>> LRAA	VER+3, VER+5, EXP+4, EXP+5, EXP+6, EX2+20
>> LRAD	VER+3, VER+5, EXP+4, EXP+5, EXP+6, EX2+20
>> LRAL	EXP+11*, EXP+12
>> LRALERT	EXP+4, EXP+12
>> LRAN	VER+3, VER+5, EXP+4, EXP+5, EXP+6, EX2+20
LRBEY	VER+1~
LRBEY(	ORD+3*
LRCDEF	RNLT+5, RNLT+6, LNC~, LNC+6, LNC+7, LNC+8, LNC+9, LNC+10*, LNC+17, LNC+26 , TMPSB+3, TMPSB+4, MSG+2, MSG+5, MSG+6
>> LRCDT	VER+3, VER+4, VER+6
>> LRCFL	EX2+1, EX2+6
>> LRCW	VER+2*
>> LRDBUG	MSG+10
>> LRDFN	LD+1
LRDL	LD+5!
>> LREAL	VER+3*
>> LRIDT	VER+5, VER+6, LD+1
>> LRLLOC	VER+2*
LRM	LD+3!
LRM(	ORD+12, ORD+13
>> LRMETH	LD+1*
>> LRMSG	MSG+1
LRMSGM	LNC+5!, MSG+2, MSG+5, MSG+6, MSG+7, MSG+8, MSG+9, MSG+10
>> LRMX(	ORD+14*
LRNAME	EXP+3!
LRNAME(	EXP+17*
LRNLT	EXP+2~, EXP+9, EXP+10, LNC~, LNC+4, LNC+8, LNC+15, LNC+17, LNC+29, MSG+2 , MSG+5, MSG+6, MSG+7, MSG+8
>> LRNTN	EXP+14*
>> LRNX	ORD+2*
>> LRODT	VER+2, VER+4
LRORD	LD+3!
LRORD(	ORD+2*
>> LROUTINE	VER+2*, EXP+4
>> LRSAMP	VER+4*, LD+2
LRSB	TMPSB~, TMPSB+1
LRSM60	EXP+3!
LRSM60(	EXP+18, EXP+23
>> LRSN	VER+2, VER+4
LRSPEC	RNLT+5, LNC~, LNC+11*, LNC+13, LNC+14, LNC+20, LNC+21, LNC+22, LNC+23, LNC+33 , LNC+34, LNC+35, LNC+36, TMPSB+3
LRSPECN	LNC+3~, LNC+14*, MSG+5, MSG+7
>> LRSS	LD*, LD+1
>> LRSUB	EX2+2*, EX2+10, EX2+11
LRTEST	EXP+3!
LRTEST(	EXP+9, EXP+10, EXP+15, EXP+16*, EXP+17, EXP+18, EX1+1, EX1+2, EX1+3, ORD+3 , ORD+7, ORD+8, ORD+9
N	EXP+2~, EXP+4, EXP+9, EXP+10, EXP+14, EXP+15, LNC+3~, LNC+18, LNC+20, LNC+21 , LNC+22, LNC+23, LNC+25, LNC+30, LNC+31, LNC+34, LNC+35, LNC+36, LNC+38
>> NODE	TMPSB+1, TMPSB+2, TMPSB+3, TMPSB+4*, TMPSB+5
S1	EX1+3, EX1+5!, EX2+16, EX2+18, EX2+22*
S1(	EX2+16*, EX2+18, EX2+22
>> S2	EX2+11*, EX2+12, ORD+2, ORD+3, ORD+4, ORD+8, ORD+9, ORD+12, ORD+13
T1	EXP+2~, EXP+15*, EXP+16, EXP+17, EXP+18, EX1+1, EX1+2, EX1+3, ORD+3, ORD+7 , ORD+8, ORD+9
TA	LNC+3~, LNC+13, LNC+21, LNC+22, LNC+23, LNC+34, LNC+35*, LNC+36, MSG+4, MSG+9
TANAME	MSG+3~, MSG+4*, MSG+9
U	VER+2, VER+3, VER+4, VER+5, LD+1, LD+2, EXP+9, EXP+10, EXP+11, EXP+16 , EXP+17, EX1+2, EX2+2, EX2+6, EX2+19, ORD+3, ORD+9, ORD+11, NLT+2, RNLT+3 , RNLT+4, TMPSB+5
VAL	LNC+3~, LNC+18, LNC+28!, LNC+30, MSG~, MSG+5, MSG+6, MSG+7, MSG+8
VAL(1	LNC+17, LNC+29
X	EXP+2~, EXP+6, EXP+7, EXP+8, EXP+9, EXP+11, EXP+21~, EXP+22, EXP+23, EX1+2* , EX1+3, EX2+2, EX2+6, EX2+16, EX2+19, EX2+22, ORD+4, ORD+8, ORD+9, ORD+11 , ORD+12, ORD+14, NLT~, NLT+2, RNLT~, RNLT+1, RNLT+3, RNLT+6, LNC+3~, LNC+4 , LNC+20, LNC+21, LNC+23, LNC+25, LNC+33, LNC+34, LNC+36, LNC+38, LNC+39, LNC+40 , LDEF+2, LDEF+3, LDEF+4
X(1	EXP+22*, EXP+23
X1	EXP+21~, EXP+23*
Y	EX2+19, EX2+20, NLT+1~, NLT+2, NLT+3, RNLT+2~, RNLT+4, RNLT+5, RNLT+6*, RNLT+7 , LNC+3~, LDEF~, LDEF+1, LDEF+2
Y(1	RNLT+3*, RNLT+4

Customize PDF page

Package: Lab Service

Routine: LRVER1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 23

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: