Routine: LR7OR1

Information

LR7OR1 ;VA/slc/dcm - Get Lab results ;JUL 06, 2010 3:14 PM

Source Information

Source file <LR7OR1.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Lab Service	8	BB1^LR7OB63 MI^LR7OB63A SS^LR7OB63C AU^LR7OB63D 69^LR7OB69 CH^LR7OR2 EN^LR7OU1 ^LRDPA
VA Fileman	2	^%DT ^DIC

Caller Graph

Caller Graph Total: 32

Package	Total	Caller Graph
Lab Service	18	LR7OF0 LR7OGU LR7OR2 LR7OSBB1 LR7OSBR LR7OSMZ0 LR7OSOS LR7OSOS1 LR7OSUM LRAPQOR3 LRAPS3 LREPI2 LREPI2A LRGEN LROR1 LROW2RP LRRP4 LRUQ
Order Entry Results Reporting	8	ORCHTAB1 ORCXPND1 ORCXPND3 ORMLR ORQQLR ORQQLR1 ORWDXVB ORWOR2
Automated Lab Instruments	1	LA7DVM
Care Management	1	ORRCACK
IHS Changes To Lab	1	BLRMIEHR
IHS Electronic Health Record	1	BEHORXF3
Text Integration Utility	1	TIUWRIIS
VueCentric RPMS Support	1	CIAZPLMI

Entry Points

Name	Comments	DBIA/ICR reference
AP(SDATE,EDATE,COUNT)	;Get AP Subscript data (EM,CY,AU,SP)
MI(SDATE,EDATE,COUNT,SPEC)	;Get MI Subscript data
RR(DFN,ORD,SDATE,EDATE,SUB,TEST,FLAG,COUNT,SPEC,UNVER)	;Get LAB results for patient	ICR #2503 Status: Active Usage: Controlled Subscription
T2
DTRNG	;Date range setup
T1
LRDFN(IFN,FILEROOT)		ICR #2503 Status: Active Usage: Controlled Subscription
BB(SDATE,EDATE,COUNT,SPEC)	;Get BB Subscript data
SN	;Get the subs
TEST	;Test the RR entry point
O1

External References

Name	Field # of Occurrence
^%DT	O1+3, O1+4
^DIC	O1+2, O1+5
BB1^LR7OB63	BB+4
MI^LR7OB63A	MI+3
SS^LR7OB63C	AP+4
AU^LR7OB63D	AP+3
69^LR7OB69	SN+1
CH^LR7OR2	RR+35
EN^LR7OU1	RR+31
^LRDPA	TEST+3

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: O1+0
Function Call: WRITE	Prompt: !!,X_" is not a valid order number." Line Location: O1+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: T1+0
Function Call: WRITE	Prompt: !!,"Bad input, enter ALL, CH, MI, or AP" Line Location: T1+1
Function Call: WRITE	Prompt: !!,$S($D(^TMP("LRRR",$J)):"Data found!",1:"NO Data found!") Line Location: T2+1
Routine Call	DIC Line Location: O1+2 O1+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	RR+24, RR+25, RR+26, RR+29
^LR - [#63]	MI+3, BB+4, AP+4, LRDFN+6
^LRO(68 - [#68]	SN+2
^LRO(69 - [#69]	RR+33, O1+1, O1+2
^TMP("LRAPI"	RR+27!, TEST+2!
^TMP("LRRR"	RR+27!, MI+3, BB+4, AP+3, AP+4, TEST+2!, T2+1, SN+5, SN+6
^TMP("LRX"	MI+2!, MI+3, MI+4!, BB+3!, BB+4, BB+5!, AP+1!, AP+3, AP+4, AP+5! , SN+1, SN+2, SN+3, SN+4, SN+5, SN+6

Label References

Name	Line Occurrences
$$LRDFN	RR+18
AP	RR+38
DTRNG	RR+22
MI	RR+36
O1	O1+1
RR	T2
SN	RR+32, RR+33, RR+34
T1	T1+1
T2	O1+2

Naked Globals

Name	Field # of Occurrence
^("LR"	LRDFN+5
^(0	RR+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	TEST+1~, O1+3, O1+4
%DT("A"	O1+3, O1+4
AGE	RR+16~, RR+21*
COUNT	RR~, RR+27*, RR+35, RR+36, RR+38, MI~, MI+1, MI+3, BB~, BB+2 , BB+4, AP~, AP+2, AP+4
CT1	RR+16~, RR+27, MI+1, MI+3, BB+2, BB+4, AP+2, AP+4
>> CTR	MI+3, BB+4, AP+3, AP+4
DFN	RR~, RR+17, RR+18, RR+20, RR+21, MI+3, BB+4, AP+3, AP+4, TEST+3 , T2, SN+5, SN+6
DIC	TEST+1~, O1+2, O1+5
DIC("A"	O1+2, O1+5
DIC(0	O1+2, O1+5
DOB	RR+16~, RR+21*
DRAW	RR+16~, SN+2*, SN+5, SN+6
DT	RR+21
DTIME	O1, T1
EDATE	RR~, RR+35, RR+36, RR+38, MI~, MI+1, MI+3, BB~, BB+2, BB+4 , AP~, AP+2, AP+4, DTRNG+1, DTRNG+2, DTRNG+4, DTRNG+5
FILEROOT	LRDFN~, LRDFN+4*, LRDFN+5
FLAG	RR~, RR+23*, RR+24, RR+25
IFN	LRDFN~, LRDFN+3, LRDFN+5
II	RR+16~, SN+2*, SN+3, SN+4, SN+5, SN+6
III	RR+16~, SN+3*, SN+4, SN+5
>> IVDT	MI+3, BB+4, AP+4*
LRDFN	RR+16~, RR+18*, RR+19, MI+3, BB+4, AP+4
LRDPF	RR+16~, RR+18*, RR+20, RR+21
LRSS	AP+1~, AP+4*
LRX	MI+3!, BB+4!, AP+4!
ORD	RR~, RR+28, RR+32, RR+33, RR+34
ORDT	RR+16~, RR+28, RR+32, RR+33, RR+34, SN+1
ORSN	RR+16~, RR+32, RR+33, RR+34*, SN+1
SDATE	RR~, RR+35, RR+36, RR+38, MI~, MI+1, MI+3, BB~, BB+2, BB+4 , AP~, AP+2, AP+4, DTRNG+1, DTRNG+3, DTRNG+4, DTRNG+5
SEX	RR+16~, RR+20*
SPEC	RR~, RR+35, RR+36, RR+38, MI~, MI+3, BB~, BB+4
SS	RR+16~, SN+2*, SN+5, SN+6
SUB	RR~, RR+23, RR+26, RR+35, RR+36, RR+38
TEST	RR~, RR+24, RR+25*, RR+26, RR+29, RR+30, RR+31, RR+35
TSTY	RR+16~, SN+3
TSTY(	RR+30*, SN+3
U	SN+4
UNVER	RR~, RR+35
X	RR+29, RR+30, RR+31, TEST+1~, O1, O1+1, O1+2, O1+3, O1+4, O1+5 , T1, T1+1, T1+2, DTRNG+1, DTRNG+5, LRDFN+5, LRDFN+6*, LRDFN+7
X1	TEST+1~, TEST+2, O1+3, T2
X2	TEST+1~, TEST+2, O1+4, T2
X3	TEST+1~, TEST+2, O1+2, O1+5*, O1+6, T2
X4	TEST+1~, TEST+2, T1+2, T2
X5	TEST+1~, TEST+2, O1+2, T2
Y	TEST+1~, O1+2, O1+3, O1+4, O1+5

Customize PDF page

Package: Lab Service

Routine: LR7OR1

Call Graph Total: 10

Caller Graph Total: 32