Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
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>

Entry Points

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