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

Package: Surgery

Routine: SROATT0


Information

SROATT0 ;B'HAM ISC/MAM - ATTENDING SURGEON REPORT (1 SURGEON) ; [ 05/11/04 2:33 PM ]

Source Information

Source file <SROATT0.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 4 ^SROAT0P  ^SROAT0T  $$DIV^SROUTL0  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROATT  

Entry Points

Name Comments DBIA/ICR reference
REPORT
UTIL
EN ; entry when queued
END

External References

Name Field # of Occurrence
^%ZIS REPORT+6
^%ZISC END+2
^%ZTLOAD REPORT+7
^DIC SROATT0+2
^SROAT0P EN+6
^SROAT0T EN+7
$$DIV^SROUTL0 EN+4
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: SROATT0+2
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: REPORT+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to dispay individual case information and the total number of",!,"cases for each code. If you only want to display the totals for the attending",!,"codes, enter 'YES'."
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORT+6
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Routine Call
  • DIC
  • Line Location:
    • SROATT0+2
Routine Call
  • %ZIS
  • Line Location:
    • REPORT+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN+1
^SRF - [#130] EN+4, UTIL, UTIL+1, UTIL+2, UTIL+3
^SRF("AC" EN+4
^TMP("SR" EN+2!, END+1!, UTIL+5*
^TMP("SRTOT" EN+2!, EN+3*, END+1!, UTIL+4*, UTIL+5*
^VA(200 - [#200] EN+5

Label References

Name Line Occurrences
END SROATT0+2, REPORT, REPORT+6, REPORT+7, EN+6
REPORT REPORT+2
UTIL EN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS REPORT+6!*
%ZIS("A" REPORT+6*
DIC SROATT0+2!*
DIC("A" SROATT0+2*
DIC(0 SROATT0+2*
DT EN+1
DTIME REPORT, END
IO EN+1
IO("Q" REPORT+6!, REPORT+7!
IOF END+1, END+2
IOP REPORT+6!
IOST END, END+1
>> LINE EN+5*
POP REPORT+6!
>> SRATT SROATT0+3*, EN+5*, UTIL+2
>> SRATT1 EN+5*
>> SRBOTH REPORT+3*, REPORT+4, REPORT+5, EN+6
>> SRCODE UTIL+3*, UTIL+4, UTIL+5
>> SRED EN+1, EN+4
>> SREDT EN+4*
>> SRFRTO EN+1*
>> SRINST EN+1*
>> SRINSTP EN+1*
>> SRPRINT EN+1*
>> SRSD EN+1, EN+4
>> SRSDATE EN+4*, UTIL+5
>> SRSITE("DIV" EN+1
>> SRSITE("SITE" EN+1
>> SRSOUT SROATT0+2*, REPORT*, REPORT+6*, EN+1*, EN+6, END
SRTN EN+4*, END+2!, UTIL, UTIL+1, UTIL+2, UTIL+3, UTIL+5
>> SRYN REPORT*, REPORT+1*, REPORT+2, REPORT+3
>> X END*, UTIL+2*
>> Y SROATT0+2, SROATT0+3, EN+1*
>> ZTDESC REPORT+7*
>> ZTQUEUED END+1
>> ZTREQ END+1*
>> ZTRTN REPORT+7*
>> ZTSAVE("SRATT" REPORT+7*
>> ZTSAVE("SRBOTH" REPORT+7*
>> ZTSAVE("SRED" REPORT+7*
>> ZTSAVE("SRSD" REPORT+7*
>> ZTSAVE("SRSITE*" REPORT+7*
>> ZTSTOP END+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All