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

Package: Text Integration Utility

Routine: TIUPS137


Information

TIUPS137 ; SLC/MAM - After installing TIU*1*137;6/26/03

Source Information

Source file <TIUPS137.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  XREF^XQORM  
VA FileMan 3 ^DIC  (,FILE)^DIE  ^DIR  
Text Integration Utility 2 SETDATA^TIU137D  (SETXTMP,TIUDUPS)^TIUEN137  
Authorization Subscription 1 MAIN^USRPS23  

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

Package Total Caller Graph
Kernel 1 ^DIC(19  
Text Integration Utility 1 TIU137 DDEFS & RULES, ANATPATH  

Entry Points

Name Comments DBIA/ICR reference
BEGIN ; Create DDEFS
MAIN ; Create DDEFS for Laboratory Reports
; -- Check for dups created after the install but before this option:
MAINX ;Exit
PRINT ; Print out results
PRINTX
STOP() ;on screen paging check
; quits TIUCONT=1 if cont. ELSE quits TIUCONT=0
SETCONT() ; D form feed, Set TIUCONT
SETX
SERIAL ; Serialize Menu Items of Class Clinical Documents
PARENT(NUM) ; Return IEN of parent new DDEF should be added to
PARENTX
ADDITEM(NUM,TIUDA,TMPCNT)
ADDX ; -- Tell user about adding to parent:
FILE(NUM,TIUDA,TMPCNT) ; File fields for new entry TIUDA
; Files ALL FIELDS set in "FILEDATA" nodes of ^XTMP:
; ^XTMP("TIU137","FILEDATA",NUM,Field#)
CREATE(NUM) ; Create new DDEF entry

External References

Name Field # of Occurrence
^%ZIS BEGIN+3
HOME^%ZIS BEGIN+9
^%ZISC BEGIN+10
^%ZTLOAD BEGIN+7
^DIC ADDITEM+18, CREATE+8
^DIE SERIAL+8, ADDITEM+27
FILE^DIE FILE+6
^DIR STOP+3
SETDATA^TIU137D MAIN+16
SETXTMP^TIUEN137 MAIN+3
TIUDUPS^TIUEN137 MAIN+9
MAIN^USRPS23 MAINX+3
XREF^XQORM SERIAL+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option creates Document Definitions, a User Class, and"
  • Line Location: BEGIN+1
Function Call: WRITE
  • Prompt: !,"Business Rules for Laboratory Reports."
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Canceled!")
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ^TMP("TIU137",$J,TIUCNT),!
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ^TMP("USR23",$J,TIUCNT),!
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: STOP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SETCONT+6
Routine Call
  • %ZIS
  • Line Location:
    • BEGIN+3
Routine Call
  • %ZIS
  • Line Location:
    • BEGIN+9
Routine Call
  • DIC
  • Line Location:
    • ADDITEM+18
    • CREATE+8
Routine Call
  • DIE
  • Line Location:
    • SERIAL+8
    • ADDITEM+27
Routine Call
  • DIE
  • Line Location:
    • FILE+6
Routine Call
  • DIR
  • Line Location:
    • STOP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925.1 - [#8925.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925.1 - [#8925.1] SERIAL+7, ADDITEM+5
^TMP("TIU137" MAIN+2!, MAIN+5*, MAIN+6*, MAIN+7*, MAIN+13*, MAIN+14*, MAIN+24*, MAIN+25*, MAIN+31*, MAIN+32*
MAIN+33*, MAIN+34*, MAINX+1*, MAINX+2*, MAINX+5!, PRINT+5, PRINT+7, ADDX+2*, ADDX+3*, ADDX+4*
, FILE+7*, FILE+8*
^TMP("USR23" MAINX+5!, PRINT+10, PRINT+12
^XTMP("TIU137" MAIN+2!, MAIN+12*, MAIN+18, MAIN+22, MAIN+24, MAIN+26!, MAIN+27!, MAIN+31, MAIN+33, MAIN+38!
MAIN+41!, MAINX+3, PARENT+6, PARENT+10, PARENT+14, ADDITEM+15, ADDITEM+20, FILE+5, CREATE+6, CREATE+7
, CREATE+10*

Label References

Name Line Occurrences
$$CREATE MAIN+29
$$PARENT ADDITEM+4
$$SETCONT PRINT+6, PRINT+11
$$STOP SETCONT+4
ADDITEM MAIN+40
ADDX ADDITEM+5, ADDITEM+18
FILE MAIN+37
MAIN BEGIN+10
MAINX MAIN+11
PARENTX PARENT+8
PRINT MAINX+4
SERIAL ADDX+7
SETX SETCONT+3, SETCONT+4, SETCONT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS BEGIN+3*
D SERIAL+2~, ADDITEM+23~
D0 SERIAL+2~, ADDITEM+23~
DA SERIAL+2~, SERIAL+5*, SERIAL+7*, ADDITEM+6~, ADDITEM+22~, ADDITEM+25*, CREATE+1~
DA(1 SERIAL+5*, ADDITEM+8*, ADDITEM+9, ADDITEM+24*
DI SERIAL+2~, ADDITEM+23~
DIC ADDITEM+6~, ADDITEM+9*, ADDITEM+25, CREATE+1~, CREATE+5*
DIC("S" CREATE+7*
DIC(0 ADDITEM+9*, CREATE+6*
DIE SERIAL+2~, SERIAL+6*, ADDITEM+2~, ADDITEM+22~, ADDITEM+25*
DIR STOP+2~
DIR(0 STOP+3*
DIY ADDITEM+7~
DLAYGO ADDITEM+6~, ADDITEM+10*, CREATE+1~, CREATE+5*
DQ SERIAL+2~, ADDITEM+23~
DR SERIAL+2~, SERIAL+8*, ADDITEM+2~, ADDITEM+22~, ADDITEM+26*
FDA FILE+3~
FDA( FILE+5*
I ADDITEM+7~
IEN MAIN+19~, MAIN+22*, MAIN+23
IO BEGIN+10
IO("Q" BEGIN+4!
IOF PRINT+3, STOP+5, SETCONT+6
IOP BEGIN+3!
IOSL SETCONT+3, SETCONT+5
IOST PRINT+3, SETCONT+3, SETCONT+4
MENUTXT ADDITEM+1~, ADDITEM+20*, ADDITEM+21
NUM MAIN+17~*, MAIN+18*, MAIN+22, MAIN+24, MAIN+26, MAIN+27, MAIN+29, MAIN+31, MAIN+33, MAIN+37
MAIN+38, MAIN+40, MAIN+41, PARENT~, PARENT+6, PARENT+10, ADDITEM~, ADDITEM+4, ADDITEM+15, ADDITEM+20
ADDX+7, FILE~, FILE+5, CREATE~, CREATE+6, CREATE+7, CREATE+10
ORULT SERIAL+12~
PIEN PARENT+1~, PARENT+6*, PARENT+8, PARENT+14*, PARENTX, ADDITEM+1~, ADDITEM+4*, ADDITEM+5!, ADDITEM+8, ADDITEM+18!
, ADDITEM+24, ADDX+1
PNUM PARENT+1~, PARENT+10*, PARENT+11, PARENT+14
POP BEGIN+3!
SILENT MAIN+4~, MAIN+8*, MAIN+9
TIUCNT PRINT+1~, PRINT+4*, PRINT+5*, PRINT+7, PRINT+9*, PRINT+10*, PRINT+12
TIUCONT PRINT+1~, PRINT+4*, PRINT+5, PRINT+6*, PRINT+8, PRINT+10, PRINT+11*, STOP+2~, STOP+4*, STOP+5
, STOP+6, SETCONT+1~, SETCONT+2*, SETCONT+4*, SETX
TIUDA MAIN+19~, MAIN+35*, MAIN+37, MAIN+40, ADDITEM~, ADDITEM+5, ADDITEM+17, FILE~, FILE+5
TIUDUPS MAIN+4~, MAIN+9, MAIN+11
TIUERR FILE+3~, FILE+7
TIUFISCR ADDITEM+1~, ADDITEM+17*
TIUFPRIV SERIAL+4~, SERIAL+5*, ADDITEM+1~, ADDITEM+3*, FILE+3~, FILE+4*, CREATE+1~, CREATE+2*
TIUI SERIAL+4~, SERIAL+5*, SERIAL+8*
TMPCNT MAIN+4~*, MAIN+5*, MAIN+6*, MAIN+7*, MAIN+13*, MAIN+14*, MAIN+24*, MAIN+25*, MAIN+31*, MAIN+32*
MAIN+33*, MAIN+34*, MAIN+37, MAIN+40, MAINX+1*, MAINX+2*, ADDITEM~, ADDX+2*, ADDX+3*, ADDX+4*
, FILE~, FILE+7*, FILE+8*
U MAIN+30, ADDITEM+18, CREATE+10
X SERIAL+2~, SERIAL+12~, ADDITEM+6~, ADDITEM+15*, CREATE+1~, CREATE+6*
XQORM SERIAL+12~, SERIAL+13*
Y STOP+2~, STOP+4, SERIAL+2~, SERIAL+12~, ADDITEM+6~, ADDITEM+18, ADDITEM+25, CREATE+1~, CREATE+10, CREATE+11
YDDEF MAIN+19~, MAIN+29*, MAIN+30, MAIN+35
ZTDESC BEGIN+6*, BEGIN+8!
ZTDTH BEGIN+8!
ZTIO BEGIN+8!
>> ZTQUEUED PRINT+2
>> ZTREQ PRINT+2*
ZTRTN BEGIN+5*, BEGIN+8!
ZTSAVE BEGIN+8!
ZTSK BEGIN+7, BEGIN+8!
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 |  Local Variables  | All