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

Package: Occurrence Screen

Routine: QAOEDT3


Information

QAOEDT3 ;HISC/DAD-BASIC OCCURRENCE SCREEN DATA EDIT ;6/11/93 15:45

Source Information

Source file <QAOEDT3.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Occurrence Screen 2 EN2^QAOEDT  ENDISP^QAOUTL0  
Quality Assurance Integration 1 ^QAQAUDIT  
VA FileMan 1 ^DIE  

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
Occurrence Screen 1 QAOS EDIT OCCURRENCE  

Entry Points

Name Comments DBIA/ICR reference
EN2 ; *** BASIC OS DATA
EXIT ;
EN3 ; MAIN LOOP
EDIT
AUDIT
21
22
23
RESET

External References

Name Field # of Occurrence
^DIE EDIT, EDIT+6, RESET+3
EN2^QAOEDT EN2+1
ENDISP^QAOUTL0 EN3+1
^QAQAUDIT AUDIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!?5,"You cannot enter an occurrence date after the date of death "
  • Line Location: 22+3
Function Call: WRITE
  • Prompt: Y,".",*7
  • Line Location: 22+4
Function Call: WRITE
  • Prompt: *7
  • Line Location: 23+0
Function Call: WRITE
  • Prompt: !!?5,"You cannot enter more than one death for the same patient.",*7
  • Line Location: 23+1
Function Call: WRITE
  • Prompt: !?5,"Resetting the occurrence date and screen to their original values.",!
  • Line Location: RESET+0
Routine Call
  • DIE
  • Line Location:
    • EDIT
    • EDIT+6
    • RESET+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" 22+4
^QA(741 - [#741] EN3+2, EDIT+1, 21+2, 22
^QA(741.1 - [#741.1] EDIT+2

Label References

Name Line Occurrences
21 EDIT+3
22 21+2
23 EDIT+3
AUDIT EDIT+3
EDIT EDIT+4
RESET 22+4, 23+2

Naked Globals

Name Field # of Occurrence
^("SCRN" EN3+2, EDIT+1, 22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+1!
DA EXIT+1!, EDIT*, EDIT+5*, RESET+1*
DIC EXIT+1!
DIE EXIT+1!, EDIT*, EDIT+5*, RESET+1*
DR EXIT+1!, EDIT!*, EDIT+5!*, RESET+1!, RESET+2*
I EXIT+1!
LINE EXIT+1!
LOC EXIT+1!
QA EXIT+1!, 21+1*, 21+2
QADATE EXIT+1!
QALIMIT EN2+1*, EXIT+1!
QAOPCENT EXIT+1!
QAORESET EXIT+3!, EN3+1*, EDIT+4, 21*, RESET+3*
QAOS EXIT+1!
QAOS109 EXIT+3!, EDIT+2*, 21+2, 22+1
QAOSD0 EXIT+1!, EN3+2, EDIT, EDIT+1, EDIT+5, AUDIT, RESET+1
QAOSDATE EXIT+2!, EXIT+3!, AUDIT+2!, 21+2*
QAOSDATE(0 EN3+3*, 21+1, RESET+2
QAOSDATE(1 EDIT+1*, 21+1, 22+2
QAOSDEAD EXIT+2!, AUDIT+2!, 21*, 22+1*, 22+2, 22+4
QAOSDEAD(0 EDIT+3, 21*, 22+1*, 22+2*
QAOSDFN EXIT+3!, EN3+3*, AUDIT+2!, 21+2
QAOSIEN EXIT+3!, AUDIT+2!, 21+2*, 22
QAOSONE EXIT+3!
QAOSPROG EN2+1*, EXIT+3!
QAOSQUIT EXIT+2!, EN3+1*, EDIT*, EDIT+3, EDIT+4*, EDIT+6*
QAOSSCRN EXIT+2!, EXIT+3!, AUDIT+2!
QAOSSCRN(0 EN3+2*, RESET+2
QAOSSCRN(1 EDIT+1*
QAOSWHAT EXIT+2!, EN3+1*
QAOSWHO EXIT+2!
QAUDIT EXIT+2!
QAUDIT("ACTION" AUDIT*
QAUDIT("COMMENT" AUDIT+1*
QAUDIT("DA" AUDIT*
QAUDIT("FILE" AUDIT*
X EXIT+2!, EN3+2*, EN3+3, 22*, 22+1
Y EXIT+2!, EDIT, EDIT+6, 21~, 22*, 22+1, 22+4*, 23~
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