Routine: BTIULO3

Information

BTIULO3 ; IHS/ITSC/LJF - VISIT OBJECTS FOR EHR ;01-Jun-2010 09:18;MGH

Source Information

Source file <BTIULO3.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
IHS Electronic Health Record	1	$$VSTR2VIS^BEHOENCX
IHS VA Utilities	1	ENP^XBDIQ1
Kernel	1	$$REPEAT^XLFSTR
VA Fileman	1	$$GET1^DIQ
VueCentric Framework	1	($$GETVAR,GETVAR)^CIAVMEVT

Entry Points

Name	Comments	DBIA/ICR reference
VPRC(TARGET,MULTI)	; returns procedures for current vuecentric visit context ; MULTI=0 return one line of procedure names; MULTI=1 return 1 line per procedure
VLAB(TARGET)	; returns resulted labs for current vuecentric visit context
PAD(DATA,LENGTH)	; pad length of data
VIMM(TARGET)	; returns immunizations given for current vuecentric visit context
GETSKIN(RETURN,VIEN)	;return every skin test for current visit ; VISIT=Visit IEN
GETIMM(RETURN,VIEN)	;return every immunization for current visit ; VISIT=Visit IEN
VSKIN(TARGET)	; returns skin tests for current vuecentric visit context
GETLAB(RETURN,VIEN)	;return every resulted lab for current visit ; VISIT=Visit IEN
SP(NUM)	; pad spaces
GETPRC(RETURN,VIEN,MULTI)	;return every procedure for current visit ; VISIT=Visit IEN

External References

Name	Field # of Occurrence
$$VSTR2VIS^BEHOENCX	VIMM+6, VLAB+6, VSKIN+6, VPRC+6
$$GETVAR^CIAVMEVT	VIMM+4, VLAB+4, VSKIN+4, VPRC+4
GETVAR^CIAVMEVT	VIMM+1, VLAB+1, VSKIN+1, VPRC+2
$$GET1^DIQ	GETIMM+8, GETIMM+9, GETLAB+8, GETLAB+9, GETSKIN+12, GETPRC+7, GETPRC+11
ENP^XBDIQ1	GETSKIN+8, GETPRC+9
$$REPEAT^XLFSTR	PAD+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNVPRC - [#9000010.08]	GET1^DIQ
^AUPNVLAB - [#9000010.09]	GET1^DIQ
^AUPNVIMM - [#9000010.11]	GET1^DIQ
^AUPNVSK - [#9000010.12]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	VIMM+6, VLAB+6, VSKIN+6, VPRC+6
^AUPNVIMM("AD"	GETIMM+6
^AUPNVLAB("AD"	GETLAB+6
^AUPNVPRC("AD"	GETPRC+6
^AUPNVSK("AD"	GETSKIN+6

Label References

Name	Line Occurrences
$$PAD	GETSKIN+10, GETSKIN+12, SP+1
GETIMM	VIMM+8
GETLAB	VLAB+8
GETPRC	VPRC+8
GETSKIN	VSKIN+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BTIU	GETSKIN+3~, GETSKIN+8!, GETPRC+3~, GETPRC+9!
BTIU(	GETSKIN+9, GETSKIN+10, GETSKIN+11, GETPRC+10
BTIU(1204	GETPRC+10
CNT	VIMM+2~, VIMM+3, VIMM+12, VIMM+13, VIMM+14, GETIMM+3~, GETIMM+7, GETIMM+9, VLAB+2~, VLAB+3 , VLAB+11, VLAB+12, VLAB+13, GETLAB+3~, GETLAB+7, GETLAB+9, VSKIN+2~, VSKIN+3, VSKIN+11, VSKIN+12 , VSKIN+13, GETSKIN+3~, GETSKIN+7, GETSKIN+12, VPRC+3~, VPRC+10, VPRC+12, VPRC+13, VPRC+14, GETPRC+3~ , GETPRC+8, GETPRC+11
DATA	PAD~, PAD+1
>> DFN	VIMM+6, VLAB+6, VSKIN+6, VPRC+6
I	VIMM+2~, VIMM+11, VIMM+13, VLAB+2~, VLAB+10, VLAB+12, VSKIN+2~, VSKIN+10, VSKIN+12, VPRC+3~ , VPRC+11, VPRC+13
IEN	GETIMM+3~, GETIMM+6, GETIMM+8, GETIMM+9, GETLAB+3~, GETLAB+6, GETLAB+8, GETLAB+9, GETSKIN+3~, GETSKIN+6* , GETSKIN+8, GETSKIN+12, GETPRC+3~, GETPRC+6*, GETPRC+7, GETPRC+9, GETPRC+11
LENGTH	PAD~, PAD+1
LINE	GETSKIN+3~, GETSKIN+9, GETSKIN+10, GETSKIN+11, GETSKIN+12, GETPRC+3~, GETPRC+10, GETPRC+11
MULTI	VPRC~, VPRC+8, GETPRC~, GETPRC+7, GETPRC+13
NUM	SP~, SP+1
RESULT	VIMM+2~, VIMM+8, VLAB+2~, VLAB+8, GETLAB+3~, GETLAB+8*, GETLAB+9, VSKIN+2~, VSKIN+8, VPRC+3~ , VPRC+8
RESULT(	VIMM+11, VIMM+13, VLAB+10, VLAB+12, VSKIN+10, VSKIN+12, VPRC+11, VPRC+13
RETURN	GETIMM~, GETIMM+4!, GETLAB~, GETLAB+4!, GETSKIN~, GETSKIN+4!, GETPRC~, GETPRC+4!
RETURN(	GETIMM+9, GETLAB+9, GETSKIN+12, GETPRC+11
RETURN(1	GETPRC+7, GETPRC+13
SERIES	GETIMM+3~, GETIMM+8*, GETIMM+9
TARGET	VIMM~, VIMM+1, VIMM+5, VIMM+6, VIMM+10, VIMM+13, VIMM+14, VIMM+15, VLAB~, VLAB+1 , VLAB+5, VLAB+6, VLAB+9, VLAB+12, VLAB+13, VLAB+14, VSKIN~, VSKIN+1, VSKIN+5, VSKIN+6 , VSKIN+9, VSKIN+12, VSKIN+13, VSKIN+14, VPRC~, VPRC+2, VPRC+5, VPRC+6, VPRC+10, VPRC+13 , VPRC+14, VPRC+15
VIEN	GETIMM~, GETIMM+6, GETLAB~, GETLAB+6, GETSKIN~, GETSKIN+6, GETPRC~, GETPRC+6
VST	VIMM+2~, VIMM+4, VIMM+5, VIMM+6, VIMM+8, VLAB+2~, VLAB+4, VLAB+5, VLAB+6, VLAB+8 , VSKIN+2~, VSKIN+4, VSKIN+5, VSKIN+6, VSKIN+8, VPRC+3~, VPRC+4, VPRC+5, VPRC+6, VPRC+8
X	VIMM+2~, VIMM+6, VLAB+2~, VLAB+6, VSKIN+2~, VSKIN+6, VPRC+3~, VPRC+6

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIULO3

Call Graph Total: 5