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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: QAOSCKEY

Package: Occurrence Screen

Routine: QAOSCKEY


Information

QAOSCKEY ;HISC/DAD-ALLOCATE/DEALLOCATE CLINICAL REVIEWER KEY ;11/9/92 10:38

Source Information

Source file <QAOSCKEY.m>

Entry Points

Name Comments DBIA/ICR reference
ASK ;
OK ;
ASKOK
DOIT ; Entry point from postinit: convert file #741.3
EXIT ;
HELP ;
HLP(QAOSLIST) ; DISPLAY CLINICAL REVIEWERS

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"*** The Clinical Reviewer key was not found !! ***",*7
  • Line Location: QAOSCKEY+4
Function Call: WRITE
  • Prompt: !!,"Checking for current holders of the Clinical Reviewer key"
  • Line Location: QAOSCKEY+7
Function Call: WRITE
  • Prompt: "."
  • Line Location: QAOSCKEY+9
Function Call: WRITE
  • Prompt: !,QAOCOUNT," found. "
  • Line Location: QAOSCKEY+15
Function Call: WRITE
  • Prompt: "Type a '?' to list their names."
  • Condition for execution: QAOCOUNT
  • Line Location: QAOSCKEY+15
Function Call: READ
  • Formatting: !!
  • Prompt: "Select CLINICAL REVIEWER: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: !!?3,"*** No Clinical Reviewers selected !! ***",*7
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !!,"Allocate / Deallocate Clinical Reviewer key"
  • Line Location: ASKOK+0
Function Call: WRITE
  • Prompt: !!?5,"Please answer Y(es) or N(o)"
  • Line Location: ASKOK+2
Function Call: WRITE
  • Prompt: !!,"Allocating key:"
  • Line Location: DOIT+1
Function Call: WRITE
  • Prompt: !?3,QAOSDUZ(0)
  • Line Location: DOIT+10
Function Call: WRITE
  • Prompt: !?3,"*** None ***"
  • Line Location: DOIT+13
Function Call: WRITE
  • Prompt: !!,"Deallocating key:"
  • Line Location: DOIT+14
Function Call: WRITE
  • Prompt: !?3,QAOSDUZ(0)
  • Line Location: DOIT+23
Function Call: WRITE
  • Prompt: !?3,"*** None ***"
  • Line Location: DOIT+26
Function Call: WRITE
  • Prompt: !!," Enter the name of a Clinical Reviewer to add to the list."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !," Enter a minus (-) Clinical Reviewer name to remove a name"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: " from the list."
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"Clinical Reviewers selected for key ALLOCATION:"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !!,"Clinical Reviewers selected for key DEALLOCATION:"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !?3,QAOSDUZ(0)
  • Line Location: HLP+6
Function Call: WRITE
  • Prompt: !?3,"*** None ***"
  • Line Location: HLP+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call