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

Package: Text Integration Utility

Routine: TIULA3


Information

TIULA3 ; SLC/JER - Still more interactive functions ;1/31/08

Source Information

Source file <TIULA3.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Text Integration Utility 6 ($$ASKTYP,DOCSPICK)^TIULA2  $$PNAME^TIULC1  $$REQCOSIG^TIULP  $$ISDS^TIULX  $$PROVIDER^TIUPXAP1  $$READ^TIUU  
Kernel 2 $$UP^XLFSTR  $$ACTIVE^XUSER  
Authorization Subscription 1 ($$ISA,$$ISTERM)^USRLM  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Text Integration Utility 7 TIUCPFIX  TIUEPN7  TIUPEFIX  TIUROR  TIURPTTL  TIURS1  TIURTITL  
Order Entry Results Reporting 2 ORWTPN  ORWU1  

Entry Points

Name Comments DBIA/ICR reference
SCRATTX
RSLVTITL(TIUTTL) ; Resolve pointers to titles
DATENOTE(X) ; Ask for date/time of note
TITLE ; Title Look-up
SCRCSNR(TIUDA,Y) ; Evaluate whether a person may be selected to cosign
SCRATT(TIUDA,PERSON) ; Can a person be an Attending for a given docmt?
TITLPICK(TIUTYP,CLASS) ; Select multiple titles
ASKTITLE(CLASS,TIUTTL) ; Ask for a different title, same class
SCRDFCS(USER,Y) ; Screen Default Cosigner selection for USER
SCREENX
SCRDFX
ASKSEQ(TIUDFLT) ; Ask preferred sort sequence

External References

Name Field # of Occurrence
^%DT DATENOTE+5
$$ASKTYP^TIULA2 ASKTITLE+4
DOCSPICK^TIULA2 TITLPICK+7
$$PNAME^TIULC1 TITLE+8, TITLE+11, TITLPICK+2, TITLPICK+10
$$REQCOSIG^TIULP SCRCSNR+5, SCRCSNR+15, SCRATT+19
$$ISDS^TIULX SCRATT+10
$$PROVIDER^TIUPXAP1 SCRCSNR+9, SCRATT+14, SCRDFCS+8
$$READ^TIUU ASKSEQ+4
$$ISA^USRLM SCRATT+17
$$ISTERM^USRLM SCRATT+12
$$UP^XLFSTR TITLE+11, TITLPICK+2, TITLPICK+10
$$ACTIVE^XUSER SCRCSNR+7, SCRDFCS+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"For ",$$UP^XLFSTR($$PNAME^TIULC1(TIUCLASS)),": "
  • Line Location: TITLE+11
Function Call: WRITE
  • Prompt: !!,"Please Select the ",$$UP^XLFSTR($$PNAME^TIULC1(CLASS))
  • Line Location: TITLPICK+2
Function Call: WRITE
  • Prompt: " TITLES to search for:",!
  • Line Location: TITLPICK+3
Function Call: WRITE
  • Prompt: !,"There is only one TITLE under ",$$UP^XLFSTR($$PNAME^TIULC1(CLASS))
  • Line Location: TITLPICK+10
Function Call: WRITE
  • Prompt: !
  • Line Location: TITLPICK+13
Function Call: WRITE
  • Prompt: " ",$P(TIUY,U,2)
  • Line Location: DATENOTE+4
Function Call: WRITE
  • Prompt: !,$C(7),"Enter DATE AND TIME of the note [TIME REQUIRED] (future dates prohibited)."
  • Line Location: DATENOTE+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] SCRCSNR+2, SCRATT+3, SCRATT+4, SCRATT+8
^TIU(8925.1 - [#8925.1] TITLE+6, RSLVTITL+1, SCRATT+9
^TMP("TIUTYP" TITLE+2

Label References

Name Line Occurrences
$$RSLVTITL ASKTITLE+2
SCRATTX SCRATT+12, SCRATT+14, SCRATT+17
SCRDFX SCRDFCS+4
SCREENX SCRCSNR+5, SCRCSNR+7, SCRCSNR+9, SCRCSNR+11, SCRCSNR+13, SCRDFCS+6, SCRDFCS+8
TITLPICK TITLE+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATENOTE+1~, DATENOTE+5*
%DT(0 DATENOTE+5*
CANSEL SCRATT+1~, SCRATT+2*, SCRATT+12*, SCRATT+14*, SCRATT+17*, SCRATT+19*, SCRATTX
CLASS TITLPICK~, TITLPICK+2, TITLPICK+7, TITLPICK+10, ASKTITLE~, ASKTITLE+4
DFLT ASKTITLE+1~, ASKTITLE+2*, ASKTITLE+4
DICTDT SCRATT+1~, SCRATT+4*, SCRATT+5*, SCRATT+19
DT SCRCSNR+9, SCRATT+14, SCRDFCS+8
>> DTOUT TITLPICK+12
>> DUOUT TITLPICK+12
DUZ SCRCSNR+5, SCRDFCS+2
PERSON SCRATT~, SCRATT+2*, SCRATT+12, SCRATT+14, SCRATT+17, SCRATT+19
SCREEN ASKTITLE+1~, ASKTITLE+3*, ASKTITLE+4
TIUCLASS TITLE+1~, TITLE+6*, TITLE+8, TITLE+10*, TITLE+11, TITLE+12
TIUD0 SCRCSNR+1~, SCRCSNR+2*, SCRCSNR+5, SCRCSNR+15, SCRATT+1~, SCRATT+3*, SCRATT+7
TIUD12 SCRCSNR+1~, SCRCSNR+2*, SCRCSNR+11, SCRCSNR+13
TIUDA SCRCSNR~, SCRCSNR+2, SCRCSNR+5, SCRCSNR+15, SCRATT~, SCRATT+2*, SCRATT+3, SCRATT+4, SCRATT+19
TIUDFLT ASKSEQ~, ASKSEQ+1*, ASKSEQ+4
TIUI TITLE+1~*, TITLE+9*, TITLE+10, TITLPICK+1~*, TITLPICK+6*, SCRCSNR+1~
TIUISAD SCRATT+1~, SCRATT+7*, SCRATT+9*, SCRATT+10
TIUISDS SCRATT+1~, SCRATT+10*, SCRATT+14
TIUPD0 SCRATT+1~
TIUPICT TITLE+4, TITLE+7!, TITLE+8*
TIUPICT( TITLE+9, TITLE+10
TIUPICT(1 TITLE+5, TITLE+6, TITLE+8*
TIUPRMT TITLPICK+1~, TITLPICK+6*, TITLPICK+7, ASKSEQ+1~, ASKSEQ+2*, ASKSEQ+4
TIUPRNT SCRATT+1~, SCRATT+3*, SCRATT+8
TIUPTYP SCRATT+1~, SCRATT+7*, SCRATT+8*, SCRATT+9, SCRATT+10
>> TIUQUIT TITLPICK+12*
TIUSET ASKSEQ+1~, ASKSEQ+3*, ASKSEQ+4
TIUTTL ASKTITLE~, ASKTITLE+2, ASKTITLE+5, RSLVTITL~, RSLVTITL+1
TIUTYP TITLE+2*, TITLE+3, TITLE+13, TITLPICK~, TITLPICK+8*, TITLPICK+12, ASKTITLE+1~, SCRATT+1~, SCRATT+7*, SCRATT+9
, SCRATT+10, SCRATT+19
TIUTYP( TITLPICK+8*
TIUY ASKTITLE+1~, ASKTITLE+4*, ASKTITLE+5*, ASKTITLE+6, ASKSEQ+1~, ASKSEQ+4*, ASKSEQ+5, SCRCSNR+1~*, SCRCSNR+5*, SCRCSNR+7*
, SCRCSNR+9*, SCRCSNR+11*, SCRCSNR+13*, SCRCSNR+15*, SCREENX, SCRDFCS+1~*, SCRDFCS+4*, SCRDFCS+6*, SCRDFCS+8*, SCRDFX
TYPE TITLE+1~, TITLE+12, TITLE+13, TITLPICK+1~, TITLPICK+4, TITLPICK+5!, TITLPICK+7, TITLPICK+8, TITLPICK+11*, TITLPICK+12
TYPE(1 TITLPICK+8, TITLPICK+9
U TITLE+5, TITLE+6, TITLE+8, TITLE+10, TITLPICK+9, RSLVTITL+1, SCRCSNR+11, SCRCSNR+13, SCRATT+3, SCRATT+4
, SCRATT+9
USER SCRDFCS~, SCRDFCS+2*, SCRDFCS+4
X ASKTITLE+1~, DATENOTE~
Y TITLE+14*, ASKTITLE+1~, DATENOTE+1~, DATENOTE+6, DATENOTE+8, SCRCSNR~, SCRCSNR+5, SCRCSNR+7, SCRCSNR+9, SCRCSNR+11
, SCRCSNR+13, SCRCSNR+15, SCRDFCS~, SCRDFCS+4, SCRDFCS+6, SCRDFCS+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All