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

Package: Patient Representative

Routine: QACKEY


Information

QACKEY ;HISC/DAD,CEW - Allocate/Deallocate Patient Representative key ;2/10/95 09:42

Source Information

Source file <QACKEY.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 5 ^DIC  (FILE,YN)^DICN  DQ^DICQ  ^DIK  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Representative 1 QAC KEY  

Entry Points

Name Comments DBIA/ICR reference
ASK ;
OK ;
ASKOK
DOIT ;
EXIT ;
HELP ;
HLP(QACLIST) ; Display Patient Representatives

External References

Name Field # of Occurrence
^DIC QACKEY+6, ASK+5
FILE^DICN DOIT+9
YN^DICN ASKOK+1
DQ^DICQ HELP+8
^DIK DOIT+21
^DIR HELP+7, HLP+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking for current holders of the ",QACKEY(1)
  • Line Location: QACKEY+9
Function Call: WRITE
  • Prompt: "."
  • Line Location: QACKEY+11
Function Call: WRITE
  • Prompt: !,QACCOUNT," found. "
  • Line Location: QACKEY+17
Function Call: WRITE
  • Prompt: "Type a '?' to list their names."
  • Condition for execution: QACCOUNT
  • Line Location: QACKEY+17
Function Call: READ
  • Formatting: !!
  • Prompt: "Select PATIENT REPRESENTATIVE: "
  • 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 Patient Reps. selected !! ***",*7
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !!,"Allocate / Deallocate ",QACKEY(1)
  • 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,QACDUZ(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,QACDUZ(0)
  • Line Location: DOIT+23
Function Call: WRITE
  • Prompt: !?3,"*** None ***"
  • Line Location: DOIT+26
Function Call: WRITE
  • Prompt: !!," Enter the name of a Patient Representative to add to the list."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !," Enter a minus (-) Patient Representative name to remove a name"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: " from the list."
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"Patient Reps. selected for key ALLOCATION:"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !!,"Patient Reps. selected for key DEALLOCATION:"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !?3,QACDUZ(0)
  • Line Location: HLP+6
Function Call: WRITE
  • Prompt: !?3,"*** None ***"
  • Line Location: HLP+10
Routine Call
  • DIC
  • Line Location:
    • QACKEY+6
    • ASK+5
Routine Call
  • DIR
  • Line Location:
    • HELP+7
    • HLP+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19.1 - [#19.1] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J QACKEY+8!, QACKEY+13*, ASK+9, ASK+10*, ASK+11!, ASK+14*, ASK+15!, OK+1, DOIT+2, DOIT+4
, DOIT+15, DOIT+17, EXIT+3!, HLP+3, HLP+5, HLP+7
^VA(200 - [#200] QACKEY+11, DOIT+6, DOIT+9, DOIT+18
^XUSEC( QACKEY+10

Label References

Name Line Occurrences
ASK ASK+4, ASK+5, ASK+7, ASK+17
ASKOK ASKOK+2
EXIT QACKEY+6, ASK+2, OK+1, ASKOK+1
HELP ASK+4
HLP HELP+4, HELP+5
OK ASK+2

Naked Globals

Name Field # of Occurrence
^(0 DOIT+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASKOK+1*, ASKOK+2, EXIT+1!
D EXIT+1!, HELP+8*
DA DOIT+19*, EXIT+1!
DA(1 DOIT+7*, DOIT+19*
DD DOIT+5!, EXIT+1!
DIC QACKEY+2!*, QACKEY+6!, ASK+5*!, DOIT+5!, DOIT+7*, EXIT+1!, HELP+8*
DIC("A" QACKEY+4*
DIC("S" QACKEY+3*
DIC("W" QACKEY+5*
DIC(0 QACKEY+2*, ASK+5*, DOIT+8*, HELP+8*
DIDEL DOIT+19*, EXIT+1!
DIK DOIT+20*, EXIT+1!
DINUM DOIT+5!, DOIT+8*, EXIT+1!
DIR EXIT+1!, HELP+7!, HLP+1~, HLP+7!
DIR(0 HELP+7*, HLP+7*
DLAYGO DOIT+8*, EXIT+1!
DO DOIT+5!, EXIT+1!
DTIME ASK+1
DZ EXIT+1!, HELP+8*
IOSL HLP+7
QACCOUNT QACKEY+8*, QACKEY+14*, QACKEY+17, EXIT+2!
QACDUZ QACKEY+10*, QACKEY+11, QACKEY+13, ASK+6*, ASK+9, ASK+10, ASK+11, ASK+14, ASK+15, DOIT+4*
, DOIT+6, DOIT+7, DOIT+9, DOIT+17*, DOIT+18, DOIT+19, DOIT+20, EXIT+2!, HLP+1~, HLP+5*
, HLP+7
QACDUZ(0 ASK+6*, ASK+7, ASK+9, ASK+10, ASK+11, ASK+14, ASK+15, DOIT+3*, DOIT+4*, DOIT+10
, DOIT+16*, DOIT+17*, DOIT+23, HLP+4*, HLP+5*, HLP+6, HLP+7
QACKEY QACKEY+6*, DOIT+8, DOIT+9, DOIT+18, EXIT+2!
QACKEY(0 QACKEY+6*, QACKEY+10
QACKEY(1 QACKEY+7*, QACKEY+9, ASKOK
QACLINE EXIT+2!, HLP+1~, HLP+4*, HLP+7*
QACLIST EXIT+2!, HLP~, HLP+2*, HLP+3, HLP+5, HLP+7
QACSD1 DOIT+18*, DOIT+19, EXIT+2!
QADELETE ASK+3*, ASK+8, EXIT+1!
U QACKEY+6, QACKEY+7
X QACKEY+11*, QACKEY+12, QACKEY+13, ASK+1*, ASK+2, ASK+3*, ASK+4, DOIT+8*, EXIT+2!, HELP+6
, HLP+1~
Y QACKEY+6, ASK+5, ASK+6, EXIT+2!, HELP+7, HLP+1~, HLP+4*, HLP+5
Y(0 QACKEY+7, ASK+6
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