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

Package: Surgery

Routine: SRSDISP


Information

SRSDISP ;B'HAM ISC/MAM - SELECT GRAPH DISPLAY ; [ 04/03/00 1:33 PM ]

Source Information

Source file <SRSDISP.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Surgery 2 $$ORDIV^SROUTL0  DIS1^SRSBUTL  
VA FileMan 1 C^%DTC  

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

Package Total Caller Graph
Surgery 6 SRSAVL  SRSCG  SRSCHC  SRSCHD2  SRSCHOR  SRSUP1  

Entry Points

Name Comments DBIA/ICR reference
PICK
HDR
LINE ; display graph for each room
GRAPH ; set graph in ^SRS
HELP

External References

Name Field # of Occurrence
C^%DTC LINE+2
$$ORDIV^SROUTL0 PICK+5
DIS1^SRSBUTL GRAPH+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Display of Available Operating Room Time",!!,"1. Display Availability (12:00 AM - 12:00 PM)",!,"2. Display Availability (06:00 AM - 08:00 PM)",!,"3. Display Availability (12:00 PM - 12:00 AM)"
  • Line Location: PICK+0
Function Call: WRITE
  • Prompt: !,"4. Do Not Display Availability"
  • Line Location: PICK+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PICK+2
Function Call: WRITE
  • Prompt: @IOF,!!,"ROOM"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: " 6AM 7 8 9 10 11 12 13 14 15 16 17 18 19 20"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: " 12AM 1 2 3 4 5 6 7 8 9 10 11 12PM"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: " 12PM 13 14 15 16 17 18 19 20 21 22 23 24"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$E(ROOM,1,8),?8,$E(^SRS(SROR,"S",SRSDATE,1),START,END)
  • Line Location: LINE+5
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to portion of the display graph of available",!,"operating room time that you want to view. If you are scheduling a case"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"between the hours of 6:00 AM and 8:00 PM, enter '2'. A display of available",!,"operating room time will then appear on your screen. If you do not want to"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"see a display for any time period, enter '4'. You will then be asked to",!,"select an operating room."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: HELP+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] LINE+4
^SRS - [#131.7] PICK+5, LINE+1, LINE+2, LINE+4, LINE+5, GRAPH+1*, GRAPH+3*

Label References

Name Line Occurrences
GRAPH LINE+1, LINE+2
HDR PICK+4
HELP PICK+3
LINE PICK+5
PICK PICK+3

Naked Globals

Name Field # of Occurrence
^( PICK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DTIME PICK+2, HELP+3
>> END LINE+4*, LINE+5
IOF PICKHDR
>> ROOM LINE+4*, LINE+5
SRDAT LINE+2*!
>> SRDTYPE PICK+4*, HDR+1, HDR+2, LINE+3, LINE+4
>> SROR PICK+5*, LINE+1, LINE+2, LINE+4, LINE+5, GRAPH+1, GRAPH+3
>> SRSDATE LINE+1, LINE+2*, LINE+5, GRAPH+1, GRAPH+2, GRAPH+3
>> SRSITE("DIV" PICK+5
>> SRSOUT PICK+2*
>> START LINE+4*, LINE+5
>> X PICK+2*, PICK+3*, PICK+4, LINE+2, LINE+4*, GRAPH+2*, GRAPH+3, HELP+3*
>> X1 LINE+2*
>> X2 LINE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All