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

Package: Occurrence Screen

Routine: QAOSPAD0


Information

QAOSPAD0 ;HISC/DAD-ADVERSE FINDINGS REPORT ;6/11/93 15:54

Source Information

Source file <QAOSPAD0.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Occurrence Screen 1 ^QAOSPAD1  
Quality Assurance Integration 1 (,K)^QAQDATE  

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

Package Total Caller Graph
Occurrence Screen 2 QAOS RPT ADVERSE FINDINGS  QAOSXTRN  

Entry Points

Name Comments DBIA/ICR reference
ASK
ENTSK ;
EXIT ;
LOOP1 ;
SETUTIL

External References

Name Field # of Occurrence
^%ZIS ASK+3
^%ZISC EXIT+1
^%ZTLOAD ASK+3
^QAOSPAD1 ENTSK+3
^QAQDATE ASK+2
K^QAQDATE EXIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Do you want the report to include the (N)ames/(C)odes of the ATTENDING PHYSICIAN",!,"RESIDENT/PROVIDER, MEDICAL TEAM, and ATTRIBUTIONs, or none (X) of the above?",!
  • Line Location: QAOSPAD0+2
Function Call: READ
  • Formatting: !
  • Prompt: "CHOOSE (N/C/X): N// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!?3,"Enter 'N' to get Names",!?3," 'C' to get Codes",!?3," 'X' to print neither names or codes",!
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1
Routine Call
  • %ZIS
  • Line Location:
    • ASK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(49 - [#49] LOOP1+12
^DPT - [#2] LOOP1+11
^QA(741 - [#741] ENTSK+2, LOOP1+1, LOOP1+2, LOOP1+4, LOOP1+5
^QA(741.1 - [#741.1] LOOP1+11
^QA(741.2 - [#741.2] ENTSK+1
^QA(741.6 - [#741.6] ENTSK+1, LOOP1+6
^QA(741.93 - [#741.93] LOOP1+15
^TMP($J ENTSK+1!, SETUTIL*
^VA(200 - [#200] LOOP1+15

Label References

Name Line Occurrences
ASK ASK+1
EXIT ASKASK+2, ASK+3
LOOP1 ENTSK+2
SETUTIL LOOP1+13, LOOP1+14

Naked Globals

Name Field # of Occurrence
^("SCRN" LOOP1+1
^(0 LOOP1+11, LOOP1+12, LOOP1+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EXIT+2!
%ZIS ASK+3!*, EXIT+2!
ATTEND EXIT+2!, LOOP1+13*, LOOP1+14*, LOOP1+15*, SETUTIL
D EXIT+2!
DATE EXIT+2!, LOOP1+11*, SETUTIL
DH EXIT+2!
DI EXIT+2!
DM EXIT+2!
DTIME ASK
FIND EXIT+2!, LOOP1+3!, LOOP1+6*, LOOP1+7, LOOP1+9*, LOOP1+10*, SETUTIL
FIND( LOOP1+7*
FIND(12 LOOP1+3*, LOOP1+9
FIND(13 LOOP1+3*, LOOP1+9
I EXIT+2!
IO ENTSK+3
>> IO("Q" ASK+3
LOC EXIT+2!
PAGE EXIT+2!
PAT EXIT+2!, LOOP1+11*, SETUTIL
POP ASK+3, EXIT+2!
PROV EXIT+2!, LOOP1+13*, LOOP1+14*, LOOP1+15*, SETUTIL
PT EXIT+2!
QAOSCHOS ASK*, EXIT+2!, LOOP1+13, LOOP1+14
QAOSCLIN ENTSK+1*, EXIT+2!, LOOP1+2
QAOSD0 ENTSK+2*, EXIT+2!, LOOP1+1, LOOP1+2, LOOP1+4, LOOP1+5, SETUTIL
QAOSD1 EXIT+2!, LOOP1+4*, LOOP1+5
QAOSDT ENTSK+2*, EXIT+2!
QAOSEXCP ENTSK+1*, EXIT+2!, LOOP1+2
QAOSPEER ENTSK+1*, EXIT+2!, LOOP1+4
QAOSQUIT EXIT+2!
QAOSZERO EXIT+2!, LOOP1+1*, LOOP1+11, LOOP1+12, LOOP1+14
>> QAQNBEG ENTSK+2
>> QAQNEND ENTSK+2
>> QAQQUIT ASK+2
SCRN EXIT+2!, LOOP1+1*, LOOP1+11*, SETUTIL
SERV EXIT+2!, LOOP1+12*, SETUTIL
SRV EXIT+2!
SSN EXIT+2!, LOOP1+11*, SETUTIL
STATUS EXIT+2!, LOOP1+1*, LOOP1+12*, SETUTIL
TEAM EXIT+2!, LOOP1+13*, LOOP1+14*, LOOP1+15*, SETUTIL
TODAY EXIT+2!
UNDL EXIT+2!
X ASK*, ASK+1, EXIT+2!, LOOP1+5*, LOOP1+6
Y EXIT+2!, LOOP1+2*
Z EXIT+2!
ZTDESC ASK+3*, EXIT+2!
>> ZTQUEUED EXIT+3
>> ZTREQ EXIT+3*
ZTRTN ASK+3*, EXIT+2!
ZTSAVE EXIT+2!
ZTSAVE("QAOS*" ASK+3*
ZTSAVE("QAQ*" ASK+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All