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 |  Local Variables  | All
Print Page as PDF
Routine: QANVAL

Package: Incident Reporting

Routine: QANVAL


Information

QANVAL ;;HISC/GJC-Utilities for Incident Reporting ;4/26/91

Source Information

Source file <QANVAL.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 (,IX)^DIC  MIX^DIC1  YN^DICN  ^DIE  ^DIR  
Incident Reporting 4 WARN^QANAUX1  ^QANCDNT  PAT0^QANUTL1  EN2^QANUTL2  
Quality Assurance Integration 1 ^QAQAUDIT  

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

Package Total Caller Graph
Incident Reporting 4 QAN INCIDENT FOLLOW-UP  QAN INCIDENT QUICK  QAN INCIDENT REPORT  QAN PATIENT MANIPULATION  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
CASE ;
DATE ;
EDIT
TYPE ;
PATMAN ;DELETING A PATIENT'S RECORD
K9
CLEAN ;Kill and quit.

External References

Name Field # of Occurrence
^DIC CASE+1
IX^DIC DATE+1, TYPE+1
MIX^DIC1 PATMAN+8
YN^DICN EN1+6, EN1+11
^DIE PATMAN+12
^DIR EDIT+2
WARN^QANAUX1 PATMAN+11
^QANCDNT EN1+8
PAT0^QANUTL1 EDIT+8
EN2^QANUTL2 EN1+10
^QAQAUDIT PATMAN+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !!?12,$C(7),"There exist "_QAN(0)_" open INCIDENT CASE(S) on the system.",!!
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !!?12,"There exists ZERO open INCIDENT CASE(S) on the system."
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !!,"Do you wish to create a new incident event record"
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !,$C(7),"Enter (Y)es, or (N)o, or ""^"" to quit."
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !!,"Do you wish to edit a particular open incident"
  • Line Location: EN1+11
Function Call: WRITE
  • Prompt: !!,"Enter (Y)es, (N)o, or ""^"" to exit"
  • Line Location: EN1+11
Function Call: WRITE
  • Prompt: !!,$C(7),"Case Number not selected, exiting!!"
  • Line Location: CASE+2
Function Call: WRITE
  • Prompt: !!,$C(7),"Date of Incident not selected, exiting!!"
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !!?16,$C(7),"Another person is editing this Incident Report."
  • Line Location: EDIT+7
Function Call: WRITE
  • Prompt: !!,$C(7),"Type of Incident not selected, exiting!!"
  • Line Location: TYPE+2
Routine Call
  • DIC
  • Line Location:
    • CASE+1
Routine Call
  • DIC
  • Line Location:
    • DATE+1
    • TYPE+1
Routine Call
  • DIE
  • Line Location:
    • PATMAN+12
Routine Call
  • DIR
  • Line Location:
    • EDIT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^QA(742 - [#742] Classic Fileman Calls
^QA(742.4 - [#742.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(742 - [#742] PATMAN+11, PATMAN+12
^QA(742.4 - [#742.4] EN1+3, EDIT+7, PATMAN+10
^UTILITY($J CLEAN+6!

Label References

Name Line Occurrences
@( EDIT+5
CLEAN EN1+9, EN1+13
EDIT EN1+9
EN1 EN1+12
K9 PATMAN+9, PATMAN+10, PATMAN+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN1+6*, EN1+7, EN1+8, EN1+11*, EN1+12, CLEAN+9!
%DT CLEAN+9!
%T CLEAN+9!
%W K9!, CLEAN+9!
%X K9!, CLEAN+9!
%Y K9!, CLEAN+9!
C K9!, CLEAN+1!
D DATE+1!*, TYPE+1!*, PATMAN+7*, CLEAN+1!
D0 K9!, CLEAN+1!
DA PATMAN+12*, K9!, CLEAN+1!
DI CLEAN+9!
DIC CASE+1!*, DATE+1!*, TYPE+1!*, PATMAN+5!*, PATMAN+8!, CLEAN+1!
DIC("A" CASE+1*, DATE+1*, TYPE+1*, PATMAN+5*
DIC("S" CASE+1*, DATE+1*, TYPE+1*, PATMAN+6*
DIC("W" CASE+1*, DATE+1*, TYPE+1*, PATMAN+7*
DIC(0 CASE+1*, DATE+1*, TYPE+1*, PATMAN+5*
DIE PATMAN+5*, PATMAN+12*, K9!, CLEAN+9!
DIR EDIT!, EDIT+2!, CLEAN+9!
DIR("?" EDIT+1*
DIR("A" EDIT*, EDIT+1*
DIR("B" EDIT+1*
DIR(0 EDIT+1*
DIROUT EDIT+3, CLEAN+8!
DIRUT CLEAN+9!
DISYS K9!
DQ CLEAN+9!
DR PATMAN+12*, K9!, CLEAN+9!
DTOUT EDIT+3, CLEAN+8!
DUOUT EDIT+3, CLEAN+8!
IOF EN1+3
J CLEAN+9!
MSSG0 CLEAN+1!
MSSG1 CLEAN+1!
MSSG2 CLEAN+1!
POP CLEAN+6!
QAHDNM CLEAN+10!
QAHDSSN CLEAN+10!
QAHOLD CLEAN+10!
QAN EN1+3*, EN1+5!, EN1+7!, K9!, CLEAN+1!
QAN(0 EN1+2*, EN1+3*, EN1+4
QANADM CLEAN+1!
QANADMDT CLEAN+1!
QANAFRM CLEAN+1!
QANAGE CLEAN+6!
QANAGN EN1+2*, EN1+6, EN1+7, EN1+8, EN1+12*, CLEAN+6!
QANAME CLEAN+1!
QANBFLG EN1+1~, EN1+2*, EDIT+7
QANCHK CLEAN+2!
QANCODE CLEAN+2!
QANCS CLEAN+7!
QANDED CLEAN+8!
QANDFN EN1+10, CLEAN+2!
QANDGPM CLEAN+2!
QANDOB CLEAN+6!
QANDT CLEAN+2!
QANDUZ CLEAN+2!
QANEOP CLEAN+7!
QANF EN1+8*, CLEAN+2!
QANFFLG EN1+1~, EN1+2*, EN1+8*
QANFLAG CLEAN+2!
QANFLAG(0 EN1+2*, EN1+8*, EN1+9
QANGLB0 CLEAN+8!
QANHEAD CLEAN+7!
QANHOLD CLEAN+6!
QANHOME CLEAN+2!
QANIC CLEAN+9!
QANIEN EN1+3*, EN1+5!, EN1+7!, EN1+10, CASE+3*, DATE+3*, EDIT+7, TYPE+3*, CLEAN+3!
QANINC CLEAN+3!
QANINCD PATMAN+10*, PATMAN+11, K9!
QANINCR CLEAN+3!
QANINPAT CLEAN+3!
QANINS CLEAN+7!
QANINV CLEAN+3!
QANIRIN CLEAN+8!
QANLCTN CLEAN+8!
QANLINE CLEAN+7!
QANMAIL CLEAN+3!
QANMIEN CLEAN+3!
QANOUT EN1+2*, CLEAN+3!
QANPAGE CLEAN+7!
QANPAT PATMAN+8*, PATMAN+9, PATMAN+10, PATMAN+11, PATMAN+12, PATMAN+13, K9!, CLEAN+5!
QANPID CLEAN+4!
QANPIEN CLEAN+4!
QANPLC CLEAN+3!
QANPRS CLEAN+10!
QANPSDO CLEAN+5!
QANPT CLEAN+9!
QANPT0 CLEAN+9!
QANPTST PATMAN+12*, PATMAN+13, K9+1!
QANQAN CLEAN+6!
QANRSP0 CLEAN+7!
QANRSP1 CLEAN+7!
QANSERV CLEAN+5!
QANSITE CLEAN+4!
QANSSN K9!, CLEAN+4!
QANST K9!, CLEAN+4!
QANST1 CLEAN+4!
QANSTAT CLEAN+7!
QANTRSP CLEAN+4!
QANTTL CLEAN+5!
QANTYPE EDIT+4*, EDIT+5, EDIT+8, CLEAN+5!
QANWARD CLEAN+4!
QANX CLEAN+5!
QANXIT EN1+2*, EN1+8, EN1+9, CASE+2*, DATE+2*, EDIT+3*, EDIT+6, EDIT+7*, EDIT+8, TYPE+2*
, CLEAN+5!
QANXX PATMAN+7*, K9!
QANYN CLEAN+6!, CLEAN+9!
QANZER0 CLEAN+5!
QANZERO CLEAN+5!
QAUDIT PATMAN+13!, K9+1!, CLEAN+8!
QAUDIT("ACTION" PATMAN+13*
QAUDIT("COMMENT" PATMAN+13*
QAUDIT("DA" PATMAN+13*
QAUDIT("FILE" PATMAN+13*
U PATMAN+12
VAERR CLEAN+8!
VAIN CLEAN+8!
X K9!, CLEAN+4!
X1 CLEAN+4!
X2 CLEAN+4!
Y CASE+2, CASE+3, DATE+2, DATE+3, EDIT+4, TYPE+2, TYPE+3, PATMAN+8, K9+1!, CLEAN+9!
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 |  Local Variables  | All