Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls