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

Package: Text Integration Utility

Routine: TIUP1012


Information

TIUP1012 ;IHS/MSC/MGH - After installing TIU*1*1012;30-Apr-2013 16:21;DU

Source Information

Source file <TIUP1012.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^DIC  (,FILE)^DIE  ^DIR  
Text Integration Utility 2 SETDATA^TIU1012D  (SETXTMP,TIUDUPS)^TIUE1012  
Kernel 1 ^%ZISC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Mods To Text Integration Utilities 1 BTIUP12  

Entry Points

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

External References

Name Field # of Occurrence
^%ZISC BEGIN+9
^DIC ADDITEM+18, CREATE+8
^DIE ADDITEM+27
FILE^DIE FILE+6
^DIR STOP+3
SETDATA^TIU1012D MAIN+16
SETXTMP^TIUE1012 MAIN+3
TIUDUPS^TIUE1012 MAIN+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option creates Document Definitions for patch 1012 "
  • Line Location: BEGIN+1
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Canceled!")
  • Line Location: BEGIN+6
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ^TMP("TIU1012",$J,TIUCNT),!
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: STOP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SETCONT+6
Routine Call
  • DIC
  • Line Location:
    • ADDITEM+18
    • CREATE+8
Routine Call
  • DIE
  • Line Location:
    • 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] ADDITEM+5
^TMP("TIU1012" 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+4!, PRINT+5, PRINT+7, ADDX+2*, ADDX+3*, ADDX+4*
, FILE+7*, FILE+8*
^XTMP("TIU1012" MAIN+2!, MAIN+12*, MAIN+18, MAIN+22, MAIN+24, MAIN+26!, MAIN+27!, MAIN+31, MAIN+33, MAIN+38!
, MAIN+41!, PARENT+5, PARENT+9, PARENT+13, 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
$$STOP SETCONT+4
ADDITEM MAIN+40
ADDX ADDITEM+5, ADDITEM+18
FILE MAIN+37
MAIN BEGIN+9
MAINX MAIN+11
PARENTX PARENT+7
PRINT MAINX+3
SETX SETCONT+3, SETCONT+4, SETCONT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D ADDITEM+23~
D0 ADDITEM+23~
DA ADDITEM+6~, ADDITEM+22~, ADDITEM+25*, CREATE+1~
DA(1 ADDITEM+8*, ADDITEM+9, ADDITEM+24*
DI ADDITEM+23~
DIC ADDITEM+6~, ADDITEM+9*, ADDITEM+25, CREATE+1~, CREATE+5*
DIC("S" CREATE+7*
DIC(0 ADDITEM+9*, CREATE+6*
DIE 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 ADDITEM+23~
DR ADDITEM+2~, ADDITEM+22~, ADDITEM+26*
FDA FILE+3~
FDA( FILE+5*
I ADDITEM+7~
IEN MAIN+19~, MAIN+22*, MAIN+23
IO BEGIN+9
IOF PRINT+3, STOP+5, SETCONT+6
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+5, PARENT+9, ADDITEM~, ADDITEM+4, ADDITEM+15, ADDITEM+20
, FILE~, FILE+5, CREATE~, CREATE+6, CREATE+7, CREATE+10
PIEN PARENT+1~, PARENT+5*, PARENT+7, PARENT+13*, PARENTX, ADDITEM+1~, ADDITEM+4*, ADDITEM+5!, ADDITEM+8, ADDITEM+18!
, ADDITEM+24, ADDX+1
PNUM PARENT+1~, PARENT+9*, PARENT+10, PARENT+13
SILENT MAIN+4~, MAIN+8*, MAIN+9
TIUCNT PRINT+1~, PRINT+4*, PRINT+5*, PRINT+7, PRINT+9*
TIUCONT PRINT+1~, PRINT+4*, PRINT+5, PRINT+6*, PRINT+8, 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 ADDITEM+1~, ADDITEM+3*, FILE+3~, FILE+4*, CREATE+1~, CREATE+2*
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 ADDITEM+6~, ADDITEM+15*, CREATE+1~, CREATE+6*
Y STOP+2~, STOP+4, ADDITEM+6~, ADDITEM+18, ADDITEM+25, CREATE+1~, CREATE+10, CREATE+11
YDDEF MAIN+19~, MAIN+29*, MAIN+30, MAIN+35
>> ZTQUEUED PRINT+2
>> ZTREQ PRINT+2*
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