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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: TIUPS120

Package: Text Integration Utility

Routine: TIUPS120


Information

TIUPS120 ; SLC/JER - Post-install for TIU*1*120 ; 12-JUL-2001 10:59

Source Information

Source file <TIUPS120.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 $$FMADD^XLFDT  UPDATE^XPDID  BMES^XPDUTL  
Text Integration Utility 1 $$ISDS^TIULX  
VA Fileman 1 ^DIE  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Control Subroutine
GETSTX
FIX(TIUDAD,TIUDA) ; Make TIUDA an addendum of TIUDAD
ADDLIST(TIUDA) ; If Multiple Discharge Summaries are present, add to list
COUNT(DFN,TTL,VSTR) ; How many are there
GETSTART() ; Find out when Patch TIU*1*100 was installed
GATHER(TIUIDT) ; Fetch list of summaries to fix

External References

Name Field # of Occurrence
^DIE FIX+3
$$ISDS^TIULX GATHER+7
$$FMADD^XLFDT MAIN+4
UPDATE^XPDID MAIN+9, MAIN+15
BMES^XPDUTL MAIN+3, MAIN+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] GATHER+2, GATHER+4, GATHER+5, ADDLIST+2, ADDLIST+9, ADDLIST+10, COUNT+2, COUNT+3
^XPD(9.7 - [#9.7] GETSTART+4, GETSTART+5
^XTMP("TIUPS120" MAIN+4*, MAIN+7, MAIN+8, MAIN+11, MAIN+13, GATHER+10*, ADDLIST+15, ADDLIST+16*, ADDLIST+17*, GETSTART+2

Label References

Name Line Occurrences
$$COUNT ADDLIST+5
$$GETSTART MAIN+5
ADDLIST GATHER+9
FIX MAIN+14
GATHER MAIN+6
GETSTX GETSTART+3

Naked Globals

Name Field # of Occurrence
^(12 ADDLIST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COUNT ADDLIST+1~, ADDLIST+5*, ADDLIST+6
DA FIX+1~, FIX+2*
DFN COUNT~, COUNT+2
DIE FIX+1~, FIX+2*
DR FIX+1~, FIX+2*
DT MAIN+4
INSTDA GETSTART+1~*, GETSTART+4*, GETSTART+5
TIUCNT MAIN+1~*, MAIN+14*, MAIN+15, ADDLIST+1~, ADDLIST+8*, ADDLIST+13*, ADDLIST+14
TIUD0 GATHER+5~*, GATHER+7, ADDLIST+1~, ADDLIST+2*, ADDLIST+3, ADDLIST+5, ADDLIST+9, COUNT+3~*, COUNT+5
TIUD01 ADDLIST+1~, ADDLIST+10~*, ADDLIST+12
TIUD12 ADDLIST+1~, ADDLIST+2*, ADDLIST+3
TIUDA MAIN+12~*, MAIN+13*, MAIN+14, GATHER+3~*, GATHER+4*, GATHER+5, GATHER+9, ADDLIST~, ADDLIST+2, COUNT+1~*
, COUNT+2*, COUNT+3, FIX~, FIX+2
TIUDA1 ADDLIST+1~, ADDLIST+8*, ADDLIST+9*, ADDLIST+10, ADDLIST+14, ADDLIST+15, ADDLIST+16
TIUDAD MAIN+1~, MAIN+10*, MAIN+11*, MAIN+13, MAIN+14, ADDLIST+14*, ADDLIST+15, ADDLIST+16, FIX~
TIUDT MAIN+1*, GATHER+1~*, GATHER+2*, GATHER+4, GATHER+10
TIUIDT MAIN+1~, MAIN+5*, MAIN+6, GATHER~, GATHER+2
TIUVSTR ADDLIST+1~, ADDLIST+3*, ADDLIST+5, ADDLIST+9
TIUY COUNT+1~*, COUNT+6*, COUNT+7, GETSTART+1~, GETSTART+2*, GETSTART+3, GETSTART+5*, GETSTX
TTL COUNT~, COUNT+2
U MAIN+4, MAIN+8, ADDLIST+3, ADDLIST+5, ADDLIST+9, ADDLIST+12, COUNT+5, GETSTART+5
VSTR COUNT~, COUNT+2
XPDIDTOT MAIN+1~, MAIN+8*
XPDIDVT MAIN+1~, MAIN+2*, MAIN+8*
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All