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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: TIUPRDS

Package: Text Integration Utility

Routine: TIUPRDS


Information

TIUPRDS ; SLC/SBW - Print Form 10-1000 Discharge Summaries ; 6/9/04

Source Information

Source file <TIUPRDS.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Text Integration Utility 3 $$ISADDNDM^TIULC1  EXTRACT^TIULQ  PRINT^TIUPRDS1  

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 TIURE  

Entry Points

Name Comments DBIA/ICR reference
WRITE(TIUFLAG) ; Writes form 10-1000 data to screen or paper.
DEVICE ; Device handling
; Call with: ZTRTN
NOQUE
QUE ; Queue output
ENTRY ; Entry point to print queued discharge summary

External References

Name Field # of Occurrence
^%ZIS DEVICE+4, QUE+6
^%ZISC NOQUE+1, QUE+5
^%ZTLOAD QUE+4
$$ISADDNDM^TIULC1 ENTRY+14
EXTRACT^TIULQ ENTRY+15
PRINT^TIUPRDS1 ENTRY+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Cancelled!")
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: !,"No Document Record Specified.",$C(7)
  • Line Location: ENTRY+6
Function Call: WRITE
  • Prompt: !,$P(TIUERR,U,2)
  • Line Location: ENTRY+16
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+4
    • QUE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] ENTRY+13
^TMP("TIULQ" ENTRY+2!, ENTRY+17, ENTRY+19!
^TMP("TIUPR" ENTRY+6, ENTRY+9, ENTRY+10, ENTRY+12, ENTRY+19!

Label References

Name Line Occurrences
@( NOQUE
QUE DEVICE+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUE+1~, QUE+2*
%I WRITE+1~
%T WRITE+1~
%Y WRITE+1~
%ZIS DEVICE+2~, DEVICE+4*
%ZIS("B" DEVICE+3*
D0 ENTRY+1~
DIROUT ENTRY+1~, ENTRY+10, ENTRY+12
DIRUT ENTRY+1~
DN ENTRY+1~
DTOUT ENTRY+1~
DUOUT ENTRY+1~
IO ENTRY+5
IO("Q" DEVICE+6, QUE+2!
ION DEVICE+5, QUE+3
IOP DEVICE+2~, QUE+6*
POP WRITE+1~, DEVICE+4
TIU0 ENTRY+1~, ENTRY+13*, ENTRY+14
TIUDA ENTRY+11~*, ENTRY+12*, ENTRY+13, ENTRY+14*, ENTRY+15, ENTRY+18, ENTRY+19
>> TIUDEV DEVICE+3, DEVICE+5*
TIUERR ENTRY+1~, ENTRY+15, ENTRY+16
TIUFLAG WRITE~, ENTRY+18
TIUI ENTRY+1~, ENTRY+10*, ENTRY+12, ENTRY+19
TIUINI ENTRY+1~, ENTRY+3*
TIUJ ENTRY+1~, ENTRY+9*, ENTRY+10, ENTRY+12, ENTRY+19
U ENTRY+14, ENTRY+16
Y ENTRY+1~
ZTDESC QUE+3*, QUE+5!
ZTDTH QUE+1~, QUE+5!
ZTIO QUE+1~, QUE+3*, QUE+5!
>> ZTQUEUED ENTRY+4
>> ZTREQ ENTRY+4*
ZTRTN WRITE+1~, WRITE+2*, NOQUEQUE+2, QUE+5!
ZTSAVE QUE+1~, QUE+2!, QUE+5!
ZTSAVE( QUE+2*
ZTSK QUE+1~, QUE+4, QUE+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All