Routine: BLRAG03

Package	Total	Call Graph
VA Fileman	2	^%DT C^%DTC
IHS Changes To Lab	1	($$FILL,ERR)^BLRAGUT
IHS VA Utilities	1	^XBKVAR
Kernel	1	($$FMADD,$$FMTE,$$FR,$$HTFM)^XLFDT
Lab Service	1	(DD,DOC)^LRX

Entry Points

Name	Comments	DBIA/ICR reference
HED
COM(LRMMODE)	;
CANC	;For Canceled tests
COMWRT(LRODT,LRSN,LRTSTI,NODE,TAB)	;
LREND	;I $E(IOST)="P" W @IOF
TST2	;
WRITE	;
DATE
BDTSET(BLREDT)	;
L2
NO2
LROS(BLRY,BLRDFN,BLRBDT,BLREDT)	;return order/test status for given patient and date range - RPC ; RPC Name is BLR ORDER/TEST STATUS
TEST
ENTRY
NOTACC
ORDER	;call with LRSN, from LROE, LROE1, LRORD1, LROW2, LROR1
TST1

External References

Name	Field # of Occurrence
^%DT	LROS+41, LROS+49
C^%DTC	L2, L2+5
$$FILL^BLRAGUT	WRITE+3, WRITE+5, WRITE+6, WRITE+7, WRITE+8, COMWRT+6, HED+1
ERR^BLRAGUT	LROS+33, LROS+35
DD^LRX	L2+2
DOC^LRX	ORDER+5
^XBKVAR	LROS+27
$$FMADD^XLFDT	BDTSET+4
$$FMTE^XLFDT	TST1+7, DATE
$$FR^XLFDT	LROS+43, LROS+51
$$HTFM^XLFDT	LROS+38, LROS+43

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: LREND+0

Used in RPC

RPC Name	Call Tags
BLR ORDER/TEST STATUS	LROS

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TRAP"	LROS+27
^DPT - [#2]	LROS+34, TST1+7, NO2+3
^LAB(60 - [#60]	TEST+11, WRITE+1
^LAB(61 - [#61]	ORDER+8
^LAB(62 - [#62]	ORDER+8
^LAB(62.05 - [#62.05]	TEST+3, WRITE+3
^LAB(69.9 - [#69.9]	BDTSET+2
^LRO(68 - [#68]	TEST+8, TST1+1, TST1+2, TST1+3, WRITE+7
^LRO(69 - [#69]	L2, ENTRY+2, ORDER+2, ORDER+3, ORDER+8, ORDER+13, ORDER+14, TEST+9, WRITE+11, COM+5 , COMWRT+3, COMWRT+6
^TMP("BLRAG"	LROS+30!, LROS+32, LROS+56, TST1+7, NO2+3, HED+2*
^VA(200 - [#200]	CANC+1

Label References

Name	Line Occurrences
$$BDTSET	LROS+46, LROS+51
COM	TST2+4, CANC+2
COMWRT	COM+6
DATE	TST2+4, TST2+5, NO2
ENTRY	L2+4
HED	ENTRY
L2	L2+1, L2+6
LREND	L2, L2+1
NO2	NOTACC, NOTACC+1
NOTACC	TEST+16, TST1+1
ORDER	ENTRY+2
TEST	ORDER+14
TST2	TST1+4
WRITE	TST2+4, CANC+2

Naked Globals

Name	Field # of Occurrence
^(	ORDER+3, WRITE+7, COMWRT+6
^(0	ORDER+8, WRITE+1, WRITE+3, COMWRT+6
^(1	ORDER+2
^(3	ORDER+2, TST1+1
^(9	TST1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LREND+3!
>> %DT	LROS+41, LROS+49
%Y	LREND+3!
A	LREND+3!
BLRACCNO	LROS+21~, LROS+25, TEST+8, TST1+7
BLRASN	LROS+21~, TEST+4*, TEST+8, NO2+3
BLRASND	LROS+21~, TEST+5*, TEST+8
BLRASNN	LROS+21~, TEST+6*, TEST+8
BLRBDT	LROS~, LROS+46, LROS+49, LROS+51*, LROS+54
BLRCTIM	LROS+22~, LROS+25, TST1+5, TST1+7
BLRDFN	LROS~, LROS+33, LROS+34, TST1+7, NO2+3
>> BLRDOC	ORDER+5*
>> BLRDOCN	ORDER+6*, TST1+7, NO2+3
BLRDT	LROS+22~, L2+3*, TST1+7, NO2+3
BLREDT	LROS~, LROS+38, LROS+41, LROS+43*, LROS+46, LROS+51, LROS+53, BDTSET~, BDTSET+4
>> BLRF	ENTRY+1*
BLRGPO	BDTSET+1~, BDTSET+2, BDTSET+3, BDTSET+4
BLRI	LROS+22~, LROS+29, TST1+7, NO2+3, HED+2
BLRLTMP	LROS+28!
>> BLRORD	ORDER+3*, TST1+7, NO2+3
>> BLRRET	BDTSET+4*, BDTSET+5
>> BLRSOS	TEST+9*, TST1+7, NO2+3
>> BLRTI	ENTRY+2, TST2+3, WRITE+2, WRITE+4, WRITE+8, WRITE+11, COMWRT+6*
BLRTMP	LROS+22~, ENTRY+2!, WRITE+1, WRITE+2, WRITE+3, WRITE+4, WRITE+5, WRITE+6, WRITE+7, WRITE+8* , HED+1*, HED+2
BLRTMP(	TST2+3, WRITE+2, WRITE+4, WRITE+8, WRITE+11, COMWRT+6
>> BLRTN	TEST+10, TEST+11, TST1+7, NO2+3
>> BLRURG	TEST+3*, TST1+7, NO2+3
BLRY	LROS~, LROS+31*
D	ORDER+1!
DFN	LREND+3!
DIC	LREND+3!
DIWL	LREND+3!
DIWR	LREND+3!
DPF	LREND+3!
I	TST1+2*, TST1+3, TST2+1~, LREND+3!
K	LREND+3!
LRACC	TST1+3*, TST2+2, TST2+4, LREND+3!
>> LRACD	TST1+1*
LRACN	ORDER+13*, ORDER+14, TEST+9, WRITE+11, LREND+3!
LRACN0	ORDER+14*, TEST+1, TEST+2, TEST+4, TEST+5, TEST+6, TEST+10, TEST+15, TST1, NO2+1 , LREND+3!, CANC+1
LRDFN	LROS+23~, LROS+34*, LROS+35, L2, ENTRY+2, LREND+3!
LRDOC	ORDER+6, LREND+3!
LRDPF	LREND+3!
LREND	LROS+23~, LROS+26, L2+1, ORDER+1, COMWRT+6, LREND+3!
LRI	COMWRT+5~, COMWRT+6*
LRLDAT	LROS+54*, L2, LREND+3!
LRLL	TEST+1, TST2+4, TST2+5, LREND+3!
LRLOOKUP	LROS+24~*
LRMMODE	COM~, COM+4*, COM+6
LROD0	ORDER+2*, ORDER+5, ORDER+8, TEST+3, TEST+13, NO2, LREND+3!
LROD1	ORDER+2*, TEST+14, TEST+16, TST1+5, TST2+6, NO2, NO2+3, LREND+3!
LROD3	ORDER+2*, TST2+5, NOTACC, NOTACC+1, NOTACC+2, NO2, LREND+3!
LRODT	LROS+23~, LROS+53, L2, L2+2, L2+5*, ENTRY+2, ORDER+2, ORDER+3, ORDER+8, ORDER+13 , ORDER+14, TEST+9, WRITE+11, COM+5, COM+6, COMWRT~, COMWRT+2, COMWRT+3, COMWRT+6, NO2 , LREND+3!
LROOS	TEST+14, TST2+4, TST2+6, LREND+3!
LROS	TEST+1, TEST+14, TST1+7, TST2+4, TST2+5, TST2+6, WRITE+5, NOTACC, NOTACC+1, NOTACC+2 , NO2+2*, NO2+3, LREND+3!
LROSD	TEST+1, TST2+4, TST2+5, WRITE+6, NO2, NO2+2, LREND+3!
LROT	TEST+1, TEST+13, TEST+14, TST2+4, WRITE+5, LREND+3!, CANC+1*
LRROD	TEST+1*, WRITE+8, NO2+2, LREND+3!
LRSDT	LROS+23~, LROS+53*, LREND+3!
LRSN	L2, L2+1, ENTRY+2, ORDER+2, ORDER+3, ORDER+8, ORDER+13, ORDER+14, TEST+9, TST1+7 , WRITE+11, COM+5, COM+6, COMWRT~, COMWRT+2, COMWRT+3, COMWRT+6, NO2+3, LREND+3!
LRTSTI	COM+3~, COM+5*, COM+6, COMWRT~, COMWRT+2, COMWRT+3, COMWRT+6
LRTSTS	TST1+3, TST2+3, WRITE+1, COM+5, NO2+1, NO2+3, LREND+3!, CANC+1*, CANC+2
LRTT	ORDER+1!, LREND+3!
LRTT(	TST1+2*
LRURG	TEST~, TEST+1, TST2+2, WRITE+3, NO2+1*, LREND+3!
LRY	TEST~
NODE	COMWRT~, COMWRT+2, COMWRT+6
PNM	LREND+3!
TAB	COMWRT~, COMWRT+4*, COMWRT+6
U	LROS+34, ORDER+5, ORDER+8, TEST+1, TEST+3, TEST+4, TEST+5, TEST+6, TEST+8, TEST+9 , TEST+10, TEST+11, TEST+13, TEST+14, TST1, TST1+5, TST1+7, TST2+2, TST2+4, TST2+5 , WRITE+1, WRITE+3, NOTACC+1, NOTACC+2, NO2, NO2+1, NO2+3, CANC+1, BDTSET+2
X	LROS+27, LROS+41, LROS+49, L2, L2+5, ORDER+5, ORDER+8, TEST+13, TEST+14*, LREND+3!
X1	L2, L2+5, TST1*, TST1+1, TST1+2, TST1+3, WRITE+7, LREND+3!
X2	L2, L2+5, TST1*, TST1+1, TST1+2, TST1+3, WRITE+7, LREND+3!
X3	TEST+1, TST1, TST1+1, TST1+2, TST1+3, WRITE+7, LREND+3!
X4	ORDER+8*, LREND+3!
Y	LROS+41, LROS+49, L2+2, L2+3, TEST+1, TST2+4, TST2+5, NOTACC+1, NOTACC+2, NO2* , DATE*, LREND+3!
Z	LREND+3!
>> ZTQUEUED	LREND+2
>> ZTREQ	LREND+2*

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRAG03

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: