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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: QAOEDT0P

Package: Occurrence Screen

Routine: QAOEDT0P


Information

QAOEDT0P ;HISC/DAD-PEER REVIEW LEVEL EDIT ;2/3/93 15:57

Source Information

Source file <QAOEDT0P.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  YN^DICN  ^DIE  
Occurrence Screen 1 (CHKACT,RESET)^QAOEDT0  

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 QAOEDT0  

Entry Points

Name Comments DBIA/ICR reference
REVLEV
FINDING ;
ACTION ;
ATTRIB ;
AGAIN
EXIT ;

External References

Name Field # of Occurrence
^DIC AGAIN+4
YN^DICN ATTRIB+2
^DIE REVLEV+2, REVLEV+6, FINDING+3, ACTION+5, ACTION+8, AGAIN+8
CHKACT^QAOEDT0 ACTION+6
RESET^QAOEDT0 REVLEV+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Since the findings have been changed, you must review the actions.",!?5,"Delete any old actions that no longer apply, and add new actions that",!?5,"are now appropriate."
  • Line Location: ACTION+1
Function Call: WRITE
  • Prompt: !!?5,"Do you wish to enter peer attributions"
  • Line Location: ATTRIB+1
Function Call: WRITE
  • Prompt: !!?10,"Enter Y(es) to edit the individual, medical team, and"
  • Line Location: ATTRIB+4
Function Call: WRITE
  • Prompt: !?10,"hospital location attribution data."
  • Line Location: ATTRIB+5
Function Call: WRITE
  • Prompt: !?10,"Enter N(o) to skip the attribution edit."
  • Line Location: ATTRIB+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ATTRIB+10
Routine Call
  • DIC
  • Line Location:
    • AGAIN+4
Routine Call
  • DIE
  • Line Location:
    • REVLEV+2
    • REVLEV+6
    • FINDING+3
    • ACTION+5
    • ACTION+8
    • AGAIN+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(741 - [#741] REVLEV, REVLEV+3, FINDING+1, FINDING+4, ACTION+2, ATTRIB+9, ATTRIB+13
^QA(741.6 - [#741.6] FINDING+6

Label References

Name Line Occurrences
AGAIN AGAIN+9
ATTRIB ATTRIB+3
EXIT REVLEV+2, REVLEV+6, FINDING+3, ACTION+5, ACTION+8, ATTRIB+2
REVLEV REVLEV+4

Naked Globals

Name Field # of Occurrence
^(0 ACTION+2*, ATTRIB+13*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ATTRIB+2*, ATTRIB+3
>> D0 REVLEV+2*, REVLEV+6*, FINDING+3*, ACTION+4*, ACTION+8*, AGAIN+6*
>> D1 REVLEV+2*, REVLEV+6*, FINDING+3*, ACTION+4*, ACTION+8*, AGAIN+6*
DA REVLEV+2*, REVLEV+6*, FINDING+3*, ACTION+4*, ACTION+8*, AGAIN!, AGAIN+6*
DA(1 REVLEV+2*, REVLEV+6*, FINDING+3*, ACTION+4*, ACTION+8*, AGAIN+3*, AGAIN+6*
DIC AGAIN!, AGAIN+1*, AGAIN+6
DIC("S" AGAIN+2*
DIC(0 AGAIN+1*
DIE REVLEV+1*, REVLEV+5*, FINDING+2*, ACTION+3*, ACTION+7*, AGAIN!, AGAIN+6*
>> DLAYGO AGAIN+3*
DR REVLEV+1!*, REVLEV+5!*, FINDING+2!*, ACTION+3!, ACTION+4*, ACTION+7!*, AGAIN!, AGAIN+7*
>> DTOUT AGAIN+5
>> DUOUT AGAIN+5
>> QAOFIELD ATTRIB+10*, ATTRIB+11, ATTRIB+12
>> QAOS FINDING+6*, FINDING+7
>> QAOSD0 REVLEV, REVLEV+1, REVLEV+2, REVLEV+3, REVLEV+5, REVLEV+6, FINDING+1, FINDING+2, FINDING+3, FINDING+4
, ACTION+2, ACTION+3, ACTION+4, ACTION+7, ACTION+8, ATTRIB+9, ATTRIB+13, AGAIN+1, AGAIN+3, AGAIN+6
>> QAOSD1 REVLEV, REVLEV+2, REVLEV+3, REVLEV+6, FINDING+1, FINDING+3, FINDING+4, ACTION+2, ACTION+4, ACTION+8
, ATTRIB+9, AGAIN+4*, AGAIN+6
>> QAOSFDSP FINDING+7*
>> QAOSFDSP("F" FINDING+7
>> QAOSFIND(1 FINDING+1*, FINDING+5
>> QAOSFIND(2 FINDING+4*, FINDING+5, FINDING+6
>> QAOSNEWF REVLEV*, FINDING+5*, ACTION+1
>> QAOSNODE ATTRIB+12*, ATTRIB+13, AGAIN+1
>> QAOSQUIT REVLEV*, FINDING+7*, ACTION+4, ATTRIB+10, AGAIN+5*
>> QAOSREVR(0 REVLEV*, REVLEV+4
>> QAOSREVR(1 REVLEV+3*, REVLEV+4
>> QAOSSERV ATTRIB+9*, AGAIN+7
>> QAOSUBDD ATTRIB+11*, ATTRIB+13, AGAIN+3
>> Y REVLEV+2, REVLEV+6, FINDING+3, ACTION+5, ACTION+8, AGAIN+4, AGAIN+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All