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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: TIUPR200

Package: Text Integration Utility

Routine: TIUPR200


Information

TIUPR200 ; SLC/AJB - Pre-install/Home Telehealth Titles; July 26, 2005

Source Information

Source file <TIUPR200.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 $$FIND1^DIC  UPDATE^DIE  ^DIR  
Text Integration Utility 1 $$READ^TIUU  

Entry Points

Name Comments DBIA/ICR reference
ATTACH(TIUDA,TIUPRNT) ;
EN
CREATE(NAME,TYPE) ;
PNS ;
LU(FILE,NAME,FLAGS,SCREEN,INDEXES) ;
DC ;
HTH ;
CONS ;
EXIT

External References

Name Field # of Occurrence
$$FIND1^DIC LU+1
UPDATE^DIE CREATE+11, ATTACH+4
^DIR EXIT+3
$$READ^TIUU EN+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Verifying installation environment..."
  • Line Location: TIUPR200+4
Function Call: WRITE
  • Prompt: !,"Installation Error: CLINICAL COORDINATOR (Class Owner) cannot be defined."
  • Line Location: TIUPR200+5
Function Call: WRITE
  • Prompt: !,"Installation Error: Cannot define CONSULTS class."
  • Line Location: TIUPR200+6
Function Call: WRITE
  • Prompt: !,"Installation Error: Cannot define PROGRESS NOTES class."
  • Line Location: TIUPR200+7
Function Call: WRITE
  • Prompt: !!,"Please re-install TIU*1.0*200 after the necessary changes have been made."
  • Line Location: TIUPR200+8
Function Call: WRITE
  • Prompt: "complete."
  • Line Location: TIUPR200+9
Function Call: WRITE
  • Prompt: $G(IOCUON)
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: +$L($G(IOF))
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"Preparing installation environment..."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"Installation Error: CLINICAL COORDINATOR (Class Owner) cannot be found."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"Installation Error: Cannot find CONSULTS class."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Installation Error: Cannot find PROGRESS NOTES class."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: "complete.",!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,"Installed "_$P(TITLE,U)_" successfully."
  • Line Location: HTH+5
Function Call: WRITE
  • Prompt: !,"Installed "_$P(TITLE,U)_" successfully."
  • Line Location: HTH+8
Function Call: WRITE
  • Prompt: !,"Installed "_$P(TITLE,U)_" successfully."
  • Line Location: HTH+10
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!!
  • Line Location: CREATE+14
Function Call: WRITE
  • Prompt: TIUMSG("DIERR",1,"TEXT",TIUMSG),!
  • Line Location: CREATE+15
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!!
  • Line Location: ATTACH+6
Function Call: WRITE
  • Prompt: TIUMSG("DIERR",1,"TEXT",TIUMSG),!
  • Line Location: ATTACH+7
Routine Call
  • DIE
  • Line Location:
    • CREATE+11
    • ATTACH+4
Routine Call
  • DIC
  • Line Location:
    • LU+1
Routine Call
  • DIR
  • Line Location:
    • EXIT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("EON" EN+2

Label References

Name Line Occurrences
$$CREATE HTH+5, HTH+8, HTH+10
$$LU TIUPR200+5, TIUPR200+6, TIUPR200+7, EN+4, EN+5, EN+6, HTH+4, HTH+6, HTH+7, HTH+9
ATTACH HTH+5, HTH+8, HTH+10
HTH EN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR EXIT+1~
DIR(0 EXIT+2*
FILE LU~, LU+1
FLAGS LU~, LU+1
INDEXES LU~, LU+1
>> IOCUON EN+2
IOF EN+2
LINE EN+1~, HTH+2*
NAME LU~, LU+1, CREATE~, CREATE+2, CREATE+4
SCREEN LU~, LU+1
TITLE EN+1~, HTH+2*, HTH+4, HTH+5, HTH+6, HTH+8, HTH+9, HTH+10
TIU CREATE+1~, ATTACH+1~
TIU( CREATE+2*, CREATE+3*, CREATE+4*, CREATE+5*, CREATE+6*, CREATE+7*, CREATE+8*, CREATE+9*, CREATE+10*, ATTACH+2*
, ATTACH+3*
TIUABORT TIUPR200+5*, TIUPR200+6*, TIUPR200+7*, TIUPR200+8, EN+1~, EN+4*, EN+5*, EN+6*, EN+7
TIUCNSLT TIUPR200+6*, EN+1~, EN+5*, HTH+10
TIUCOCOR TIUPR200+5*, EN+1~, EN+4*, CREATE+7
TIUDA HTH+3~, HTH+5*, HTH+8*, HTH+10*, CREATE+1~, CREATE+12*, CREATE+16, ATTACH~, ATTACH+2
TIUFPRIV EN+1~, HTH+1*
TIUIEN CREATE+1~, ATTACH+1~
TIUIEN(1 CREATE+12
TIUMSG CREATE+1~, CREATE+13, CREATE+15*, ATTACH+1~, ATTACH+5, ATTACH+7*
TIUMSG("DIERR" CREATE+15, ATTACH+7
TIUNAME EN+1~, HTH+1*, ATTACH+3
TIUPGNTS TIUPR200+7*, EN+1~, EN+6*, HTH+5
TIUPRNT EN+1~, HTH+5*, HTH+7*, HTH+8, ATTACH~, ATTACH+2, ATTACH+3
TYPE CREATE~, CREATE+5
U HTH+4, HTH+5, HTH+6, HTH+8, HTH+9, HTH+10
X EN+1~, HTH+2*, HTH+4, HTH+6, HTH+9, EXIT+1~
>> XPDABORT TIUPR200+8*
Y EN+1~, EXIT+1~

Marked Items

Name Field # of Occurrence
$T(@X+LINE HTH+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All