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

Package: Text Integration Utility

Routine: TIUPREF


Information

TIUPREF ;SLC/JER - Enter/edit personal preferences ;Apr 06, 2021@09:31:02

Source Information

Source file <TIUPREF.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ^DIK  
Authorization Subscription 1 $$ISA^USRLM  

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

Package Total Caller Graph
Kernel 1 ^DIC(19  
Order Entry Results Reporting 1 ORWTIU  
Text Integration Utility 1 TIU PERSONAL PREFERENCES  

Entry Points

Name Comments DBIA/ICR reference
GOODLOC(LOC) ; Returns 1 if ^SC hospital location IFN LOC is good, else 0
; Used in TIUVSIT, in DDs for LOCATION field of 8926
MAIN ; Control branching
GETREC() ; Get record in picklist file
EDIT(DA) ; Call ^DIE to edit the record
REQCOS(DUZ) ; Does user require cosignature for any documents
REQDFLD(VAL,ACTION,INPUT) ;Load or Save Template Required Fields Preferences

External References

Name Field # of Occurrence
^DIC GETREC+7
FILE^DICN REQDFLD+26
^DIE EDIT+4, EDIT+6, REQDFLD+18
^DIK GETREC+11
$$ISA^USRLM REQCOS+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Enter/edit Personal Preferences"
  • Line Location: GETREC+5
Function Call: WRITE
  • Prompt: !!?5,TIUNM
  • Line Location: GETREC+6
Function Call: WRITE
  • Prompt: !!," Sorry, you can edit preferences for YOURSELF only. Please try again."
  • Line Location: GETREC+10
Function Call: WRITE
  • Prompt: !," Your default location is no longer valid and has been deleted.",!," Please choose a new one."
  • Line Location: EDIT+4
Routine Call
  • DIC
  • Line Location:
    • GETREC+7
Routine Call
  • DIE
  • Line Location:
    • EDIT+4
    • EDIT+6
    • REQDFLD+18

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] GOODLOC+3, GOODLOC+6, GOODLOC+7, GOODLOC+8
^TIU(8925.95 - [#8925.95] REQCOS+3, REQCOS+5, REQCOS+6
^TIU(8926 - [#8926] EDIT+3, REQDFLD+12, REQDFLD+13, REQDFLD+20, REQDFLD+32, REQDFLD+34
^VA(200 - [#200] GETREC+4

Label References

Name Line Occurrences
$$GETREC MAIN+2
$$GOODLOC EDIT+4
$$REQCOS EDIT+2
EDIT MAIN+4

Naked Globals

Name Field # of Occurrence
^("I" GOODLOC+3, GOODLOC+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION REQDFLD~, REQDFLD+4, REQDFLD+30
ASKNEW GETREC+1~
CLINIC GOODLOC+2~, GOODLOC+8*, GOODLOC+9
COLOR REQDFLD+1~, REQDFLD+5~, REQDFLD+9*, REQDFLD+15*, REQDFLD+36*, REQDFLD+38
D0 REQDFLD+21~
DA MAIN+1~, MAIN+2*, MAIN+3, MAIN+4, GETREC+9~, GETREC+11*, EDIT~, EDIT+3, REQDFLD+1~, REQDFLD+12*
, REQDFLD+13, REQDFLD+20
DATA REQDFLD+31~, REQDFLD+34*, REQDFLD+35, REQDFLD+36, REQDFLD+37
DIC GETREC+1~, GETREC+2*, REQDFLD+21~, REQDFLD+22*
DIC("DR" REQDFLD+24*
DIC("S" GETREC+3*
DIC(0 GETREC+2*, REQDFLD+23*
DIE EDIT+1~, EDIT+2*, REQDFLD+14~, REQDFLD+16*
DIK GETREC+9~, GETREC+11*
DLAYGO GETREC+1~, GETREC+2*
DR EDIT+1~, EDIT+4*, EDIT+5*, REQDFLD+14~, REQDFLD+17*
DR(2 EDIT+6*
DT GOODLOC+3, GOODLOC+6
DUZ GETREC+4, GETREC+9, EDIT+2, REQCOS~, REQCOS+7, REQDFLD+3, REQDFLD+12, REQDFLD+25, REQDFLD+32
GOODLOC GOODLOC+2~*, GOODLOC+9*, GOODLOC+10
HILITEON REQDFLD+1~, REQDFLD+5~, REQDFLD+7*, REQDFLD+8*, REQDFLD+35*, REQDFLD+38
IEN REQDFLD+31~, REQDFLD+32*, REQDFLD+33, REQDFLD+34
INACTIVE GOODLOC+2~*, GOODLOC+4*, GOODLOC+6*, GOODLOC+9
INPUT REQDFLD~, REQDFLD+6, REQDFLD+7, REQDFLD+9, REQDFLD+10
LOC GOODLOC~, GOODLOC+3, GOODLOC+6, GOODLOC+7, GOODLOC+8, EDIT+1~, EDIT+3*, EDIT+4
NAVLOC REQDFLD+1~, REQDFLD+5~, REQDFLD+10*, REQDFLD+11*, REQDFLD+37*, REQDFLD+38
OOS GOODLOC+2~, GOODLOC+7*, GOODLOC+9
TIUC REQCOS+1~, REQCOS+6*, REQCOS+7
TIUCLASS EDIT+1~
TIUI REQCOS+1~*, REQCOS+3*, REQCOS+5, REQCOS+6
TIUJ REQCOS+1~, REQCOS+4*, REQCOS+5*, REQCOS+6
TIUNM GETREC+1~, GETREC+4*, GETREC+6
TIUREQCS EDIT+1~, EDIT+2*
TIUY REQCOS+1~*, REQCOS+3, REQCOS+5, REQCOS+7*, REQCOS+8
U GOODLOC+6, GOODLOC+8, GETREC+4, GETREC+11, EDIT+3, REQDFLD+7, REQDFLD+9, REQDFLD+10, REQDFLD+35, REQDFLD+36
, REQDFLD+37, REQDFLD+38
VAL REQDFLD~, REQDFLD+2*, REQDFLD+3*, REQDFLD+6*, REQDFLD+19*, REQDFLD+27*, REQDFLD+28*, REQDFLD+29*, REQDFLD+38*, REQDFLD+39*
X GETREC+1~, GETREC+4*, REQDFLD+21~, REQDFLD+25*
Y GETREC+1~, GETREC+9, GETREC+11*, GETREC+12, REQDFLD+21~, REQDFLD+27
Y(0 GETREC+9
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