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 |  All
Print Page as PDF
Routine: TIUE246

Package: Text Integration Utility

Routine: TIUE246


Information

TIUE246 ; SLC/JER - Installer Routine for TIU*1*246 ;02/03/09 13:46

Source Information

Source file <TIUE246.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Text Integration Utility 2 $$PNAME^TIULC1  $$READ^TIUU  
Authorization Subscription 1 $$ISA^USRLM  
Kernel 1 (BMES,MES)^XPDUTL  
VA Fileman 1 FILE^DIE  

Entry Points

Name Comments DBIA/ICR reference
REMOVE(TIUDA,TIUDCDA) ; Remove Title (TIUDA) from Document Class (TIUDCDA)
REMOVEDC(TIUDA) ; Remove Empty DC from its Parent Class
POS001(DIR) ; Set DIR("S") and DIR("B") for POS001.
ENV ; Environment Check
DELETEDC(TIUDA) ; Delete empty document class
FINDC() ; Find an ACTIVE candidate Progress Notes DC

External References

Name Field # of Occurrence
FILE^DIE REMOVE+4, REMOVE+16, DELETEDC+11, REMOVEDC+9
$$PNAME^TIULC1 REMOVE+24
$$READ^TIUU ENV+11, ENV+22, REMOVE+25
$$ISA^USRLM ENV+4
BMES^XPDUTL REMOVE+7, REMOVE+13, REMOVE+19, DELETEDC+13, REMOVEDC+11
MES^XPDUTL REMOVE+8, REMOVE+20, DELETEDC+14, REMOVEDC+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You are not known to the system to be a Clinical Application Coordinator (CAC).",!
  • Line Location: ENV+6
Function Call: WRITE
  • Prompt: !,"Before proceeding with installation of this patch, you need to either have a"
  • Line Location: ENV+7
Function Call: WRITE
  • Prompt: !,"CAC present with you, or have consulted the CAC as to the Document Class under"
  • Line Location: ENV+8
Function Call: WRITE
  • Prompt: !,"Progress Notes in which the new TBI/POLYTRAUMA REHABILITATION/REINTEGRATION"
  • Line Location: ENV+9
Function Call: WRITE
  • Prompt: !,"PLAN OF CARE Title should be placed.",!
  • Line Location: ENV+10
Function Call: WRITE
  • Prompt: !!,"Okay, no harm done...Hurry back with a CAC (or an answer!)"
  • Line Location: ENV+12
Function Call: WRITE
  • Prompt: !!,"The TBI/POLYTRAUMA REHABILITATION/REINTEGRATION PLAN OF CARE Title has already"
  • Line Location: ENV+17
Function Call: WRITE
  • Prompt: !,"been installed on your system...",!
  • Line Location: ENV+18
Function Call: WRITE
  • Prompt: !,"It currently descends from the ",$P($G(^TIU(8925.1,TIUDCDA,0)),U)," Document Class.",!
  • Line Location: ENV+21
Function Call: WRITE
  • Prompt: !,"Document Class ",$$PNAME^TIULC1(TIUDCDA)," is now empty...",!
  • Line Location: REMOVE+24
Function Call: WRITE
  • Prompt: !,"Document Class has descendent titles -- Can't DELETE."
  • Line Location: DELETEDC+4
Routine Call
  • DIE
  • Line Location:
    • REMOVE+4
    • REMOVE+16
    • DELETEDC+11
    • REMOVEDC+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925.1 - [#8925.1] ENV+14, ENV+19, ENV+21, FINDC+2, FINDC+4, FINDC+5, REMOVE+11, REMOVE+13, REMOVE+19, REMOVE+22
, DELETEDC+3, DELETEDC+13, REMOVEDC+2, REMOVEDC+5, REMOVEDC+11

Label References

Name Line Occurrences
$$FINDC POS001+3
DELETEDC REMOVE+26
REMOVE ENV+26
REMOVEDC DELETEDC+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFLT POS001+1~, POS001+3*, POS001+4
DIR POS001~
DIR("B" POS001+4*
DIR("S" POS001+2*
DUZ ENV+4
ERR REMOVE+1~, REMOVE+6, REMOVE+18, DELETEDC+1~, DELETEDC+12, REMOVEDC+4~, REMOVEDC+10
ERR("DIERR" REMOVE+8, REMOVE+20, DELETEDC+14, REMOVEDC+12
FDA REMOVE+1~, REMOVE+10!, DELETEDC+1~, REMOVEDC+4~
FDA( REMOVE+3*, REMOVE+15*, DELETEDC+9*, DELETEDC+10*, REMOVEDC+8*
FLAGS REMOVE+1~, REMOVE+3*, REMOVE+4, REMOVE+15*, REMOVE+16, DELETEDC+1~, DELETEDC+10*, DELETEDC+11
IENS REMOVE+1~, REMOVE+2*, REMOVE+3, REMOVE+14*, REMOVE+15, DELETEDC+1~, DELETEDC+8*, DELETEDC+9, DELETEDC+10, REMOVEDC+4~
, REMOVEDC+7*, REMOVEDC+8
TIUA FINDC+1~
TIUA( FINDC+8*
TIUA(1 FINDC+9
TIUC FINDC+1~*, FINDC+8*, FINDC+9
TIUD0 FINDC+3~, FINDC+5*, FINDC+6, FINDC+7
TIUDA ENV+1~, ENV+14*, ENV+15, ENV+19, ENV+26, FINDC+3~, FINDC+4*, FINDC+5, REMOVE~, REMOVE+2
, REMOVE+11, REMOVE+13, DELETEDC~, DELETEDC+3, DELETEDC+6, DELETEDC+8, DELETEDC+13, REMOVEDC~, REMOVEDC+2, REMOVEDC+5
, REMOVEDC+11
TIUDADA DELETEDC+1~, REMOVEDC+1~, REMOVEDC+2*, REMOVEDC+3, REMOVEDC+5, REMOVEDC+7, REMOVEDC+11
TIUDCDA ENV+16~, ENV+19*, ENV+20, ENV+21, ENV+26, REMOVE~, REMOVE+11, REMOVE+13, REMOVE+14, REMOVE+19
, REMOVE+22, REMOVE+24, REMOVE+26
TIUFPRIV ENV+16~*, REMOVE+1~, REMOVE+2*, DELETEDC+1~, DELETEDC+2*, REMOVEDC+4~*
TIUFWHO ENV+16~*, REMOVE+1~, REMOVE+2*, DELETEDC+1~, DELETEDC+2*, REMOVEDC+4~*
TIUI FINDC+1~*, FINDC+2*, FINDC+4
TIUKIDA REMOVEDC+4~, REMOVEDC+5*, REMOVEDC+6, REMOVEDC+7
TIUNM FINDC+3~, FINDC+7*, FINDC+8
TIUST FINDC+3~, FINDC+6*
TIUTDA REMOVE+1~, REMOVE+11*, REMOVE+12, REMOVE+14
TIUY ENV+5~*, ENV+11*, ENV+12, ENV+16~*, ENV+22*, ENV+24, FINDC+1~*, FINDC+9*, FINDC+10, REMOVE+23~
, REMOVE+25*, REMOVE+26
U ENV+21, FINDC+6, FINDC+7, REMOVE+13, REMOVE+19, DELETEDC+13, REMOVEDC+11
>> XPDABORT ENV+4, ENV+12*
>> XPDENV ENV+3
>> XPDQUIT ENV+24*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All