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

Package: Surgery

Routine: SROAMIS


Information

SROAMIS ;BIR/MAM - ANESTHESIA AMIS REPORT ;11/26/07

Source Information

Source file <SROAMIS.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Surgery 6 PRINT^SROAMIS1  ^SROPRIN  ^SROSTOP  DATE^SROUTL  ($$INST,$$MANDIV)^SROUTL0  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 C^%DTC  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROAMIS  

Entry Points

Name Comments DBIA/ICR reference
SET ; get anesthesia info from ^SRF(SRDFN,6
END
HDR ; print heading
DEAD ; check for death within 24 hrs.
1 ; entry when queued
EN ; entry for SROAMIS option
UTL ; set up ^TMP("SROAMIS",$J
DATE
PTR

External References

Name Field # of Occurrence
C^%DTC DEAD+1
^%ZIS PTR
^%ZISC END+1
^%ZTLOAD PTR+1
^DIR EN+2
PRINT^SROAMIS1 1+6
^SROPRIN SET+1
^SROSTOP HDR+1
DATE^SROUTL DATE
$$INST^SROUTL0 DATE+1
$$MANDIV^SROUTL0 1+5
^SRSKILL END+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,!,?57,"ANESTHESIA SERVICE",?100,"REVIEWED BY: ",!,?58,"ANESTHESIA AMIS",?100,"DATE REVIEWED: "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!!!!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?38,"ANESTHETICS ADMINISTERED BY PRINCIPAL TECHNIQUE USED",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"TOTAL NO OF ANES- | | | | | |"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"THETICS ADMINISTERED | GENERAL | MAC | SPINAL | EPIDURAL | OTHER | LOCAL",!
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF,!,"Anesthesia AMIS",!!,"This report is no longer available.",!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!!,"This report is designed to use a 132 column format, and must be run",!,"on a printer.",!!
  • Line Location: DATE+2
Routine Call
  • DIR
  • Line Location:
    • EN+2
Routine Call
  • %ZIS
  • Line Location:
    • PTR

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" 1+1, 1+2
^DPT - [#2] UTL+4
^SRF - [#130] UTL+1, UTL+2, UTL+4, SET+1, SET+2, DEAD+1, 1+5
^SRF("AC" 1+4
^TMP("SROAMIS" UTL+6*, UTL+7*, UTL+8*, END!, 1+1!, 1+3*
^TMP("SRTN" UTL+5, END!, DEAD+2*, 1+1!

Label References

Name Line Occurrences
DEAD UTL+5
END EN+2, DATE, DATE+1, PTR, PTR+1, 1+6, 1+7
HDR 1+6
PTR PTR
SET 1+5
UTL SET+3

Naked Globals

Name Field # of Occurrence
^( UTL+4, UTL+6*, UTL+7*, UTL+8*, DEAD+1
^(31 UTL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS PTR!*
%ZIS("A" PTR*
>> DEATH UTL+2*, UTL+4*, UTL+5*, UTL+6, UTL+7, UTL+8, DEAD+1*, DEAD+2
>> DFN UTL+4*, UTL+5, DEAD+2
DIR EN+2!
DIR(0 EN+2*
DT 1+1
>> EDATE DATE, 1+2, 1+4
I HDR+4*, HDR+5*, HDR+7*, 1+3*!
IO 1+1
IO("Q" PTR!, PTR+1!
IOF HDR+2, END, END+1, EN+1
IOM HDR+4, HDR+5, HDR+7
IOP PTR!
IOST END, PTR
>> OPDATE DEAD+1*
>> OPONE DEAD+1*
POP PTR!
>> PRIN UTL+1*, UTL+3, UTL+7, UTL+8
>> PROC UTL+2*, UTL+7, UTL+8
>> S(0 UTL+4*
>> SDATE DATE, 1+2
>> SRCNT SET+1*, SET+2
>> SRD DATE*, 1+4
>> SRDFN UTL+1, UTL+2, UTL+4, SET+1, DEAD+1, 1+4*, 1+5
SRFRTO HDR+3, 1+1~, 1+2*
>> SRHALT HDR+1
>> SRINST HDR+2, DATE+1*
SRINSTP DATE+1~*, 1+5
>> SRPRINT HDR+3, 1+1*
>> SRSOUT HDR+1*, DATE, 1+1*, 1+6
>> SRT SET+1*, SET+2*
SRTECH SET+1!, SET+2*, SET+3
SRTN SET+1*, SET+2, SET+3!
>> SRZ SET+1*
>> TECH UTL+3*, UTL+6, SET+3*
U DATE+1
>> X DEAD+1
>> X1 DEAD+1*
>> X2 DEAD+1*
>> Y 1+1*, 1+2*
>> Z 1+4*
>> ZTDESC PTR+1*
>> ZTQUEUED HDR+1, END
>> ZTREQ END*
>> ZTRTN PTR+1*
>> ZTSAVE("EDATE" PTR+1*
>> ZTSAVE("SDATE" PTR+1*
>> ZTSAVE("SRD" PTR+1*
>> ZTSAVE("SRINST" PTR+1*
>> ZTSAVE("SRINSTP" PTR+1*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All