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

Package: Surgery

Routine: SROADOC


Information

SROADOC ;B'HAM ISC/MAM - ANESTHESIA PROVIDER REPORT; [ 09/22/98 11:23 AM ]

Source Information

Source file <SROADOC.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 4 PR^SROADOC1  DATE^SROUTL  $$DIV^SROUTL0  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SROADOC  SROADOC1  

Entry Points

Name Comments DBIA/ICR reference
SORT
CODES ; print technique code at bottom of page
END
SETUTL ; set up ^TMP("SR",$J
BEG ;
EN ;
DEVICE

External References

Name Field # of Occurrence
^%ZIS DEVICE
^%ZISC END
^%ZTLOAD DEVICE+1
^DIC SORT+4
PR^SROADOC1 BEG+4
DATE^SROUTL EN+2
$$DIV^SROUTL0 BEG+3
^SRSKILL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CODES+1
Function Call: WRITE
  • Prompt: "-"
  • Line Location: CODES+1
Function Call: WRITE
  • Prompt: !,"SUPERVISOR CODES: 1-STAFF CASE, 2-STAFF ASSISTED BY RESIDENT OR C.R.N.A., 3-STAFF ASSISTING C.R.N.A., 4-STAFF ASSISTING RESIDENT"
  • Line Location: CODES+2
Function Call: WRITE
  • Prompt: !,?18,"5-STAFF CONSULTING IN OR, 6-STAFF AVAILABLE IN OR SUITE, 7-STAFF AVAILABLE IN HOSP./UNIV. COMPLEX",!,?18,"8-STAFF CALLED FOR EMERGENCY, 9-C.R.N.A. INDEPENDENT DUTY MD/DDS SUP.",!
  • Line Location: CODES+3
Function Call: WRITE
  • Prompt: @IOF,!,"Anesthesia Provider Report"
  • Line Location: EN+1
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: SORT+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to print the report for all anesthesia providers, or 'NO'",!,"to select a specific anesthesia provider."
  • Line Location: SORT+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: SORT+4
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format.",!
  • Line Location: DEVICE+0
Routine Call
  • DIC
  • Line Location:
    • SORT+4
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" BEG+1, BEG+2
^SRF - [#130] SETUTL+1, SETUTL+2, BEG+3
^SRF("AC" BEG+3
^TMP("SR" SETUTL+2*, BEG+1!
^VA(200 - [#200] SETUTL+2

Label References

Name Line Occurrences
DEVICE SORT+2
END EN+2, SORT, SORT+4, DEVICE, DEVICE+1
SETUTL BEG+3
SORT SORT+3

Naked Globals

Name Field # of Occurrence
^( SETUTL+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE!*
%ZIS("A" DEVICE*
>> DATE BEG+1*, BEG+3*
DIC SORT+4!*
DIC("A" SORT+4*
DIC(0 SORT+4*
DT BEG+1
DTIME SORT
>> EDATE BEG+1*, BEG+3
IO BEG+1
IO("Q" DEVICE+1!
IOF END, EN+1
IOM CODES+1
IOP DEVICE!
>> LINE CODES+1*
>> PAGE BEG+1*
POP DEVICE!
>> SRED EN+2, DEVICE+1, BEG+1, BEG+2
>> SRF BEG+1*, BEG+3
SRFRTO BEG+2~*
>> SRINST BEG+1*
>> SRPRIN SETUTL+2*
>> SRPRINT BEG+1*
>> SRPRO SORT+5*
>> SRPROV SETUTL+1, SORT+2*, SORT+5*
>> SRSD EN+2, DEVICE+1, BEG+1, BEG+2
>> SRSDT SETUTL+2*
>> SRSITE("SITE" BEG+1
>> SRSOUT EN+2
SRTN SETUTL+1, SETUTL+2, END!, BEG+3*
>> SRYN SORT*, SORT+1*, SORT+2, SORT+3
>> Y SORT+4, SORT+5, BEG+1*, BEG+2*
>> Y(0 SORT+5
>> ZTDESC DEVICE+1*
>> ZTRTN DEVICE+1*
>> ZTSAVE("SRED" DEVICE+1*
>> ZTSAVE("SRPRO*" DEVICE+1*
>> ZTSAVE("SRSD" DEVICE+1*
>> ZTSAVE("SRSITE*" DEVICE+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All