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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: TIUP146

Package: Text Integration Utility

Routine: TIUP146


Information

TIUP146 ;SLC/RMO - Post-Install for TIU*1*146 ;9/9/02@09:51:20

Source Information

Source file <TIUP146.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 (,$$S)^%ZTLOAD  ($$FMADD,$$NOW)^XLFDT  
Text Integration Utility 1 MAIL^TIUP146P  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point to queue a job to identify documents linked to a
EN1 ;Entry point to identify documents pointing to a different patient's
SETXTMP(TIUDA,TIUVSIT) ;Set ^XTMP for entries processed
; Input -- TIUDA TIU Document file (#8925) IEN
; TIUVSIT VIsit file (#9000010) IEN
; Output -- Set ^XTMP("TIUP146","EX",TIUDA)=TIUVSIT
ENDBI ;Entry point to remove documents pointing to a visit of IEN=1

External References

Name Field # of Occurrence
^%ZTLOAD EN+11
$$S^%ZTLOAD EN1+35
MAIL^TIUP146P EN1+41
$$FMADD^XLFDT EN1+13
$$NOW^XLFDT EN1+18, EN1+38, EN1+39

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"PATCH TIU*1*146"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Search ALL entries in the TIU Document file (#8925) to identify"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"documents linked to a different patient's visit.",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"A task has been queued in the background and a bulletin will be sent"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"to you upon completion of the task or if the task is stopped."
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !!,"The task number is "_$G(ZTSK)_"."
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !,"Killing entries in ^XTMP(""TIUP146"",""EX"" that point to Visit IEN=1..."
  • Line Location: ENDBI+3
Function Call: WRITE
  • Prompt: !?1,C," ",$S(C=1:"entry",1:"entries")," removed."
  • Line Location: ENDBI+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] EN1+28
^TIU(8925 - [#8925] EN1+22
^XTMP("TIUP146" EN1+7, EN1+8, EN1+11!, EN1+13*, EN1+14*, EN1+15*, EN1+16*, EN1+17!, EN1+18*, EN1+29*
, EN1+32*, EN1+38*, EN1+39*, EN1+43*, SETXTMP+4*, SETXTMP+5*, ENDBI+5, ENDBI+7!

Label References

Name Line Occurrences
SETXTMP EN1+28

Naked Globals

Name Field # of Occurrence
^( EN1+22, ENDBI+5
^(0 EN1+22, EN1+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C ENDBI+2~, ENDBI+4*, ENDBI+6, ENDBI+8*, ENDBI+9
DT EN1+13
TIUD0 EN1+4~, EN1+22*, EN1+24, EN1+25
TIUDA EN1+4~, EN1+21*, EN1+22*, EN1+28, EN1+32, SETXTMP~, SETXTMP+4, ENDBI+2~, ENDBI+4*, ENDBI+5*
, ENDBI+7
TIUDFN EN1+4~, EN1+24*, EN1+28
TIURSTDA EN1+4~, EN1+8*, EN1+21, EN1+44!
TIUVSIT EN1+4~, EN1+25*, EN1+28, SETXTMP~, SETXTMP+4
U EN1+13, EN1+24, EN1+25, EN1+28
ZTDESC EN+2~, EN+10*
ZTIO EN+2~, EN+9*
ZTRTN EN+2~, EN+9*
ZTSAVE EN+2~
ZTSAVE("DUZ" EN+9*
ZTSK EN+2~, EN+12, EN+15
>> ZTSTOP EN1+22, EN1+35*, EN1+38, EN1+43
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All