Routine: BTIUPCC1

Package	Total	Call Graph
IHS Mods To Text Integration Utilities	4	$$QUAL^BTIULO7A $$LSTMEAS^BTIUPCC4 $$PREG^BTIUPCC6 QUAL^BTIUPV1
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
Health Summary	1	REGDT4^GMTSU
Health Summary Components	1	(GETSITE,PRTTXT)^BHSUTL
IHS VA Utilities	1	ENP^XBDIQ1
Registration	1	INP^VADPT
Text Integration Utility	1	$$WRAP^TIULS
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Mods To Text Integration Utilities	5	BTIULO4 BTIULO7 BTIUPCC4 BTIUSTSC BTIUVSTR

Entry Points

Name	Comments	DBIA/ICR reference
ADD2(TXT)	;
LSTMEAS(DFN,TIUMSR)	; -- returns most current measurement (internal values)
DSPFACN	; DISPLAY NOTES FOR SELECTED FACILITY
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
DSPN	; DISPLAY SINGLE NOTE
BMI(DFN,TIUCAP)	;EP -- returns BMI based on last ht and wt ; TIUCAP=1 if caption with measurement name is to be returned
LASTMSR(DFN,TIUMSR,TIUCAP,TIUDATE)	;EP; -- returns last measurement for patient ; TIUMSR=measurement name ; TIUCAP=1 if caption with measurement name is to be returned ; TIUDATE=1 return date measurement taken
UPDPROB(DFN,TARGET)	;EP; -- returns list of problems added or updated today
NOTEDSP(PROB)	;Display notes for this problem
LSTDATE(DATE1,DATE2,YES)	;EP -- returns event date or visit date;PATCH 1002 fixed typo
SP(NUM)	; -- SUBRTN to pad spaces
LSTSK(DFN,TIUTST)	;EP; -- returns most current skin test for single test
PROBLEM(DFN,STATUS,DATES,TARGET,COMMENT)	;EP -- returns the patient's problem list
LASTPRC(DFN,TIUICD,TIUPRC)	;EP -- returns date of last X procedure

Name	Field # of Occurrence
GETSITE^BHSUTL	DSPFACN+2
PRTTXT^BHSUTL	ADD2+4
$$QUAL^BTIULO7A	LSTMEAS+18
$$LSTMEAS^BTIUPCC4	LASTMSR+8
$$PREG^BTIUPCC6	LASTMSR+21
QUAL^BTIUPV1	PROBLEM+30
$$GET1^DIQ	LASTPRC+11, LSTDATE+9, PROBLEM+13, PROBLEM+23, PROBLEM+26, UPDPROB+4, UPDPROB+8, UPDPROB+9
REGDT4^GMTSU	DSPN+5
$$WRAP^TIULS	DSPN+11
INP^VADPT	LASTMSR+7
ENP^XBDIQ1	LASTPRC+7, LSTSK+7, LSTMEAS+12
$$FMTE^XLFDT	LASTPRC+20, LSTDATE+6, LSTDATE+10
$$REPEAT^XLFSTR	PAD+1

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

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	NOTEDSP+2, DSPFACN+1, DSPFACN+2, DSPFACN+3
^AUPNPROB("ACTIVE"	PROBLEM+4, PROBLEM+5, UPDPROB+3
^AUPNVMSR("AA"	LSTMEAS+9, LSTMEAS+11
^AUPNVPRC("AC"	LASTPRC+6
^AUPNVSK("AA"	LSTSK+4, LSTSK+6
^AUTTMSR("B"	LSTMEAS+3
^AUTTSK("B"	LSTSK+2

Name	Line Occurrences
$$LASTMSR	BMI+3
$$LSTDATE	LASTMSR+23, LASTMSR+24
$$LSTMEAS	LASTMSR+9
$$PAD	LSTSK+9, LSTSK+11, SP+1
$$SP	PROBLEM+21, PROBLEM+29, UPDPROB+12
ADD2	DSPN+12, DSPN+13
DSPFACN	NOTEDSP+2
DSPN	DSPFACN+3
NOTEDSP	PROBLEM+31

Name	Field # of Occurrence
^(	DSPFACN+3
^(0	DSPFACN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADD	PROBLEM+1~, PROBLEM+26, PROBLEM+27, UPDPROB+1~, UPDPROB+4, UPDPROB+5, UPDPROB+11
ARR	LSTMEAS+2~, LSTMEAS+21
ARR(	LSTMEAS+19*, LSTMEAS+22
ARR(""	LSTMEAS+22
BFCN	NOTEDSP+1~, DSPFACN+2, DSPN+6, DSPN+8
>> BHSICL	ADD2+4*
BHSITE	NOTEDSP+1~, DSPFACN+2*
BHSNAB	NOTEDSP+1~, DSPFACN+2
>> BHSNAR	ADD2+4
>> BHSTXT	ADD2+4*
BMI	BMI+2~, BMI+3*, BMI+13
BTIUN	NOTEDSP+1~, DSPFACN+3*, DSPN+2, DSPN+3, DSPN+4, DSPN+8
BTIUNAR	NOTEDSP+1~
BTIUNDF	NOTEDSP+1~, DSPFACN+3*
BTIUNFP	NOTEDSP+1~, NOTEDSP+2*, DSPFACN+1, DSPFACN+2, DSPFACN+3
BTIUQ	NOTEDSP+1~, NOTEDSP+2, DSPFACN+3, DSPN+6*
CLASS	PROBLEM+1~, PROBLEM+23, PROBLEM+24, UPDPROB+1~, UPDPROB+9, UPDPROB+10
CNT	PROBLEM+1~, PROBLEM+2, PROBLEM+11, PROBLEM+12, PROBLEM+17, PROBLEM+18, PROBLEM+20, PROBLEM+21, PROBLEM+28, PROBLEM+29 , PROBLEM+30, PROBLEM+32, UPDPROB+1~, UPDPROB+6, UPDPROB+7, UPDPROB+12, UPDPROB+13, DSPN+7, DSPN+8, ADD2+1* , ADD2+2
COMM	DSPN+1~, DSPN+4*, DSPN+10, DSPN+11, DSPN+13
COMMENT	PROBLEM~, PROBLEM+2*, PROBLEM+31
DATA	PAD~, PAD+1
DATE	LSTMEAS+2~, LSTMEAS+17, LSTMEAS+19, LSTMEAS+22
DATE1	LSTDATE~, LSTDATE+7, LSTDATE+9
DATE2	LSTDATE~, LSTDATE+6
DATES	PROBLEM~, PROBLEM+25
DFN	LASTPRC~, LASTPRC+3, LASTPRC+6, LSTSK~, LSTSK+4, LSTSK+6, LASTMSR~, LASTMSR+8, LASTMSR+9, LASTMSR+21 , BMI~, BMI+3, LSTMEAS~, LSTMEAS+9, LSTMEAS+11, PROBLEM~, PROBLEM+4, PROBLEM+5, UPDPROB~, UPDPROB+3
DT	UPDPROB+5
EXTRA	PROBLEM+1~, PROBLEM+15, PROBLEM+16, PROBLEM+19, PROBLEM+21
H	BMI+2~
HT	BMI+2~
IEN	LSTSK+1~, LSTSK+5, LSTSK+6, LSTSK+7, LSTMEAS+2~, LSTMEAS+10, LSTMEAS+11, LSTMEAS+12, LSTMEAS+18, LSTMEAS+19 , LSTMEAS+22*
LENGTH	PAD~, PAD+1
LINE	LSTSK+1~, LSTSK+4, LSTSK+6, LSTSK+8, LSTSK+9, LSTSK+10, LSTSK+12, LASTMSR+4~, LASTMSR+8, LASTMSR+9* , LASTMSR+14, LASTMSR+15, LASTMSR+16, LASTMSR+17, LASTMSR+19, LASTMSR+20, LASTMSR+22, LASTMSR+23, LASTMSR+24, LSTMEAS+2~ , LSTMEAS+8, LSTMEAS+9, LSTMEAS+15, LSTMEAS+19, LSTMEAS+22, LSTMEAS+23, PROBLEM+1~, PROBLEM+13, PROBLEM+16, PROBLEM+18 , PROBLEM+22, PROBLEM+24, PROBLEM+27, PROBLEM+29, UPDPROB+1~, UPDPROB+8, UPDPROB+10, UPDPROB+11*, UPDPROB+12
>> MAXLEN	DSPN+9*, DSPN+10, DSPN+11
MOD	PROBLEM+1~, PROBLEM+26, PROBLEM+27, UPDPROB+1~, UPDPROB+4, UPDPROB+5, UPDPROB+11
MSR	LSTMEAS+2~, LSTMEAS+3*, LSTMEAS+9, LSTMEAS+11
NTEDTE	DSPN+1~, DSPN+5*, DSPN+8
NUM	SP~, SP+1
OLD	PROBLEM+1~, PROBLEM+2, PROBLEM+8, PROBLEM+9
PCNT	PROBLEM+1~, PROBLEM+2, PROBLEM+17, PROBLEM+18
PRCDT	LASTPRC+4~, LASTPRC+11, LASTPRC+14, LASTPRC+17, LASTPRC+20
PRCN	LASTPRC+4~, LASTPRC+6*, LASTPRC+7
PROB	PROBLEM+1~, PROBLEM+5, PROBLEM+13, PROBLEM+23, PROBLEM+26, PROBLEM+30, PROBLEM+31, UPDPROB+1~, UPDPROB+3, UPDPROB+4 , UPDPROB+8, UPDPROB+9, NOTEDSP~, NOTEDSP+2, DSPFACN+1, DSPFACN+2, DSPFACN+3
QUALIF	LSTMEAS+2~, LSTMEAS+18*, LSTMEAS+19
RET	LASTMSR+13~, LASTMSR+23, LASTMSR+24, LASTMSR+25
SITE	NOTEDSP+1~
SKT	LSTSK+1~, LSTSK+2*, LSTSK+4, LSTSK+6
STAT	PROBLEM+1~, PROBLEM+4*, PROBLEM+5, PROBLEM+6, PROBLEM+7, PROBLEM+8, PROBLEM+9, PROBLEM+10
STATUS	PROBLEM~, PROBLEM+7, PROBLEM+32, UPDPROB+1~, UPDPROB+2*, UPDPROB+3, UPDPROB+8
STOP	LSTMEAS+2~
SUBCOUNT	DSPN+1~, DSPN+12*
SUBLINE	DSPN+1~, DSPN+12*
TARGET	PROBLEM~, PROBLEM+12, PROBLEM+18, PROBLEM+21, PROBLEM+29, PROBLEM+32, PROBLEM+33, UPDPROB~, UPDPROB+7, UPDPROB+12 , UPDPROB+13, UPDPROB+14, DSPN+8, ADD2+2
TIU	LASTPRC+4~, LASTPRC+7!, LSTSK+1~, LSTSK+7!, LSTMEAS+2~, LSTMEAS+12!
TIU(	LASTPRC+8, LASTPRC+11, LASTPRC+14, LSTSK+8, LSTSK+9, LSTSK+10, LSTMEAS+15
TIU(1201	LASTPRC+11, LSTMEAS+15, LSTMEAS+17
TIU(2	LSTMEAS+14
TIUARR	LASTPRC+4~
TIUARR(	LASTPRC+14*, LASTPRC+20
TIUARR(""	LASTPRC+17
TIUCAP	LASTMSR~, LASTMSR+10, BMI~, BMI+12
TIUDATE	LASTMSR~, LASTMSR+23, LASTMSR+24
TIUICD	LASTPRC~
TIUICD(	LASTPRC+8
TIUICD(0	LASTPRC+3
TIUMSR	LASTMSR~, LASTMSR+8, LASTMSR+9, LASTMSR+10, LASTMSR+15, LASTMSR+16, LASTMSR+17, LASTMSR+18, LSTMEAS~, LSTMEAS+3
TIUPRC	LASTPRC~, LASTPRC+3, LASTPRC+17, LASTPRC+20
TIUTST	LSTSK~, LSTSK+2, LSTSK+11
TXT	PROBLEM+1~, PROBLEM+10*, PROBLEM+12, ADD2~, ADD2+2
TXT2	DSPN+1~, DSPN+11*, DSPN+12
U	LASTMSR+14, LASTMSR+15, LASTMSR+16, LASTMSR+17, LASTMSR+19, LASTMSR+20, LASTMSR+22, LASTMSR+23, LASTMSR+24, LSTMEAS+15 , LSTMEAS+19, DSPN+2, DSPN+3, DSPN+4, DSPN+8
VAIN	LASTMSR+4~, LASTMSR+8
VAIN(1	LASTMSR+8, LASTMSR+9
VDT	LSTSK+1~, LSTSK+3, LSTSK+4, LSTSK+6, LSTMEAS+2~, LSTMEAS+7, LSTMEAS+9, LSTMEAS+11, LSTMEAS+17
VMIEN	LASTMSR+13~, LASTMSR+19*, LASTMSR+21
W	BMI+2~
WT	BMI+2~
X	LSTSK+1~, LSTSK+11, LSTSK+12, LASTMSR+4~, LASTMSR+10, LASTMSR+14, LASTMSR+23, LASTMSR+24, BMI+2~, BMI+12* , BMI+13, LSTMEAS+2~, DSPN+1~, DSPN+4*, DSPN+5
Y	LASTMSR+13~, LASTMSR+15, LASTMSR+16, LASTMSR+17, LASTMSR+20, LASTMSR+21, LASTMSR+22, LSTMEAS+2~, LSTDATE+9~, LSTDATE+10
YES	LSTDATE~, LSTDATE+1

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIUPCC1

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 5

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: