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 |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Routine: TIUEN113

Package: Text Integration Utility

Routine: TIUEN113


Information

TIUEN113 ; SLC/JAK - Environment Check for TIU*1*113 ;28-AUG-2001 08:43

Source Information

Source file <TIUEN113.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; -- Control Unit
; Check all Hospital Location entries for division and all
; Medical Center Division entries for institution file pointer;
; if not all data present, quit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking DIVISION for all Hospital Location file (#44)"
  • Line Location: MAIN+6
Function Call: WRITE
  • Prompt: !,"entries <AND> INSTITUTION FILE POINTER for all Medical"
  • Line Location: MAIN+7
Function Call: WRITE
  • Prompt: !,"Center Division file (#40.8) entries..."
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: MAIN+9
Function Call: WRITE
  • Prompt: !,"Sorry...DIVISION cannot be determined for all Hospital"
  • Line Location: MAIN+21
Function Call: WRITE
  • Prompt: !,"Location file (#44) entries <AND/OR> INSTITUTION FILE"
  • Line Location: MAIN+22
Function Call: WRITE
  • Prompt: !,"POINTER cannot be determined for all Medical Center"
  • Line Location: MAIN+23
Function Call: WRITE
  • Prompt: !,"Division file (#40.8) entries. Please review and correct"
  • Line Location: MAIN+24
Function Call: WRITE
  • Prompt: !,"both files as necessary."
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: !!,"** ABORTING INSTALLATION **"
  • Line Location: MAIN+26
Function Call: WRITE
  • Prompt: !,"** Files are OK **"
  • Line Location: MAIN+28

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] MAIN+16, MAIN+17
^SC - [#44] MAIN+11, MAIN+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHKOK MAIN+5~*, MAIN+11, MAIN+13*, MAIN+14, MAIN+16, MAIN+17*, MAIN+19
TIUDIV MAIN+15~*, MAIN+16*, MAIN+17
TIUDVHL MAIN+12~, MAIN+13*
TIUIFP MAIN+15~, MAIN+17*
TIULOC MAIN+5~*, MAIN+11*, MAIN+13
U MAIN+13
>> XPDQUIT MAIN+20*
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All