Routine: BTIULO11

Package	Total	Call Graph
IHS Changes To Lab	1	PCCRLADR^BLRREFLA
IHS VA Utilities	1	ENP^XBDIQ1
Kernel	1	$$REPEAT^XLFSTR
VA Fileman	1	($$GET1,GETS)^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
NLAB(DFN,TIUTST,TIUCNT)	;EP; -- returns last # of current lab result for single test;PATCH 1001 ; TIUTST = lab test name; TIUCNT = # of test results to return
CLIA(DFN,TIUTST,TIUCNT)	;EP; -- returns last # of current lab result for single test ; TIUTST = lab test name; TIUCNT = # of test results to return ; Returns CLIA data for each lab
ABORH(DFN)	; EP Get the blood type of patient
SP(NUM)	; -- SUBRTN to pad spaces

External References

Name	Field # of Occurrence
PCCRLADR^BLRREFLA	CLIA+61
$$GET1^DIQ	CLIA+37
GETS^DIQ	CLIA+14
ENP^XBDIQ1	NLAB+11
$$REPEAT^XLFSTR	PAD+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^AUPNVLAB - [#9000010.09]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	CLIA+59
^AUPNVLAB - [#9000010.09]	CLIA+55, CLIA+57, CLIA+58
^AUPNVLAB("AA"	NLAB+8, NLAB+10, CLIA+10, CLIA+12
^DPT - [#2]	ABORH+2
^LAB(60 - [#60]	NLAB+5, CLIA+7
^LR - [#63]	ABORH+5, ABORH+6
^TMP("BTIULO"	NLAB+4!, NLAB+23, NLAB+24, CLIA+5!, CLIA+42, CLIA+45, CLIA+46, CLIA+47, CLIA+48, CLIA+49 , CLIA+50, CLIA+51, CLIA+52, CLIA+53, CLIA+56, CLIA+58, CLIA+63, CLIA+65, CLIA+67, CLIA+68 , CLIA+69*

Label References

Name	Line Occurrences
$$PAD	SP+1
$$SP	NLAB+22, CLIA+41, CLIA+45, CLIA+46, CLIA+47, CLIA+48, CLIA+49, CLIA+50, CLIA+51, CLIA+52 , CLIA+53, CLIA+56, CLIA+58, CLIA+63, CLIA+65, CLIA+67

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABN	CLIA+21*, CLIA+33, CLIA+36~
ABO	ABORH+1~, ABORH+5*, ABORH+7, ABORH+8
ARR	NLAB+3~, CLIA+3~
ARR(	NLAB+16, NLAB+19, NLAB+20, NLAB+21, CLIA+33, CLIA+38, CLIA+39, CLIA+40
ARRAY	CLIA+36~, CLIA+61
ARRAY("CITY"	CLIA+67
ARRAY("NAME"	CLIA+63
ARRAY("ST1"	CLIA+65
ARRAY("STATE"	CLIA+67
ARRAY("ZIP"	CLIA+67
CAPTION	NLAB+3~, NLAB+6, NLAB+22, CLIA+3~, CLIA+8, CLIA+41, CLIA+45, CLIA+46, CLIA+47, CLIA+48 , CLIA+49, CLIA+50, CLIA+51, CLIA+52, CLIA+53, CLIA+56, CLIA+58, CLIA+63, CLIA+65, CLIA+67 , CLIA+69
CNT	NLAB+3~, NLAB+7, NLAB+8, NLAB+10, NLAB+14, NLAB+17, NLAB+19, NLAB+20, NLAB+21, NLAB+22 , NLAB+23, CLIA+3~, CLIA+9, CLIA+10, CLIA+12, CLIA+31, CLIA+34, CLIA+38, CLIA+39, CLIA+40 , CLIA+41
COMM	CLIA+4~, CLIA+28*, CLIA+33
COMM2	CLIA+4~, CLIA+29*, CLIA+33
COMM3	CLIA+4~, CLIA+30*, CLIA+33
DATA	NLAB+3~, NLAB+15, PAD~, PAD+1, ABORH+1~, ABORH+3, ABORH+7, ABORH+8, ABORH+9, CLIA+3~
DATE	NLAB+3~, NLAB+13, NLAB+15, NLAB+16, NLAB+17, NLAB+19, NLAB+20, NLAB+21, CLIA+3~, CLIA+18 , CLIA+20, CLIA+33, CLIA+34, CLIA+38, CLIA+39, CLIA+40
DATE2	CLIA+3~, CLIA+20*, CLIA+33
DFN	NLAB~, NLAB+8, NLAB+10, ABORH~, ABORH+2, CLIA~, CLIA+10, CLIA+12, CLIA+37
ERR	CLIA+3~
HI	CLIA+4~, CLIA+24*, CLIA+33
IEN	NLAB+3~, NLAB+9, NLAB+10, NLAB+11, NLAB+16, NLAB+20, NLAB+21, CLIA+3~, CLIA+11, CLIA+12* , CLIA+14, CLIA+15, CLIA+33, CLIA+39*, CLIA+40, CLIA+55, CLIA+57, CLIA+58, CLIA+61
IEN2	CLIA+4~, CLIA+15*, CLIA+16, CLIA+18, CLIA+19, CLIA+20, CLIA+21, CLIA+22, CLIA+23, CLIA+24 , CLIA+25, CLIA+26, CLIA+27, CLIA+28, CLIA+29, CLIA+30, CLIA+32
LAB	NLAB+3~, NLAB+5, NLAB+8, NLAB+10, CLIA+3~, CLIA+7, CLIA+10, CLIA+12
LCNT	CLIA+3~, CLIA+34, CLIA+40, CLIA+42, CLIA+44, CLIA+45, CLIA+46, CLIA+47, CLIA+48, CLIA+49* , CLIA+50, CLIA+51, CLIA+52, CLIA+53, CLIA+56, CLIA+58, CLIA+62, CLIA+63, CLIA+64, CLIA+65 , CLIA+66, CLIA+67, CLIA+68
LENGTH	PAD~, PAD+1
LGTH	NLAB+3~, CLIA+3~, CLIA+32*
LINE	NLAB+3~, NLAB+21, NLAB+23, CLIA+3~, CLIA+40, CLIA+42, CLIA+43, CLIA+45, CLIA+46, CLIA+47 , CLIA+48, CLIA+50, CLIA+51, CLIA+52, CLIA+53
LO	CLIA+4~, CLIA+23*, CLIA+33
LRDFN	ABORH+1~, ABORH+2*, ABORH+3, ABORH+4, ABORH+5, ABORH+6
NUM	SP~, SP+1
PATIENT	CLIA+36~, CLIA+37*, CLIA+49
PRV	CLIA+4~, CLIA+26*, CLIA+33
RES	CLIA+4~, CLIA+16*, CLIA+17, CLIA+33
RESDT	CLIA+4~, CLIA+27*, CLIA+33
RH	ABORH+1~, ABORH+6*, ABORH+7, ABORH+8
SPEC	CLIA+4~, CLIA+25*, CLIA+33
TIU	NLAB+3~, NLAB+11!, CLIA+3~, CLIA+13!
TIU(	NLAB+12, NLAB+13, NLAB+16, CLIA+16, CLIA+18, CLIA+19, CLIA+20, CLIA+21, CLIA+22, CLIA+23 , CLIA+24, CLIA+25, CLIA+26, CLIA+27, CLIA+28, CLIA+29, CLIA+30, CLIA+32
TIU(1201	NLAB+13
TIUCNT	NLAB~, NLAB+19, NLAB+20, CLIA~, CLIA+6*, CLIA+8, CLIA+10, CLIA+12, CLIA+38, CLIA+39
TIUTST	NLAB~, NLAB+5, NLAB+6, CLIA~, CLIA+7, CLIA+8
U	ABORH+2, ABORH+5, ABORH+6, CLIA+33, CLIA+42, CLIA+43, CLIA+45, CLIA+46, CLIA+47, CLIA+48 , CLIA+50, CLIA+51, CLIA+52, CLIA+53
UNIT	CLIA+3~, CLIA+22*, CLIA+33
VDATE	CLIA+4~, CLIA+19*
VDT	NLAB+3~, NLAB+7, NLAB+8, NLAB+10, CLIA+3~, CLIA+9, CLIA+10, CLIA+12
VFILENUM	CLIA+36~, CLIA+60*, CLIA+61
X	NLAB+3~, CLIA+3~, CLIA+57, CLIA+58, CLIA+59
Y	NLAB+3~, NLAB+22, NLAB+23, CLIA+41, CLIA+42

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIULO11

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: