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

Package: Incident Reporting

Routine: QANOPEN


Information

QANOPEN ;GJC/HISC-Open Incident Case Report ;6/15/92

Source Information

Source file <QANOPEN.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 Y^DIQ  ^DIR  
Incident Reporting 1 DIV^QANRPT1  

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
Incident Reporting 1 QAN VIEW OPEN INCIDENT(S)  

Entry Points

Name Comments DBIA/ICR reference
TASK ;Call to ^%ZTLOAD
START ;
EXIT ;Close device
KILL ;Kill and quit
HDH ;End of Screen interface
HDR ;Standard header
INCD ;Incident data
OUT1 ;Output data/results
PAT ;Patient information
ZLOOP ;Ztsave variable for ^%ZTLOAD
DIV ;

External References

Name Field # of Occurrence
^%ZIS TASK+1
HOME^%ZIS EXIT+1
^%ZISC EXIT+1
^%ZTLOAD TASK+3
Y^DIQ START+5, INCD+8, INCD+9
^DIR HDH+1
DIV^QANRPT1 QANOPEN+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TASK+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: TASK+1
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Cancelled!"),!
  • Line Location: TASK+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!!!!?(IOM-$L(QANHD(3))\2),QANHD(3)
  • Line Location: START+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDH+2
Function Call: WRITE
  • Prompt: !,?63,"Date: ",?69,QANTDY,!?63,"Page: ",?69,QANPG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?(IOM-$L(QANHD(0))\2),QANHD(0)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?(IOM-$L(QANHD(1))\2),QANHD(1)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?(IOM-$L(QANHD(2))\2),QANHD(2)
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?(IOM-$L(QANHD(4))\2),QANHD(4)
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,QANLN
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!,"Case Number: ",$G(^TMP("QAN",$J,QAN0,"CASE")),?30,"Incident: ",$G(^TMP("QAN",$J,QAN0,"INCD"))
  • Line Location: OUT1+2
Function Call: WRITE
  • Prompt: !,"Date: ",$G(^TMP("QAN",$J,QAN0,"DATE")),?30,"Patient: ",$G(^TMP("QAN",$J,QAN0,QAN1,"PAT"))
  • Line Location: OUT1+3
Routine Call
  • %ZIS
  • Line Location:
    • TASK+1
Routine Call
  • %ZIS
  • Line Location:
    • EXIT+1
Routine Call
  • DIR
  • Line Location:
    • HDH+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" QANOPEN+7
^DD(742.4 START+5, INCD+8, INCD+9
^DPT - [#2] PAT+3, PAT+4
^QA(740 - [#740] DIV+2, DIV+3
^QA(742 - [#742] INCD+13, PAT+1
^QA(742.4 - [#742.4] QANOPEN+11, INCD+1
^TMP("QAN" START+2, START+4, START+10, START+12, KILL+4!, INCD+6*, INCD+10*, INCD+11*, INCD+12*, OUT1+2
, OUT1+3, PAT+5*

Label References

Name Line Occurrences
DIV INCD+5
EXIT TASK+3, START+2
HDH START+2, OUT1+1
HDR START+8, HDH+2
INCD QANOPEN+12
KILL QANOPEN+8, TASK+2
OUT1 START+12
PAT INCD+13
ZLOOP TASK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS TASK+1!*, KILL+1!
%ZIS("A" TASK+1*
C START+5*, KILL+1!, INCD+8*, INCD+9*
D KILL+1!
DIC KILL+1!
DIR KILL+1!, HDH+1!
DIR(0 HDH+1*
DIROUT KILL+3!
DIRUT KILL+3!
DT QANOPEN+7
DTOUT KILL+3!
DUOUT KILL+3!
IO START+1
IO("Q" TASK+3
IOF START+1, START+8, HDH+2
IOM QANOPEN+6, START+2, HDR+3, HDR+4, HDR+5, HDR+6
IOP TASK+1!
IOSL OUT1+1
IOST HDH+1
POP TASK+2, KILL+1!
QA KILL+1!, ZLOOP+1*
QAN0 START+9*, START+10*, START+12, KILL+1!, OUT1+2, OUT1+3
QAN1 START+11*, START+12*, KILL+1!, OUT1+3
>> QAN1DIV INCD+3
>> QANAA QANOPEN+9*, QANOPEN+11
>> QANBB DIV+1*, DIV+2*, DIV+3
QANCASE KILL+1!, INCD+7*, INCD+10
>> QANCC START+3*, START+4*, START+5, START+6, START+10
QANDATE KILL+1!, INCD+7*, INCD+9*, INCD+12
QANDFN KILL+1!, INCD+13*, PAT+1, PAT+5
>> QANDIV INCD+2*, INCD+3, INCD+4*, INCD+6, DIV+3, DIV+4*
>> QANDIVN START+5*, START+6*, START+7
>> QANDVFLG HDR+6, INCD+4, INCD+5
QANHD KILL+1!
QANHD(0 QANOPEN+2*, HDR+3
QANHD(1 QANOPEN+3*, HDR+4
QANHD(2 QANOPEN+4*, HDR+5
QANHD(3 QANOPEN+5*, START+2
QANHD(4 START+7*, HDR+6
QANIEN QANOPEN+10*, QANOPEN+11*, KILL+1!, INCD+1, INCD+6, INCD+10, INCD+11, INCD+12, INCD+13, PAT+5
QANINCD KILL+2!, INCD+7*, INCD+8*, INCD+11
QANLCS KILL+2!
QANLN QANOPEN+6*, KILL+2!, HDR+7
>> QANOK DIV+1*, DIV+2, DIV+3*, DIV+4, DIV+5*
QANPAT KILL+2!, PAT+3*, PAT+4*, PAT+5
QANPG QANOPEN+6*, KILL+2!, HDR+1*, HDR+2
>> QANPOP QANOPEN+8
QANPRS KILL+2!, PAT+2*, PAT+3
QANPT KILL+2!, PAT+2*, PAT+3, PAT+4
QANTDY QANOPEN+7*, KILL+2!, HDR+2
QANXIT QANOPEN+6*, START+12, KILL+2!, HDH+1*, OUT1+1
QANZER0 KILL+2!, PAT+1*, PAT+2
QANZERO KILL+3!, INCD+1*, INCD+2, INCD+7
QAQ KILL+3!, HDR+7*
U START+5, INCD+2, INCD+7, INCD+8, INCD+9, PAT+2, PAT+3
X KILL+3!
Y QANOPEN+7*, START+5*, KILL+3!, HDH+1, INCD+8*, INCD+9*
ZTDESC TASK+3*, KILL+3!
ZTRTN TASK+3*, KILL+3!
ZTSAVE KILL+3!
ZTSAVE( ZLOOP+1*
ZTSK TASK+3, KILL+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All