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

Package: Text Integration Utility

Routine: TIUDAEN


Information

TIUDAEN ; SLC/AJB - Disclosure of Adverse Event Note ; August 10, 2005

Source Information

Source file <TIUDAEN.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
EXIT
REM ;
LOOKUP(FILE,NAME,TYPE,SCREEN,PROMPT) ;
; file = file # to perform lookup on
; [name] = for instance lookups - required if type is missing
; [type] = for inquiries to file (eg: "AEQ") - required if name is missing
; [screen] = screen for lookup/inquiries
; [prompt] = replace default prompt
GETBOIL ;
BOILTXT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOCUON,@IOF
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!,"Installation Error: CLASS OWNER cannot be defined."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"Installation Error: DISCLOSURE OF ADVERSE EVENT NOTE already exists."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"Installation Aborted due to TIMEOUT."
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,"Installation Aborted by USER."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Installation Error: Invalid Selection",!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,"A DOCUMENT CLASS must be entered or '^' to abort."
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,"Creating DISCLOSURE OF ADVERSE EVENT NOTE title..."
  • Line Location: EN+22
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!
  • Line Location: EN+25
Function Call: WRITE
  • Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG)
  • Line Location: EN+26
Function Call: WRITE
  • Prompt: "DONE."
  • Line Location: EN+27
Function Call: WRITE
  • Prompt: !!,"Adding "_$P(^TIU(8925.1,TIUPRNT,0),U)_" as parent..."
  • Line Location: EN+30
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!
  • Line Location: EN+33
Function Call: WRITE
  • Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG)
  • Line Location: EN+34
Function Call: WRITE
  • Prompt: "DONE.",!
  • Line Location: EN+35
Function Call: WRITE
  • Prompt: !,"Adding boilerplate text..."
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!
  • Line Location: EN+42
Function Call: WRITE
  • Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG)
  • Line Location: EN+43
Function Call: WRITE
  • Prompt: "DONE.",!
  • Line Location: EN+44
Function Call: WRITE
  • Prompt: !,"*** The DISCLOSURE OF ADVERSE EVENT NOTE ***"
  • Line Location: EN+45
Function Call: WRITE
  • Prompt: !,"*** title must be activated before use. ***"
  • Line Location: EN+46
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1
Info |  Source |  Entry Points |  Interaction Calls