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 ; 19-AUG-2002 13:10:05

Source Information

Source file <TIUPREF.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIK  
Authorization Subscription 1 $$ISA^USRLM  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Mods To Text Integration Utilities 1 BTIUPREF  
Text Integration Utility 1 TIU PERSONAL PREFERENCES  

Entry Points

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

External References

Name Field # of Occurrence
^DIC GETREC+7
^DIE EDIT+4, EDIT+6
^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
  • DIE
  • Line Location:
    • EDIT+4
    • EDIT+6
Routine Call
  • DIC
  • Line Location:
    • GETREC+7

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+7, GOODLOC+8
^TIU(8925.95 - [#8925.95] REQCOS+3, REQCOS+5, REQCOS+6
^TIU(8926 - [#8926] EDIT+3
^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
ASKNEW GETREC+1~
CLINIC GOODLOC+2~, GOODLOC+8*, GOODLOC+9
DA MAIN+1~, MAIN+2*, MAIN+3, MAIN+4, GETREC+9~, GETREC+11*, EDIT~, EDIT+3
DIC GETREC+1~, GETREC+2*
DIC("S" GETREC+3*
DIC(0 GETREC+2*
DIE EDIT+1~, EDIT+2*
DIK GETREC+9~, GETREC+11*
DLAYGO GETREC+1~, GETREC+2*
DR EDIT+1~, EDIT+4*, EDIT+5*
DR(2 EDIT+6*
DT GOODLOC+3, GOODLOC+6
DUZ GETREC+4, GETREC+9, EDIT+2, REQCOS~, REQCOS+7
GOODLOC GOODLOC+2~*, GOODLOC+9*, GOODLOC+10
INACTIVE GOODLOC+2~*, GOODLOC+4*, GOODLOC+6*, GOODLOC+9
LOC GOODLOC~, GOODLOC+3, GOODLOC+7, GOODLOC+8, EDIT+1~, EDIT+3*, EDIT+4
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
X GETREC+1~, GETREC+4*
Y GETREC+1~, GETREC+9, GETREC+11*, GETREC+12
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