Routine: BTIUPCC

Package	Total	Call Graph
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
Patient Care Component	2	EN^APCDALVR EN^APCDVD
IHS Changes To ADT	1	^BDGF1
IHS VA Utilities	1	ENP^XBDIQ1
Patient Care Component Reports	1	($$DSCHDATE,$$IMM,$$PCCVF,$$VD)^APCLV
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Text Integration Utility	9	TIUAL1 TIUBR TIUEDIM TIUEDIT TIUEDITR TIUPUTPN TIUPUTU TIUSRVP TIUVSIT
IHS Mods To Text Integration Utilities	2	BTIUBR BTIUEDIT

Entry Points

Name	Comments	DBIA/ICR reference
DSCH(VISIT)	;EP; -- returns discharge date for visit
ERRMSG(N)	; -- store error if v note add bombs
SMEAS(V,TYPE)	;EP; -- returns a single measurement taken during visit
VV(N)	;EP; -- displays visit ; -- called by TIUVSIT
DISCH(VISIT)	;EP; -- returns discharge date for visit
GETV(TIUVSIT,DFN,VLOC,VDATE,CATEGORY)	;EP ; returns visit ien for patient, date, srv cat
VLINE(NOTE)	;EP; -- sets up visit display lines for ^tmp(tiur,$j arrays ; NOTE=document ien
HOSLINE(VST)	; -- returns line of readable hospitalization data
SRV()	; -- returns service
POVALL(VISIT)	; -- returns all diagnoses for a visit
HRCN(PAT,FAC)	;EP; -- returns chart # for patient at facility sent
SP(NUM)	; -- SUBRTN to pad spaces
POV(VISIT,SCREEN)	; -- returns a diagnosis ; SCREEN=1 for ambulatory visits, =P for hospitalizations
PRVALL(VISIT)	; -- returns all providers for a visit
MIMM(V)	;EP; -- returns all immunizations for a visit
SLAB(DFN,TIUTST,TIULAST,BRIEF)	;EP; -- returns most current lab result for single test ;PATCH 1001 ; BRIEF=1 means brief result, BRIEF=2 no caption or date; optional ;PATCH 1001 ; BRIEF=3 means date only
PRCALL(VISIT)	; -- returns all procedures for a visit
AMBLINE(VST)	; -- returns line of readable ambulatory data
ORDPRV(V)	; -- returns ien for ordering provider on 1st v med entry for visit ; called when v note entered as part of pharmacy process
CLINIC()	; -- returns clinic stop abbrev
PROV(NOTE)	; -- returns admitg prov for movement
EVTLINE(VST)	; -- returns line of readable historical event data
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
DEMOG(NOTE)	;EP; -- sets up line of demographic data ; NOTE=document ien
LABPANL(DFN,TIUPANL,TIUCNT)	;EP; -- mult line answer for results under panel
MMEAS(V)	;EP; -- returns all measurements for a visit
VNOTE(NOTE,VISIT,DFN,MODE)	;EP; -- create v note entry ; -- called by TIUEDIT

External References

Name	Field # of Occurrence
EN^APCDALVR	VNOTE+13
EN^APCDVD	VV+5
$$DSCHDATE^APCLV	DSCH+2
$$IMM^APCLV	MIMM+4
$$PCCVF^APCLV	SMEAS+3, MMEAS+3
$$VD^APCLV	HOSLINE+2
^BDGF1	PROV+7
$$GET1^DIQ	GETV+7, VNOTE+2, VNOTE+3, VNOTE+10, VNOTE+12, ORDPRV+3, DEMOG+3, VLINE+3, VLINE+4, EVTLINE+5 , CLINIC+1, SRV+3, SRV+4, POV+5, POV+8, POV+9, POVALL+4, PRCALL+4, PRVALL+4, PROV+2 , PROV+3, PROV+4, PROV+7, PROV+8
ENP^XBDIQ1	SLAB+11, DEMOG+4, VLINE+5
$$FMTE^XLFDT	DEMOG+5, AMBLINE+2, EVTLINE+2, DISCH+3
$$REPEAT^XLFSTR	PAD+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,*7,"You MUST type ""V"" plus the item # (i.e. V3).",!! Line Location: VV+3
Function Call: WRITE	Prompt: !!,*7,"VISIT=",VISIT,!! Line Location: ERRMSG+2
Function Call: WRITE	Prompt: !!,*7,$G(APCDAFLG),!! Line Location: ERRMSG+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(40.7 - [#40.7]	GET1^DIQ
^DGPM - [#405]	GET1^DIQ
^DIC(45.7 - [#45.7]	GET1^DIQ
^TIU(8925 - [#8925]	GET1^DIQ
^AUPNVSIT - [#9000010]	GET1^DIQ
^AUPNVINP - [#9000010.02]	GET1^DIQ
^AUPNVPRV - [#9000010.06]	GET1^DIQ
^AUPNVPOV - [#9000010.07]	GET1^DIQ
^AUPNVPRC - [#9000010.08]	GET1^DIQ
^AUPNVMED - [#9000010.14]	GET1^DIQ
^AUTTLOC - [#9999999.06]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	SMEAS+2, MMEAS+2, MIMM+2
^AUPNPAT - [#9000001]	HRCN+1
^AUPNVINP - [#9000010.02]	DISCH+3
^AUPNVINP("AD"	SRV+2, DISCH+2
^AUPNVLAB("AA"	SLAB+6, SLAB+10, SLAB+15
^AUPNVMED("AD"	ORDPRV+2
^AUPNVNOT("B"	VNOTE+5
^AUPNVPOV("AD"	POV+4, POV+7, POVALL+3
^AUPNVPRC("AD"	PRCALL+3
^AUPNVPRV("AD"	PRVALL+3
^AUPNVSIT("AA"	GETV+4, GETV+6
^DGPM("AMV6"	PROV+5
^LAB(60 - [#60]	SLAB+4, LABPANL+3, LABPANL+6, LABPANL+7, LABPANL+8, LABPANL+9, LABPANL+10
^TIUZZ("ERROR"	ERRMSG+1*
^TMP("BTIULO"	LABPANL+2!, LABPANL+5, LABPANL+11
^TMP("TIUIHSV"	VV+4

Label References

Name	Line Occurrences
$$AMBLINE	VLINE+9
$$CLINIC	AMBLINE+4
$$DSCH	HOSLINE+2
$$EVTLINE	VLINE+8
$$HOSLINE	VLINE+7
$$HRCN	EVTLINE+6
$$LABPANL	LABPANL+9
$$ORDPRV	VNOTE+11
$$PAD	SLAB+15, SLAB+18, SLAB+22, SLAB+27, AMBLINE+3, AMBLINE+4, EVTLINE+3, EVTLINE+5, HOSLINE+3, HOSLINE+4 , SP+1
$$POV	AMBLINE+5, HOSLINE+5
$$PROV	HOSLINE+3
$$SLAB	LABPANL+10
$$SP	LABPANL+10
$$SRV	HOSLINE+4
ERRMSG	VNOTE+2, VNOTE+3, VNOTE+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCDADFN	VNOTE+4~
APCDAFLG	VNOTE+4~, VNOTE+14, ERRMSG+3
APCDALVR	VNOTE+4~
APCDALVR("APCDATMP"	VNOTE+6*
APCDALVR("APCDLOOK"	VNOTE+5*
APCDALVR("APCDPAT"	VNOTE+7*
APCDALVR("APCDTCDT"	VNOTE+10*
APCDALVR("APCDTDOC"	VNOTE+9*
APCDALVR("APCDTEPR"	VNOTE+11*
APCDALVR("APCDTPRV"	VNOTE+12*
APCDALVR("APCDVSIT"	VNOTE+8*
APCDLOOK	VNOTE+4~
APCDVSIT	VV+2~, VV+4*
APCLV	SMEAS+1~, MMEAS+1~
APCLV(	SMEAS+4, SMEAS+5, SMEAS+6, MMEAS+4, MMEAS+5
ARR	SLAB+3~, SLAB+22
ARR(	SLAB+20*, SLAB+24, SLAB+25
ARR(""	SLAB+23
ASRV	SRV+1~, SRV+3*, SRV+5
BRIEF	SLAB~, SLAB+15, SLAB+16, SLAB+17, SLAB+22, SLAB+28
BTIUN	MIMM+1~, MIMM+4*
BTIUQ	SLAB+3~, SLAB+28, SLAB+29, SLAB+30
>> BTIURX	VNOTE+11
BTIUY	MIMM+1~, MIMM+5*, MIMM+6
CATEGORY	GETV~, GETV+7
DATA	PAD~, PAD+1
DATE	SLAB+3~, SLAB+12, SLAB+15, SLAB+17, SLAB+18, SLAB+20, SLAB+23, SLAB+24, SLAB+25
DFN	GETV~, GETV+4, GETV+6, SLAB~, SLAB+6, SLAB+10, SLAB+15, LABPANL~, LABPANL+9, LABPANL+10 , VV+2~, VNOTE~, VNOTE+3, VNOTE+7
DSRV	SRV+1~, SRV+4*, SRV+5
DX	POV+2~, POV+3, POV+4, POV+5, POV+7, POV+9, POV+10, POVALL+1~, POVALL+2, POVALL+4* , POVALL+5
E	SMEAS+1~, SMEAS+3, MMEAS+1~, MMEAS+3, MIMM+1~, MIMM+4*, MIMM+5
FAC	HRCN~, HRCN+1
HOS	SRV+1~, SRV+2*, SRV+3, SRV+4
IEN	SLAB+3~, SLAB+7, SLAB+10, SLAB+11, SLAB+20, SLAB+24, SLAB+25, POV+2~, POV+4, POV+5 , POV+7, POV+8, POV+9, POVALL+1~, POVALL+2, POVALL+3, POVALL+4, PRCALL+1~, PRCALL+2, PRCALL+3* , PRCALL+4, PRVALL+1~, PRVALL+2, PRVALL+3, PRVALL+4
LAB	SLAB+3~, SLAB+4, SLAB+6, SLAB+10, SLAB+15, LABPANL+1~, LABPANL+3, LABPANL+6, LABPANL+7
LENGTH	PAD~, PAD+1
LINE	SLAB+3~, SLAB+6, SLAB+15, SLAB+16, SLAB+17, SLAB+18, SLAB+20, SLAB+25, SLAB+28, SLAB+29 , DEMOG+5, DEMOG+6, DEMOG+7, AMBLINE+1~, AMBLINE+2, AMBLINE+3, AMBLINE+4, AMBLINE+5, AMBLINE+6, EVTLINE+1~ , EVTLINE+2, EVTLINE+3, EVTLINE+5, EVTLINE+6, EVTLINE+7, HOSLINE+1~, HOSLINE+2, HOSLINE+3, HOSLINE+4, HOSLINE+5* , HOSLINE+6
MODE	VNOTE~, VNOTE+5*, VNOTE+6
N	VV~, VV+3, VV+4, ERRMSG~, ERRMSG+1, ERRMSG+2
NOTE	VNOTE~, VNOTE+2, VNOTE+5, VNOTE+9, VNOTE+10, VNOTE+12, DEMOG~, DEMOG+3, VLINE~, VLINE+3 , VLINE+4, HOSLINE+3, PROV~, PROV+2, PROV+4
NUM	SP~, SP+1
PAT	VLINE+2~, VLINE+4*, VLINE+6, HRCN~, HRCN+1
PRC	PRCALL+1~, PRCALL+2, PRCALL+4, PRCALL+5*, PRCALL+6
PRV	PRVALL+1~, PRVALL+2, PRVALL+4, PRVALL+5
PT	DEMOG+2~, DEMOG+3*, DEMOG+4
SCREEN	POV~, POV+3
TEST	LABPANL+1~, LABPANL+6*, LABPANL+7
TIU	SLAB+3~, SLAB+11!
TIU(	SLAB+12, SLAB+13, SLAB+16, SLAB+18, MMEAS+5
TIU(1109	SLAB+15
TIU(1201	SLAB+12
TIUCNT	LABPANL~, LABPANL+4, LABPANL+5, LABPANL+9, LABPANL+11
TIUD	GETV+2~, GETV+3, GETV+4, GETV+6
TIUEND	GETV+2~, GETV+3*, GETV+4
TIULAST	SLAB~, SLAB+27
TIUPANL	LABPANL~, LABPANL+3, LABPANL+5
TIUTST	SLAB~, SLAB+4, SLAB+22, SLAB+27, LABPANL+1~, LABPANL+7*, LABPANL+8, LABPANL+9, LABPANL+10
TIUV	GETV+2~, GETV+5, GETV+6, GETV+7, GETV+8
TIUVSIT	GETV~, GETV+3, GETV+4, GETV+6, GETV+8
TIUX	GETV+2~
TIUZ	MMEAS+1~
TIUZ(	MMEAS+5*, MMEAS+6
TIUZZ	DEMOG+2~, VLINE+2~
TIUZZ(	DEMOG+5, DEMOG+6, VLINE+6, VLINE+7, VLINE+8, AMBLINE+2, AMBLINE+3, EVTLINE+2, EVTLINE+3, EVTLINE+5 , EVTLINE+6, CLINIC+1
TYPE	SMEAS~, SMEAS+5
U	LABPANL+8, LABPANL+9, LABPANL+10, SMEAS+5, SMEAS+6, MMEAS+5, HRCN+1
V	SMEAS~, SMEAS+3, MMEAS~, MMEAS+3, MIMM~, MIMM+3, MIMM+4, ORDPRV~, ORDPRV+2
VDATE	GETV~, GETV+3
VDT	SLAB+3~, SLAB+5, SLAB+6, SLAB+10, SLAB+15
VH	DISCH+1~, DISCH+2*, DISCH+3
VISIT	VNOTE~, VNOTE+2, VNOTE+3, VNOTE+8, VNOTE+11, ERRMSG+1, ERRMSG+2, DSCH~, DSCH+2, POV~ , POV+4, POV+7, POVALL~, POVALL+3, PRCALL~, PRCALL+3, PRVALL~, PRVALL+3, DISCH~, DISCH+2
VLOC	GETV~
VST	VLINE+2~, VLINE+3*, VLINE+5, VLINE+7, VLINE+8, VLINE+9, AMBLINE~, AMBLINE+5, EVTLINE~, HOSLINE~ , HOSLINE+2, HOSLINE+5, SRV+2
X	SLAB+3~, SLAB+27, SLAB+29, LABPANL+1~, LABPANL+4, LABPANL+5, LABPANL+9, LABPANL+10, LABPANL+11, SMEAS+1~ , SMEAS+2, SMEAS+4, SMEAS+5, SMEAS+6, MMEAS+1~, MMEAS+2, MMEAS+4, MMEAS+5, MMEAS+6, MIMM+1~ , MIMM+2, VNOTE+11, VNOTE+12, ORDPRV+2~, ORDPRV+3, DSCH+1~, DSCH+2, DSCH+3, PROV+1~, PROV+2* , PROV+3, PROV+5, PROV+7, PROV+8
Y	SMEAS+1~, SMEAS+4, SMEAS+6, SMEAS+7, MMEAS+1~, MMEAS+6, MMEAS+7, PROV+1~, PROV+4, PROV+5
>> ZTQUEUED	ERRMSG+1

Marked Items

Name	Field # of Occurrence
$T(^BDGF1	PROV+7

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIUPCC

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items