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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BTIULO14

Package: IHS Mods To Text Integration Utilities

Routine: BTIULO14


Information

BTIULO14 ; IHS/MSC/MGH - STILL MORE OBJECTS FOR EHR ;11-May-2016 12:52;DU

Source Information

Source file <BTIULO14.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
GETPTED(RETURN,VIEN) ;return every education topic for current visit
; VISIT=Visit IEN
GETLAB(RETURN,VIEN) ;check every resulted lab for current visit only return abnormals
; VISIT=Visit IEN
SUBTOPIC(IEN) ;Get the subtopics for this patient ed
PAD(DATA,LENGTH) ; -- SUBRTN to pad length of data
VABNLAB(TARGET) ; returns abnormal resulted labs for current vuecentric visit context
VPTED(TARGET) ; returns patient education topics for current vuecentric visit context
; MULTI=0 return on=e line of education topic names; MULTI=1 return 1 line per topic
EDABBRV(X) ; -- returns education topic abbreviation
SP(NUM) ; -- SUBRTN to pad spaces
PRPRAC(DFN,TARGET) ;EP

External References

Name Field # of Occurrence
$$VSTR2VIS^BEHOENCX VPTED+7, VABNLAB+6
$$GETVAR^CIAVMEVT VPTED+4, VABNLAB+4
GETVAR^CIAVMEVT VPTED+2, VABNLAB+1
$$GET1^DIQ GETPTED+10, EDABBRV+1, PRPRAC+6, PRPRAC+7, PRPRAC+12, PRPRAC+15, PRPRAC+16, PRPRAC+17, GETLAB+7, GETLAB+10
, GETLAB+11
ENP^XBDIQ1 GETPTED+8
$$REPEAT^XLFSTR PAD+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVLAB - [#9000010.09] GET1^DIQ
^AUPNVPED - [#9000010.16] GET1^DIQ
^AUPNNPP - [#9000038] GET1^DIQ
^AUTTEDT - [#9999999.09] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" VPTED+7, VABNLAB+6
^AUPNNPP("B" PRPRAC+4
^AUPNVLAB("AD" GETLAB+6
^AUPNVPED - [#9000010.16] SUBTOPIC+2, SUBTOPIC+3
^AUPNVPED("AD" GETPTED+6

Label References

Name Line Occurrences
$$PAD SP+1
GETLAB VABNLAB+8
GETPTED VPTED+9
SUBTOPIC GETPTED+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABN GETLAB+3~, GETLAB+7*, GETLAB+8, GETLAB+11
BTIU GETPTED+3~, GETPTED+8!
BTIU( GETPTED+11, GETPTED+12, GETPTED+15, GETPTED+17
BY PRPRAC+1~, PRPRAC+17*, PRPRAC+21
CNT VPTED+3~, VPTED+8*, VPTED+10*, VPTED+12*, VPTED+13, VPTED+14, GETPTED+7*, GETPTED+13, GETPTED+16*, GETPTED+17
, SUBTOPIC+4*, SUBTOPIC+5, PRPRAC+1~, PRPRAC+3*, PRPRAC+8*, PRPRAC+9, PRPRAC+10*, PRPRAC+11, PRPRAC+13*, PRPRAC+14
, PRPRAC+18*, PRPRAC+19, PRPRAC+20*, PRPRAC+21, VABNLAB+2~, VABNLAB+3*, VABNLAB+11*, VABNLAB+12, VABNLAB+13, GETLAB+3~
, GETLAB+9*, GETLAB+11
DATA PAD~, PAD+1
DFN VPTED+7, PRPRAC~, PRPRAC+4, VABNLAB+6
I VPTED+3~, VPTED+11*, VPTED+13, VABNLAB+2~, VABNLAB+10*, VABNLAB+12
IEN GETPTED+3~, GETPTED+6*, GETPTED+8, GETPTED+10, GETPTED+14, SUBTOPIC~, SUBTOPIC+2, SUBTOPIC+3, PRPRAC+1~, PRPRAC+3*
, PRPRAC+4*, PRPRAC+5, PRPRAC+6, PRPRAC+7, PRPRAC+12, PRPRAC+15, PRPRAC+16, PRPRAC+17, GETLAB+3~, GETLAB+6*
, GETLAB+7, GETLAB+10, GETLAB+11
LENGTH PAD~, PAD+1
LEVEL SUBTOPIC+1~
LINE GETPTED+3~, GETPTED+11*, GETPTED+12*, GETPTED+13, SUBTOPIC+1~
NUM GETPTED+3~, GETPTED+7*, GETPTED+13, SP~, SP+1
REA PRPRAC+1~, PRPRAC+15*, PRPRAC+19
RESULT VPTED+3~, VPTED+9, VABNLAB+2~, VABNLAB+8, GETLAB+3~, GETLAB+10*, GETLAB+11
RESULT( VPTED+11, VPTED+13, VABNLAB+10, VABNLAB+12
RETURN GETPTED~, GETPTED+4!, GETLAB~, GETLAB+4!
RETURN( GETPTED+13*, GETPTED+17*, SUBTOPIC+5*, GETLAB+11*
RSP PRPRAC+1~, PRPRAC+6*, PRPRAC+9, PRPRAC+12*, PRPRAC+14
SUB SUBTOPIC+1~, SUBTOPIC+2*, SUBTOPIC+3
TARGET VPTED~, VPTED+2, VPTED+6, VPTED+7, VPTED+10, VPTED+13, VPTED+14, VPTED+15, PRPRAC~, PRPRAC+2
, PRPRAC+9, PRPRAC+11, PRPRAC+14, PRPRAC+19, PRPRAC+21, PRPRAC+22, PRPRAC+23, VABNLAB~, VABNLAB+1, VABNLAB+5
, VABNLAB+6, VABNLAB+9, VABNLAB+12, VABNLAB+13, VABNLAB+14
TOPIC GETPTED+3~, GETPTED+10*, GETPTED+11, SUBTOPIC+1~, SUBTOPIC+3*, SUBTOPIC+5
U SUBTOPIC+3
VIEN GETPTED~, GETPTED+6, GETLAB~, GETLAB+6
VST VPTED+3~, VPTED+4*, VPTED+6, VPTED+7*, VPTED+9, VABNLAB+2~, VABNLAB+4*, VABNLAB+5, VABNLAB+6*, VABNLAB+8
WHEN PRPRAC+1~, PRPRAC+7*, PRPRAC+11, PRPRAC+16*, PRPRAC+21
X VPTED+3~, VPTED+7*, EDABBRV~, EDABBRV+1, VABNLAB+2~, VABNLAB+6*

Marked Items

Name Field # of Occurrence
$T(GETVAR^CIAVMEVT VPTED+2, VABNLAB+1
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All