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

Package: Surgery

Routine: SROREAS


Information

SROREAS ;B'HAM ISC/MAM - DELAY REASONS ; [ 04/04/00 11:54 AM ]

Source Information

Source file <SROREAS.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Surgery 5 ^SROREA1  ^SROREA2  DATE^SROUTL  $$INST^SROUTL0  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROREAS  

Entry Points

Name Comments DBIA/ICR reference
ALL ; display for each specialty ?
EN ; entry when queued
END
SP
DATE
SPEC

External References

Name Field # of Occurrence
^%ZIS SPEC+5
^%ZISC END+3
^%ZTLOAD SPEC+6
^DIC SP
^SROREA1 EN+2
^SROREA2 EN+3
DATE^SROUTL DATE
$$INST^SROUTL0 DATE+1
^SRSKILL END+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Report of Delay Reasons",!
  • Line Location: SROREAS+2
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: SPEC+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to print this report for all surgical specialties, or 'NO' to",!,"select a specific specialty."
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SPEC+5
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: SP+0
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: ALL+1
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to display the totals for delay reasons for each specialty. If",!,"you want to display the totals for all delay reasons for the entire medical",!,"center, enter 'NO'."
  • Line Location: ALL+3
Routine Call
  • DIC
  • Line Location:
    • SP
Routine Call
  • %ZIS
  • Line Location:
    • SPEC+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("SR" EN+1!*, END+2!
^TMP("SRT" END+2!

Label References

Name Line Occurrences
ALL SPEC+4, ALL+3
END DATE, DATE+1, SPEC, SPEC+3, SPEC+4, SPEC+5, SPEC+6, EN+2
SP SPEC+3
SPEC SPEC+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT SROREAS+2!
%ZIS SPEC+5!*
%ZIS("A" SPEC+5*
DIC SP!*
DIC("A" SP*
DIC(0 SP*
DTIME SPEC, END, ALL+1
IO EN+1
IO("Q" SPEC+5!, SPEC+6!
IOF SROREAS+2, END+1, END+3
IOP SPEC+5!
IOST END, END+1
POP SPEC+5!
>> SRED DATE
>> SRINST DATE+1*
SRINSTP DATE+1~*
>> SROTOT SROREAS+2*, ALL+4*
>> SRSD DATE
>> SRSOUT SROREAS+2*, DATE, SPEC*, SPEC+3, SPEC+4, SPEC+5*, EN+1*, END, SP*, ALL+1*
>> SRSS SPEC+3*, SPEC+4, EN+2, SP+1*
SRTN END+3!
>> SRYN SPEC*, SPEC+1*, SPEC+2, SPEC+3, ALL+1*, ALL+2*, ALL+3, ALL+4
U DATE+1
>> X END*
>> Y SP, SP+1
>> ZTDESC SPEC+6*
>> ZTQUEUED END+2
>> ZTREQ END+2*
>> ZTRTN SPEC+6*
>> ZTSAVE("SRED" SPEC+6*
>> ZTSAVE("SRINST" SPEC+6*
>> ZTSAVE("SRINSTP" SPEC+6*
>> ZTSAVE("SROTOT" SPEC+6*
>> ZTSAVE("SRSD" SPEC+6*
>> ZTSAVE("SRSS" SPEC+6*
>> ZTSTOP END+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All