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
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls