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

Package: Surgery

Routine: SROICU


Information

SROICU ;B'HAM ISC/MAM - UNSCHEDULED ADMISSIONS TO ICU ; [ 01/08/98 9:54 AM ]

Source Information

Source file <SROICU.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Surgery 5 ^SROICU1  ^SROICU2  DATE^SROUTL  $$INST^SROUTL0  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 1 ^DIC  

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
Surgery 1 SROICU  

Entry Points

Name Comments DBIA/ICR reference
DATE
SPEC
EN ; entry when queued
END
SP ; select specialty

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Report of Unscheduled Admissions to the ICU",!
  • Line Location: SROICU+2
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: SPEC+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: !!,"Enter 'YES' to print this report for a specific surgical specialty, or RETURN",!,"to print the report, sorted by the date of operation, for all specialties.",!!,"Press RETURN to continue "
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format."
  • Line Location: SPEC+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SPEC+6
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SP+1
Routine Call
  • %ZIS
  • Line Location:
    • SPEC+6
Routine Call
  • DIC
  • Line Location:
    • SP+1

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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