Routine: BTIUPCC4

Package	Total	Call Graph
IHS Mods To Text Integration Utilities	2	$$QUAL^BTIULO7A $$LASTMSR^BTIUPCC1
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
IHS VA Utilities	1	ENP^XBDIQ1
Toolkit	1	GETLST^XPAR
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

$$QUAL^BTIULO7A $$LASTMSR^BTIUPCC1

$$FMTE^XLFDT $$REPEAT^XLFSTR

ENP^XBDIQ1

GETLST^XPAR

$$GET1^DIQ

Package	Total	Caller Graph
IHS Mods To Text Integration Utilities	1	BTIUPCC1

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
LSTDATE(DATE1,DATE2,YES)	;EP -- returns event date or visit date;PATCH 1002 fixed typo
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
LSTMEAS(DFN,TIUMSR,VAIN)	; -- returns most current measurement (internal values)
MEASLST(DFN,TARGET)	;EP Get last of each type of vital
SP(NUM)	; -- SUBRTN to pad spaces

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMSR("AE"	LSTMEAS+10, LSTMEAS+12
^AUTTMSR - [#9999999.07]	MEASLST+8
^AUTTMSR("B"	LSTMEAS+3

Name	Line Occurrences
$$PAD	SP+1

Name	Field # of Occurrence
ARR	LSTMEAS+2~, LSTMEAS+21
ARR(	LSTMEAS+19*, LSTMEAS+22
ARR(""	LSTMEAS+22
ARRAY	MEASLST+2~, MEASLST+4
ARRAY(	MEASLST+5, MEASLST+6
CNT	MEASLST+2~, MEASLST+3, MEASLST+12, MEASLST+13, MEASLST+14
DATA	PAD~, PAD+1
DATE	LSTMEAS+2~, LSTMEAS+18, LSTMEAS+19, LSTMEAS+22
DATE1	LSTDATE~, LSTDATE+7, LSTDATE+8
DATE2	LSTDATE~, LSTDATE+6
DFN	LSTMEAS~, LSTMEAS+10, LSTMEAS+12, MEASLST~, MEASLST+10
IEN	LSTMEAS+2~, LSTMEAS+11, LSTMEAS+12, LSTMEAS+13, LSTMEAS+16, LSTMEAS+19, LSTMEAS+22*
ISINP	LSTMEAS+2~
LENGTH	PAD~, PAD+1
LINE	LSTMEAS+2~, LSTMEAS+17, LSTMEAS+19, LSTMEAS+21, LSTMEAS+22*, LSTMEAS+24
MEAS	MEASLST+2~, MEASLST+5*, MEASLST+6
MITEM	MEASLST+2~, MEASLST+6*, MEASLST+7, MEASLST+8
MSR	LSTMEAS+2~, LSTMEAS+3*, LSTMEAS+10, LSTMEAS+12
MTYPE	MEASLST+2~, MEASLST+8*, MEASLST+9, MEASLST+10
NUM	SP~, SP+1
QUALIF	LSTMEAS+2~, LSTMEAS+16*, LSTMEAS+17
STOP	LSTMEAS+2~, LSTMEAS+7*, LSTMEAS+8, LSTMEAS+10
TARGET	MEASLST~, MEASLST+13, MEASLST+14, MEASLST+15
TIU	LSTMEAS+2~, LSTMEAS+13!
TIU(	LSTMEAS+17
TIU(1201	LSTMEAS+17, LSTMEAS+18
TIU(2	LSTMEAS+15
TIUMSR	LSTMEAS~, LSTMEAS+3, MEASLST+2~, MEASLST+10*, MEASLST+11, MEASLST+13
U	LSTMEAS+7, LSTMEAS+17, MEASLST+8
VAIN	LSTMEAS~, LSTMEAS+23!
VAIN(1	LSTMEAS+6
VAIN(7	LSTMEAS+7
VDT	LSTMEAS+2~, LSTMEAS+9, LSTMEAS+10, LSTMEAS+12, LSTMEAS+18
X	LSTMEAS+2~
YES	LSTDATE~, LSTDATE+1

Information