Routine: BTIULO11

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
FileMan Files Accessed Via FileMan Db Call
Global Variables Directly Accessed
Label References
Local Variables

Information

BTIULO11 ;IHS/ITSC/LJF - IHS OBJECTS ADDED IN PATCHES;26-Mar-2014 17:11;DU

Source Information

Source file <BTIULO11.m>

Call Graph

Call Graph Total: 4

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

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

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*

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

Call Graph Total: 4