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

Package: Surgery

Routine: SROSCH2


Information

SROSCH2 ;B'HAM ISC/MAM - QUEUE SCHEDULE TO ALL LOCATIONS ; [ 07/27/98 2:33 PM ]

Source Information

Source file <SROSCH2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Surgery 3 PRINT^SROBLOD  (ASK,CON)^SROSCH1  $$SPIN^SRTOVRF  
Kernel 2 ^%ZIS  ^%ZTLOAD  

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
Surgery 2 SROSCH  SROSCH1  

Entry Points

Name Comments DBIA/ICR reference
DEVICE
QUEUE ; queue report to device
PRINT ; print variables
XRAY ; print x-rays

External References

Name Field # of Occurrence
^%ZIS QUEUE+1
^%ZTLOAD QUEUE+2
PRINT^SROBLOD PRINT+7
ASK^SROSCH1 PRINT+1
CON^SROSCH1 PRINT+6
$$SPIN^SRTOVRF PRINT+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,SRNM,?24,SROPD,?40,SRDIAG,?92,SRANES,?115,SRSUR,!,VA("PID"),?16,AGE,?24,SRSST,?40,SROPS(1),?92,SRAN1,?115,SRFST
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,SRSLOC,?24,SRSET
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: ?40,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: ?92,SRAN2,?115,SRATT
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: ?92,SRAN2,?115,SRATT
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?40,SROPS(4)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,?40,SROPS(5)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,?40,SROPS(5)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,"Case # "_SRTN
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,SRPREAD
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?24,"FROZEN SECTION TESTS REQUIRED",!
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !,?24,"SPINAL LEVEL: ",?45,$P($G(^SRF(SRTN,1.1)),"^",4)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,@$S(JJ=1:"?24"_",""SPECIAL EQUIPMENT: """,1:"?45"),$P($G(^SRO(131.3,SRIEN,0)),"^")
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !,@$S(JJ=1:"?24"_",""PLANNED IMPLANT: """,1:"?45"),$P($G(^SRO(131.5,SRIEN,0)),"^")
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !,@$S(JJ=1:"?24"_",""SPECIAL SUPPLIES: """,1:"?45"),$P($G(^SRO(131.04,SRIEN,0)),"^")
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: !,@$S(JJ=1:"?24"_",""SPECIAL INSTRUMENTS: """,1:"?45"),$P($G(^SRO(131.02,SRIEN,0)),"^")
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: !,@$S(JJ=1:"?24"_",""PHARMACY ITEMS: """,1:"?45"),$P(^PSDRUG(+$G(^SRO(131.06,SRIEN,0)),0),"^")
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: ?24,"PREOPERATIVE XRAYS: "_SRXRAY1
  • Line Location: XRAY+1
Function Call: WRITE
  • Prompt: " INTRAOPERATIVE X-RAYS REQUESTED"
  • Condition for execution: SRXRAY2="Y"
  • Line Location: XRAY+1
Function Call: WRITE
  • Prompt: " C-ARM REQUESTED"
  • Condition for execution: SRXRAY2="C"
  • Line Location: XRAY+1
Function Call: WRITE
  • Prompt: !
  • Line Location: XRAY+1
Function Call: WRITE
  • Prompt: ?24,"INTRAOPERATIVE X-RAYS REQUESTED",!
  • Line Location: XRAY+2
Function Call: WRITE
  • Prompt: ?24,"C-ARM REQUESTED"
  • Line Location: XRAY+3
Function Call: WRITE
  • Prompt: !
  • Line Location: XRAY+4
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] PRINT+19
^SRF - [#130] PRINT+6, PRINT+8, PRINT+13, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19
^SRO(131.02 - [#131.02] PRINT+18
^SRO(131.04 - [#131.04] PRINT+17
^SRO(131.06 - [#131.06] PRINT+19
^SRO(131.3 - [#131.3] PRINT+15
^SRO(131.5 - [#131.5] PRINT+16
^SRO(133 - [#133] DEVICE

Label References

Name Line Occurrences
QUEUE DEVICE
XRAY PRINT+10

Naked Globals

Name Field # of Occurrence
^( PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19
^("1.0" PRINT+8
^("CON" PRINT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUEUE+1!*
>> AGE PRINT+3
DRUG PRINT+12~
>> I DEVICE*
II PRINT+12~, PRINT+15*, PRINT+16*, PRINT+17*, PRINT+18*, PRINT+19*
>> IOP DEVICE*
IOSL PRINT+1
JJ PRINT+12~, PRINT+15*, PRINT+16*, PRINT+17*, PRINT+18*, PRINT+19*
POP QUEUE+1!
>> SR("1.0" PRINT+8*, PRINT+9
>> SRAN1 PRINT+3
>> SRAN2 PRINT+4
>> SRANES PRINT+3
>> SRATT PRINT+4
>> SRCON PRINT+6*
>> SRDEV DEVICE*
>> SRDIAG PRINT+3
>> SRFORM PRINT+14
>> SRFROZ PRINT+9*, PRINT+11
>> SRFST PRINT+3
SRIEN PRINT+12~, PRINT+15*, PRINT+16*, PRINT+17*, PRINT+18*, PRINT+19*
>> SRNM PRINT+3
>> SROOM PRINT+2
>> SROPD PRINT+3
>> SROPS(1 PRINT+3
>> SROPS(2 PRINT+4
>> SROPS(3 PRINT+4
>> SROPS(4 PRINT+5
>> SROPS(5 PRINT+5
>> SROPS(6 PRINT+5
>> SRPREAD PRINT+7
>> SRQ PRINT+1
>> SRSET PRINT+4
>> SRSITE DEVICE
>> SRSLOC PRINT+4
>> SRSST PRINT+3
>> SRSUR PRINT+3
>> SRTN PRINT+6, PRINT+7, PRINT+8, PRINT+13, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19
>> SRXRAY1 PRINT+9*, PRINT+10, XRAY+1
>> SRXRAY2 PRINT+9*, PRINT+10, XRAY+1, XRAY+2, XRAY+3
>> SX PRINT+2
>> VA("PID" PRINT+3
>> ZTDESC QUEUE+2*
>> ZTDTH QUEUE+2*
>> ZTRTN QUEUE+2*
>> ZTSAVE("SRDT" QUEUE+2*
>> ZTSAVE("SRDT1" QUEUE+2*
>> ZTSAVE("SRFORM" QUEUE+2*
>> ZTSAVE("SRSITE*" QUEUE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All