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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: TIUP134P

Package: Text Integration Utility

Routine: TIUP134P


Information

TIUP134P ; SLC/JAK,RMO - Post-Install for TIU*1*134 Cont.;7/8/02@13:15:47

Source Information

Source file <TIUP134P.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
VA FileMan 3 NOW^%DTC  EN^DIQ1  ^DIR  
MailMan 1 ^XMD  
Registration 1 OERR^VADPT  
Text Integration Utility 1 $$DATE^TIULS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Text Integration Utility 1 TIUP134  

Entry Points

Name Comments DBIA/ICR reference
PRINT ; -- Device Selection
PRINTQ
LIST ; -- Entry point to generate list
LISTQ
LISTONE(TIUDA,TIULNK) ;Entry point to list one record
; Input -- TIUDA TIU Document file (#8925) IEN
; TIULNK 1st piece= 1=Linked and 0=Not Linked
; 2nd piece= Exception type if not linked
; 3rd piece= Visit file (#9000010) IEN if linked
; Output -- None
LISTONEQ
ASK ; -- End of Page
HDR ; -- Header for report
MAIL ;Send completion message to user who initiated post-install

External References

Name Field # of Occurrence
NOW^%DTC HDR+2
^%ZIS PRINT+5
HOME^%ZIS PRINT+11
^%ZISC PRINT+12
^%ZTLOAD PRINT+9
EN^DIQ1 LISTONE+18
^DIR ASK+3
$$DATE^TIULS LISTONE+14
OERR^VADPT LISTONE+10
$$FMTE^XLFDT MAIL+8, MAIL+9, MAIL+12, MAIL+25
^XMD MAIL+31

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This routine will print ALL records processed to date by the"
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,"auto-link routine independent of the date range selected at"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,"processing time."
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!,*7,"This report requires a column width of 132.",!
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request queued",1:"Request Cancelled!")
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !?4,"No records in list."
  • Line Location: LIST+4
Function Call: WRITE
  • Prompt: !,$E($G(VADM(1)),1,20)_" ("_$G(VA("BID"))_")"
  • Line Location: LISTONE+11
Function Call: WRITE
  • Prompt: ?30,TIUDA
  • Line Location: LISTONE+12
Function Call: WRITE
  • Prompt: ?42,$E($P($G(^TIU(8925.1,+$G(^TIU(8925,+TIUDA,0)),0)),U,1),1,10)
  • Line Location: LISTONE+13
Function Call: WRITE
  • Prompt: ?53,$$DATE^TIULS(+$P($G(^TIU(8925,+TIUDA,13)),U,1),"MM/DD/CCYY HR:MIN")
  • Line Location: LISTONE+14
Function Call: WRITE
  • Prompt: ?70,$E($G(TIUVISIT(9000010,DA,.22,"E")),1,15)
  • Line Location: LISTONE+19
Function Call: WRITE
  • Prompt: ?86,$G(TIUVISIT(9000010,DA,.01,"E"))
  • Line Location: LISTONE+20
Function Call: WRITE
  • Prompt: ?109,"Yes-Visit #"_$P(TIULNK,U,3)
  • Line Location: LISTONE+21
Function Call: WRITE
  • Prompt: ?109,"No-"
  • Line Location: LISTONE+23
Function Call: WRITE
  • Prompt: $S(TIUEX=1:"Multiple Visits",TIUEX=2:"Entry in Use",TIUEX=3:"No Matching Visit",1:"")
  • Line Location: LISTONE+24
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: @IOF,"TIU*1*134 AUTO-LINK MISSING VISIT TO DOCUMENT LIST - Printed: ",TIUNOW
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Patient",?30,"Document #",?42,"Title",?53,"Reference Date",?70,"Visit Location",?86,"Visit Date/Time",?109,"Linked"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: LNE
  • Line Location: HDR+5
Routine Call
  • DIR
  • Line Location:
    • ASK+3
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+5
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSIT - [#9000010] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+2
^TIU(8925 - [#8925] LISTONE+8, LISTONE+13, LISTONE+14
^TIU(8925.1 - [#8925.1] LISTONE+13
^XTMP("TIUP134" LIST+4, LIST+6, MAIL+8, MAIL+9, MAIL+12, MAIL+15, MAIL+17, MAIL+18, MAIL+19, MAIL+20
, MAIL+22, MAIL+24, MAIL+25

Label References

Name Line Occurrences
ASK LISTONE+7
HDR LIST+3, LISTONE+7
LIST PRINT+12
LISTONE LIST+6
LISTONEQ LISTONE+7
LISTQ LIST+4
PRINTQ PRINT+5

Naked Globals

Name Field # of Occurrence
^( LIST+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDR+2
%ZIS PRINT+5*, PRINT+10!
DA LISTONE+16~, LISTONE+17*, LISTONE+19, LISTONE+20
DFN LISTONE+6~, LISTONE+8*
DIC LISTONE+16~, LISTONE+17*
DIQ LISTONE+16~, LISTONE+17*
DIQ(0 LISTONE+17*
DIR ASK+2~
DIR(0 ASK+2*
DR LISTONE+16~, LISTONE+18*
>> DTOUT ASK+3
>> DUOUT ASK+3
DUZ MAIL+4
IO PRINT+12, ASK+1
IO("Q" PRINT+6!
IO(0 ASK+1
IOF HDR+3
IOM HDR+5
IOSL LISTONE+7
IOST ASK+1
LNE HDR+1~, HDR+5*
POP PRINT+5!
TIUDA LIST+1~, LIST+5*, LIST+6*, LISTONE~, LISTONE+8, LISTONE+12, LISTONE+13, LISTONE+14
TIUEX LISTONE+6~, LISTONE+9*, LISTONE+24
TIULNK LIST+1~, LIST+6*, LISTONE~, LISTONE+9, LISTONE+15, LISTONE+17, LISTONE+21
TIUNOW HDR+1~, HDR+2*, HDR+3
TIUOUT LIST+1~*, LIST+6, LISTONE+7, ASK+3*
TIURNG MAIL+2~, MAIL+12*, MAIL+13, MAIL+30
TIUTXT MAIL+2~
TIUTXT(1 MAIL+5*
TIUTXT(10 MAIL+16*
TIUTXT(11 MAIL+17*
TIUTXT(12 MAIL+18*
TIUTXT(13 MAIL+19*
TIUTXT(14 MAIL+20*
TIUTXT(15 MAIL+21*
TIUTXT(16 MAIL+22*
TIUTXT(17 MAIL+23*
TIUTXT(18 MAIL+25*, MAIL+27*
TIUTXT(19 MAIL+28*
TIUTXT(2 MAIL+6*
TIUTXT(20 MAIL+29*
TIUTXT(3 MAIL+7*
TIUTXT(4 MAIL+8*
TIUTXT(5 MAIL+9*
TIUTXT(6 MAIL+10*
TIUTXT(7 MAIL+13*
TIUTXT(8 MAIL+14*
TIUTXT(9 MAIL+15*
TIUVISIT LISTONE+16~
TIUVISIT(9000010 LISTONE+19, LISTONE+20
U LISTONE+8, LISTONE+9, LISTONE+13, LISTONE+14, LISTONE+15, LISTONE+17, LISTONE+21, MAIL+12
VA LISTONE+6~
VA("BID" LISTONE+11
VADM LISTONE+6~
VADM(1 LISTONE+11
VAIN LISTONE+6~
VAIP LISTONE+6~
X ASK+2~
XMDUZ MAIL+1~, MAIL+3*
XMMG MAIL+1~
XMSUB MAIL+1~, MAIL+30*
XMTEXT MAIL+1~, MAIL+30*
XMY MAIL+1~
XMY( MAIL+3*, MAIL+4*
XMZ MAIL+1~
Y ASK+2~, HDR+2*
ZTDESC PRINT+8*, PRINT+10!
ZTDTH PRINT+10!
ZTIO PRINT+10!
>> ZTQUEUED LIST+2
>> ZTREQ LIST+2*
ZTRTN PRINT+7*, PRINT+10!
ZTSK PRINT+9, PRINT+10!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All