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 |  Local Variables  | All
Print Page as PDF
Routine: TIULV

Package: Text Integration Utility

Routine: TIULV


Information

TIULV ; SLC/JER - Visit/Movement related library ; 4/18/03

Source Information

Source file <TIULV.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Text Integration Utility 4 $$DIVISION^TIULC1  $$DATE^TIULS  $$ISPN^TIULX  $$PROVIDER^TIUPXAP1  
VA FileMan 3 ^DIC  $$GET1^DIQ  EN^DIQ1  
Registration 2 (52,ADD,DEM,ELIG,INP,OERR)^VADPT  ($$NAME,$$SITE)^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
Text Integration Utility 16 TIUALRT  TIUALRT1  TIUASCU  TIUASRPT  TIUCCRHL7P2  TIUEPN10  TIULD  TIUMOVE  
TIUPRPN1  TIUPUTCP  TIURDIV  TIUSRVD  TIUSRVP  TIUSRVP1  TIUVISIT  TIUVSIT  

Entry Points

Name Comments DBIA/ICR reference
PATPN(TIUY,DFN) ; Get minimum demographics for PN Print
PATVADPT(TIUY,DFN,TIUMVN,TIUVSTR,TIUSDC) ; Extract MAS data
WARD(DA) ; Compute ward at discharge
WARDX
PROVSVC(TIUSER) ; Resolve user's Service
VSIT(TIUY,TIUVSTR) ; Get Visit related info
CURRENT(TIUY,DFN) ; Get current INPATIENT data

External References

Name Field # of Occurrence
^DIC WARD+5
$$GET1^DIQ PATVADPT+24, PATVADPT+25
EN^DIQ1 WARD+4, VSIT+16, CURRENT+8, CURRENT+15
$$DIVISION^TIULC1 PATVADPT+51, PATVADPT+54
$$DATE^TIULS PATPN+5, VSIT+4
$$ISPN^TIULX PATVADPT+52
$$PROVIDER^TIUPXAP1 PATVADPT+43
52^VADPT PATVADPT+20
ADD^VADPT PATPN+6, PATVADPT+6
DEM^VADPT PATVADPT+2
ELIG^VADPT VSIT+2
INP^VADPT CURRENT+1
OERR^VADPT PATPN+2
$$NAME^VASITE PATPN+9
$$SITE^VASITE PATPN+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPM - [#405] Classic Fileman Calls
^DIC(45.7 - [#45.7] GET1^DIQ
^DIC(49 - [#49] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] PATVADPT+47, PATVADPT+48
^DG(40.8 - [#40.8] PATVADPT+34, VSIT+20, VSIT+21
^DGPM - [#405] PATVADPT+17
^DIC(42 - [#42] PATVADPT+28, PATVADPT+33, PATVADPT+36, PATVADPT+53
^DIC(49 - [#49] PROVSVC+3
^DPT - [#2] PATVADPT+52
^SC - [#44] PATVADPT+30, PATVADPT+38, VSIT+11, VSIT+13
^TIU(8925 - [#8925] PATVADPT+45, PATVADPT+46, PATVADPT+47!, VSIT+12
^VA(200 - [#200] PROVSVC+2

Label References

Name Line Occurrences
$$PROVSVC PATVADPT+44
$$WARD PATVADPT+26
CURRENT PATVADPT+41
VSIT PATVADPT+40
WARDX WARD+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% WARD+1~
D0 WARD+1~
DA WARD~, WARD+2, WARD+5, VSIT+1~, VSIT+15~, VSIT+16*, VSIT+17, VSIT+18, CURRENT+6~, CURRENT+7*
, CURRENT+9, CURRENT+10, CURRENT+13~, CURRENT+14*
DFN PATPN~, PATVADPT~, PATVADPT+41, PATVADPT+45, PATVADPT+46, PATVADPT+47, PATVADPT+52, CURRENT~
DIC WARD+1~, WARD+3*, WARD+5*, VSIT+1~, VSIT+15~, VSIT+16*, CURRENT+6~, CURRENT+7*, CURRENT+13~, CURRENT+14*
DIC(0 WARD+5*
DIQ WARD+1~, WARD+3*, VSIT+1~, VSIT+15~, VSIT+16*, CURRENT+6~, CURRENT+7*, CURRENT+13~, CURRENT+14*
DIQ(0 WARD+3*, VSIT+16*, CURRENT+7*
DR WARD+1~, WARD+3*, VSIT+1~, VSIT+15~, VSIT+16*, CURRENT+6~, CURRENT+7*, CURRENT+13~, CURRENT+14*
DUZ PATVADPT+43, PATVADPT+44
DUZ(2 VSIT+20, CURRENT+14, CURRENT+17
MOVE WARD+1~
MOVE(405 WARD+5
>> TIUAUTH PATVADPT+43, PATVADPT+44
TIUCT VSIT+1~, VSIT+6*, VSIT+7, VSIT+8
>> TIUD12 VSIT+12
>> TIUD13(0 PATVADPT+16
>> TIUDA VSIT+12
TIUDIV PATVADPT+19~, PATVADPT+33*, PATVADPT+34, VSIT+15~, CURRENT+6~
TIUDIV(42 CURRENT+9, CURRENT+10
TIUDIV(44 VSIT+17, VSIT+18
>> TIUDIV1(4 CURRENT+17
TIUFTS PATVADPT+1~
TIUI PATVADPT+1~, PATVADPT+21*, PATVADPT+22, PATVADPT+23, PATVADPT+32, WARD+2
TIUMVN PATVADPT~, PATVADPT+17, PATVADPT+20, PATVADPT+41, PATVADPT+52
TIUSDC PATVADPT~, PATVADPT+15
TIUSER PROVSVC~, PROVSVC+2
TIUSS PATVADPT+1~
>> TIUTYP PATVADPT+50
>> TIUTYP(1 PATVADPT+50
TIUTYPE PATVADPT+1~, PATVADPT+50*, PATVADPT+51, PATVADPT+52
TIUVSIT PATVADPT+46~*, PATVADPT+47, PATVADPT+48
TIUVSTR PATVADPT~, PATVADPT+40, PATVADPT+41, VSIT~, VSIT+4, VSIT+6, VSIT+8, VSIT+11
TIUWARD PATVADPT+1~
TIUY PATPN~, PATVADPT~, PATVADPT+40, PATVADPT+41, PROVSVC+1~, PROVSVC+2*, PROVSVC+3*, PROVSVC+4, VSIT~, CURRENT~
TIUY("AD#" PATVADPT+32*, CURRENT+2*
TIUY("ADDT" PATVADPT+27*
TIUY("ADDX" PATVADPT+31*
TIUY("AGE" PATVADPT+4*
TIUY("AMD" PATVADPT+23*
TIUY("CAT" VSIT+7*
TIUY("CLAIM" PATVADPT+22*
TIUY("DIV" PATVADPT+34*, VSIT+14, VSIT+18*, VSIT+19, VSIT+20*, VSIT+21*, VSIT+22, CURRENT+9*, CURRENT+12, CURRENT+17*
TIUY("DOB" PATPN+5*, PATVADPT+5*
TIUY("EDT" PATVADPT+27*, PATVADPT+37, PATVADPT+43, VSIT+3, VSIT+4*
TIUY("ELG" VSIT+10*
TIUY("INS" VSIT+22*
TIUY("INST" PATVADPT+51*, PATVADPT+54*
TIUY("INTNM" PATPN+9*
TIUY("LDT" PATVADPT+31*, VSIT+5*
TIUY("LOC" PATVADPT+28*, PATVADPT+29, PATVADPT+30*, PATVADPT+39*, PATVADPT+51, PATVADPT+53*, PATVADPT+54, VSIT+12*, VSIT+13*, VSIT+14
, VSIT+16, VSIT+19, CURRENT+10*, CURRENT+11*
TIUY("LOCP" PATPN+11*
TIUY("LVL" VSIT+9*
TIUY("MTYPE" PATVADPT+32*
TIUY("NUMRACE" PATVADPT+12*
TIUY("PH#" PATPN+7*, PATPN+8*, PATVADPT+7*, PATVADPT+8*
TIUY("PID" PATVADPT+4*
TIUY("PMD" PATVADPT+22*, CURRENT+2*
TIUY("PNM" PATVADPT+3*, PATVADPT+4
TIUY("PNMP" PATPN+3*
TIUY("RACE" PATVADPT+12*, PATVADPT+14*
TIUY("RACENO" PATVADPT+13*
TIUY("RB" CURRENT+4*
TIUY("REFDT" PATVADPT+16*
TIUY("SC" VSIT+23*
TIUY("SEX" PATVADPT+9*
TIUY("SITE" PATPN+10*
TIUY("SSN" PATPN+4*, PATVADPT+3*
TIUY("STOP" PATVADPT+15*
TIUY("SVC" PATVADPT+24*, PATVADPT+25*, PATVADPT+44*
TIUY("TS" PATVADPT+23*, PATVADPT+24, CURRENT+3*
TIUY("VISIT" PATVADPT+48*
TIUY("VLOC" PATVADPT+38*, PATVADPT+39, VSIT+11*, VSIT+12
TIUY("VSTR" PATVADPT+37*, PATVADPT+40*, PATVADPT+45, PATVADPT+46, PATVADPT+47
TIUY("WARD" PATVADPT+26*, PATVADPT+28, PATVADPT+33, CURRENT+3*, CURRENT+5, CURRENT+7
U PATPN+10, PATPN+11, PATVADPT+25, PATVADPT+30, PATVADPT+33, PATVADPT+34, PATVADPT+36, PATVADPT+38, PATVADPT+47, PATVADPT+48
, PATVADPT+50, PATVADPT+53, PROVSVC+2, PROVSVC+3, VSIT+4, VSIT+7, VSIT+11, VSIT+12, VSIT+13, VSIT+18
, VSIT+21, CURRENT+9, CURRENT+10, CURRENT+17
VA PATPN+1~, PATVADPT+1~
VA("BID" PATVADPT+4
VA("PID" PATPN+4, PATVADPT+3
VADM PATPN+1~, PATVADPT+1~
VADM(1 PATPN+3, PATVADPT+3
VADM(12 PATVADPT+11, PATVADPT+12, PATVADPT+13, PATVADPT+14
VADM(3 PATPN+5, PATVADPT+5
VADM(4 PATVADPT+4
VADM(5 PATVADPT+9
VADM(8 PATVADPT+14
VAEL PATVADPT+1~, VSIT+1~
VAEL(1 VSIT+10
VAEL(7 PATVADPT+22
VAERR PATVADPT+1~, VSIT+1~
VAIN PATPN+1~, CURRENT+1~
VAIN(1 CURRENT+2
VAIN(2 CURRENT+2
VAIN(3 CURRENT+3
VAIN(4 PATPN+11, CURRENT+3
VAIN(5 PATPN+11, CURRENT+4
VAIP PATPN+1~, PATVADPT+1~
VAIP( PATVADPT+22, PATVADPT+23, PATVADPT+32, WARD+2
VAIP("E" PATVADPT+20*
VAIP(13 PATVADPT+32, PATVADPT+36
VAIP(14 PATVADPT+53
VAIP(17 PATVADPT+21, PATVADPT+26, PATVADPT+31
VAIP(18 PATVADPT+23
VAIP(3 PATVADPT+27, PATVADPT+35
VAIP(9 PATVADPT+31
VAPA PATPN+1~, PATVADPT+1~
VAPA(8 PATPN+7, PATPN+8, PATVADPT+7, PATVADPT+8
VDT PATVADPT+19~, PATVADPT+35*
VLOC PATVADPT+19~, PATVADPT+36*, PATVADPT+37, PATVADPT+38
VSIT VSIT+1~
X PATVADPT+1~, WARD+1~, WARD+5*, VSIT+1~, VSIT+15~
Y PATVADPT+1~, WARD+1~, WARD+2*, WARD+6*, WARDX, VSIT+1~, VSIT+15~, CURRENT+6~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All