Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BTIULO5

Package: IHS Mods To Text Integration Utilities

Routine: BTIULO5


Information

BTIULO5 ; IHS/ITSC/LJF - STILL MORE OBJECTS FOR EHR ;27-Apr-2016 12:26;DU

Source Information

Source file <BTIULO5.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 3 $$FMTE^XLFDT  $$REPEAT^XLFSTR  $$VERSION^XPDUTL  
DRG Grouper 1 $$ICDDX^ICDEX  
GUI Objects 1 $$CHECK^BGOASLK  
IHS Electronic Health Record 1 $$VSTR2VIS^BEHOENCX  
IHS Standard Terminology 1 $$CONC^BSTSAPI  
IHS VA Utilities 1 ENP^XBDIQ1  
Order Entry Results Reporting 1 EN^ORQ1  
Text Integration Utility 1 $$WRAP^TIULS  
VA Fileman 1 $$GET1^DIQ  
VueCentric Framework 1 ($$GETVAR,GETVAR)^CIAVMEVT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Mods To Text Integration Utilities 3 BTIULO7A  BTIUPV1  BTIUPV2  

Entry Points

Name Comments DBIA/ICR reference
GETMED(RETURN,VIEN) ;EP returns all medications given for a visit
ECODE(IEN) ; return narrative for e-code
GETPOV(RETURN,VIEN,MULTI) ;return every diagnosis for current visit
; VISIT=Visit IEN
VPOV(TARGET,MULTI) ; returns diagnoses for current vuecentric visit context
; MULTI=0 return one line of diagnosis names; MULTI=1 return 1 line per diagnosis
VORD(TARGET) ; returns orders for current vuecentric visit context
SIG(VMED,SSIG) ;CONSTRUCT THE FULL TEXT FROM THE ENCODED SIG
; VMED=ien in v med file; SSIG=short sig
VMED(TARGET,SIG) ;EP; returns medications for current vuecentric visit context
; If SIG is set to 1, include medication sig
GETPTED(RETURN,VIEN,MULTI) ;return every edcuation topic for current visit
; VISIT=Visit IEN
ACONTROL(DFN) ;Find last entry of patient's asthma control
PAD(DATA,LENGTH) ; -- SUBRTN to pad length of data
EDABBRV(X) ; -- returns education topic abbreviation
SP(NUM) ; -- SUBRTN to pad spaces
VPTED(TARGET,MULTI) ; returns patient education topics for current vuecentric visit context
; MULTI=0 return one line of education topic names; MULTI=1 return 1 line per topic
AICD() ;EP
GETORD(RETURN,VSIT) ;
VMSET(SPACES) ; -- set string into wrapped line;IHS/ITSC/LJF 4/22/2005 PATCH 1002 - added parameter
GETSIG(RETURN,VIEN) ;EP returns all medications given for a visit plus sig

External References

Name Field # of Occurrence
$$VSTR2VIS^BEHOENCX VORD+7, VPOV+6, VPTED+7, VMED+6
$$CHECK^BGOASLK GETPOV+22
$$CONC^BSTSAPI GETPOV+42
$$GETVAR^CIAVMEVT VORD+5, VPOV+4, VPTED+4, VMED+4
GETVAR^CIAVMEVT VORD+1, VPTED+2, VMED+2
$$GET1^DIQ GETPOV+8, GETPOV+41, ECODE+4, ECODE+5, ECODE+6, ECODE+8, GETPTED+7, GETPTED+11, EDABBRV+1, GETMED+4
$$ICDDX^ICDEX ECODE+7
EN^ORQ1 GETORD+8, GETORD+9
$$WRAP^TIULS GETMED+5, VMSET+2
ENP^XBDIQ1 GETPOV+17, GETPTED+9, GETSIG+5
$$FMTE^XLFDT ACONTROL+10
$$REPEAT^XLFSTR PAD+1
$$VERSION^XPDUTL AICD+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD9 - [#80] GET1^DIQ
^AUPNVSIT - [#9000010] GET1^DIQ
^AUPNVPOV - [#9000010.07] GET1^DIQ
^AUPNVMED - [#9000010.14] GET1^DIQ
^AUPNVPED - [#9000010.16] GET1^DIQ
^AUTTEDT - [#9999999.09] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" VORD+7, VPOV+6, VPTED+7, VMED+6
^AUPNVAST - [#9000010.41] ACONTROL+10
^AUPNVAST("AAC" ACONTROL+4, ACONTROL+6, ACONTROL+8
^AUPNVMED("AD" GETMED+3, GETSIG+4
^AUPNVPED("AD" GETPTED+6
^AUPNVPOV - [#9000010.07] GETPOV+37
^AUPNVPOV("AD" GETPOV+6
^AUPNVSIT - [#9000010] GETORD+4
^OR(100 - [#100] GETORD+15
^PS(51 - [#51] SIG+4
^TMP("ORR" GETORD+6!, GETORD+12, GETORD+30!

Label References

Name Line Occurrences
$$ACONTROL GETPOV+25
$$AICD ECODE+7
$$ECODE GETPOV+28
$$PAD SP+1
$$SIG GETSIG+11
$$SP VMSET+6
GETMED VMED+8
GETORD VORD+9
GETPOV VPOV+7
GETPTED VPTED+8
GETSIG VMED+7
VMSET GETSIG+9, GETSIG+11

Naked Globals

Name Field # of Occurrence
^( GETORD+12
^(9 SIG+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADT ACONTROL+1~, ACONTROL+4*, ACONTROL+5, ACONTROL+6, ACONTROL+8
AIEN GETPOV+3~, GETPOV+40*, GETPOV+41
ARRAY GETPOV+3~
ARRAY( GETPOV+11*, GETPOV+13, GETPOV+14
ASTHMA GETPOV+3~, GETPOV+7*, GETPOV+22*, GETPOV+23
BTIU GETPOV+3~, GETPOV+17!, GETPTED+3~, GETPTED+9!, GETSIG+5~
BTIU( GETPOV+19, GETPOV+20, GETPOV+24, GETPOV+28, GETPOV+29, GETPOV+30, GETPTED+12, GETPTED+13, GETPTED+16, GETSIG+9
, GETSIG+11
BTIU(1102 GETPOV+21
C GETORD+2~, GETORD+3*, GETORD+13*, GETORD+25, GETORD+27, GETORD+28, GETORD+29
CNT VORD+2~, VORD+4*, VORD+13*, VORD+14, VORD+15, VPOV+3~, VPOV+9*, VPOV+11*, VPOV+12, VPOV+13
, GETPOV+3~, GETPOV+16*, GETPOV+33, GETPOV+45*, GETPOV+46, VPTED+3~, VPTED+10*, VPTED+12*, VPTED+13, VPTED+14
, GETPTED+3~, GETPTED+8*, GETPTED+14, GETPTED+15*, GETPTED+16, VMED+3~, VMED+10*, VMED+12*, VMED+13, VMED+14
CODE GETPOV+3~, GETPOV+20*, GETPOV+22
CON GETPOV+3~, GETPOV+25*, GETPOV+26
COUNT GETMED+1~, GETMED+6*, VMSET+1~, VMSET+3*, VMSET+6
DAT GETORD+2~, GETORD+4*, GETORD+9
DATA PAD~, PAD+1
DFN VORD+7, GETORD+2~, GETORD+5*, GETORD+9, VPOV+6, ACONTROL~, ACONTROL+4, ACONTROL+6, ACONTROL+8, VPTED+7
, VMED+6
DUZ("AG" ACONTROL+3
ENTER ACONTROL+1~, ACONTROL+10*, ACONTROL+11
FNUM GETPOV+3~, GETPOV+39*, GETPOV+41
HDR GETORD+2~
HLF GETORD+2~
I VORD+2~, VORD+12*, VORD+14, VPOV+3~, VPOV+10*, VPOV+12, GETPOV+27*, GETPOV+28, GETPOV+29, VPTED+3~
, VPTED+11*, VPTED+13, VMED+3~, VMED+11*, VMED+13
IEN GETPOV+3~, GETPOV+6*, GETPOV+8, GETPOV+11, GETPOV+12*, GETPOV+14*, GETPOV+17, GETPOV+28, GETPOV+37, GETPOV+40
, ECODE~, ECODE+4, ECODE+6, ECODE+7, ACONTROL+1~, ACONTROL+6*, ACONTROL+7, ACONTROL+8, ACONTROL+10, GETPTED+3~
, GETPTED+6*, GETPTED+7, GETPTED+9, GETPTED+11
IEN2 GETPOV+3~, GETPOV+37*, GETPOV+40
LENGTH PAD~, PAD+1
LEVEL ACONTROL+1~, ACONTROL+2*, ACONTROL+3, ACONTROL+5, ACONTROL+7, ACONTROL+8*, ACONTROL+9*, ACONTROL+11
LINE GETPOV+3~, GETPOV+18*, GETPOV+19*, GETPOV+26*, GETPOV+28*, GETPOV+29*, GETPOV+33, GETPTED+3~, GETPTED+12*, GETPTED+13*
, GETPTED+14
LOC GETORD+2~, GETORD+5*, GETORD+16
MED GETORD+2~, GETORD+14*
MULTI VPOV~, VPOV+7, GETPOV~, GETPOV+15, VPTED~, VPTED+8, GETPTED~, GETPTED+7
NARR GETPOV+3~, GETPOV+8*, GETPOV+9*, GETPOV+10*, GETPOV+11, GETPOV+12*, GETPOV+13*, GETPOV+14, GETPOV+15, GETPOV+30*
, GETPOV+31*, GETPOV+32*, GETPOV+33
NEWORD GETORD+2~, GETORD+26*, GETORD+27
NUM GETPTED+3~, GETPTED+8*, GETPTED+14, SP~, SP+1
OLD GETORD+2~, GETORD+13*
ORD GETORD+2~, GETORD+12!*, GETORD+15, GETORD+17
ORD("TX" GETORD+18, GETORD+19, GETORD+21*, GETORD+24, GETORD+26, GETORD+28
ORLIST GETORD+2~, GETORD+10, GETORD+12
PAT GETPOV+3~, GETPOV+24*, GETPOV+25
PCNT GETPOV+3~, GETPOV+16*, GETPOV+33
PIECE SIG+2~, SIG+3*, SIG+4
Q GETPOV+3~, GETPOV+38*, GETPOV+41*, GETPOV+42*, GETPOV+43
RESULT VORD+2~, VORD+9, VPOV+3~, VPOV+7, VPTED+3~, VPTED+8, VMED+3~, VMED+7, VMED+8
RESULT( VORD+12, VORD+14, VPOV+10, VPOV+12, VPTED+11, VPTED+13, VMED+11, VMED+13
RETURN GETORD~, GETORD+1!, GETPOV~, GETPOV+4!, GETPTED~, GETPTED+4!, GETMED~, GETMED+2!, GETSIG~, GETSIG+2!
RETURN( GETORD+25!, GETORD+27*, GETORD+28*, GETPOV+33*, GETPOV+46*, GETPTED+14*, GETPTED+16*, GETMED+6*, GETSIG+12*, VMSET+6*
RETURN(1 GETORD+29*, GETPOV+15*, GETPTED+7*
SIG VMED~, VMED+7, SIG+2~, SIG+3*, SIG+5*, SIG+6
SNO GETPOV+3~, GETPOV+21*, GETPOV+22
SPACES VMSET~, VMSET+6
SSIG SIG~, SIG+3, SIG+4
STRING GETPOV+3~, GETPOV+36*, GETPOV+43*, GETPOV+44, GETPOV+46
TARGET VORD~, VORD+1, VORD+3, VORD+6, VORD+7, VORD+11, VORD+14, VORD+15, VORD+16, VPOV~
, VPOV+5, VPOV+6, VPOV+9, VPOV+12, VPOV+13, VPOV+14, VPTED~, VPTED+2, VPTED+6, VPTED+7
, VPTED+10, VPTED+13, VPTED+14, VPTED+15, VMED~, VMED+2, VMED+5, VMED+6, VMED+10, VMED+13
, VMED+14, VMED+15
TIUCNT GETSIG+1~, GETSIG+3*, GETSIG+12*, VMSET+4*, VMSET+6
TIUX GETMED+1~, GETMED+3*, GETMED+4, GETSIG+1~, GETSIG+3*, GETSIG+4*, GETSIG+5, GETSIG+11
TIUY GETMED+1~, GETMED+3*, GETMED+4*, GETMED+5*, GETMED+6, GETSIG+1~, GETSIG+3*, GETSIG+9*, GETSIG+11*, VMSET+2*
, VMSET+3, VMSET+6
TOPIC GETPTED+3~, GETPTED+11*, GETPTED+12
U GETORD+5, GETORD+15, GETORD+17, GETPOV+42, ECODE+7, ACONTROL+10, SIG+4
VDT ECODE+1~, ECODE+5*, ECODE+7
VIEN GETPOV~, GETPOV+6, ECODE+1~, ECODE+4*, ECODE+5, GETPTED~, GETPTED+6, GETMED~, GETMED+3, GETSIG~
, GETSIG+4
VMED SIG~
VSIT GETORD~, GETORD+4
VST VORD+2~, VORD+5*, VORD+6, VORD+7*, VORD+8, VORD+9, VPOV+3~, VPOV+4*, VPOV+5, VPOV+6*
, VPOV+7, VPTED+3~, VPTED+4*, VPTED+6, VPTED+7*, VPTED+8, VMED+3~, VMED+4*, VMED+5, VMED+6*
, VMED+7, VMED+8
X VORD+2~, VORD+7*, GETORD+2~, GETORD+4*, GETORD+5, GETORD+12*, VPOV+3~, VPOV+6*, GETPOV+35*, GETPOV+37
, GETPOV+39, ECODE+1~, ECODE+6*, ECODE+8, VPTED+3~, VPTED+7*, EDABBRV~, EDABBRV+1, VMED+3~, VMED+6*
, SIG+2~, SIG+3*, SIG+4*, SIG+5
Y GETORD+2~, GETORD+15*, GETORD+16, GETORD+18*, GETORD+19, GETORD+21, GETORD+24, GETORD+26, GETORD+28, ECODE+1~
, ECODE+3*, ECODE+7*, ECODE+8*, ECODE+9, SIG+2~, SIG+4*

Marked Items

Name Field # of Occurrence
$T(EN^ORQ1 GETORD+8
$T(GETVAR^CIAVMEVT VORD+1, VPTED+2, VMED+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All