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

Package: Surgery

Routine: SROPLSTS


Information

SROPLSTS ;B'HAM ISC/MAM - LIST OF OPERATIONS BY SERVICE ;09/30/04

Source Information

Source file <SROPLSTS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Surgery 5 TECH^SROPRIN  ^SROSTOP  $$DIV^SROUTL0  ^SRSKILL  MINS^SRSUTL2  
Kernel 1 ^%ZISC  
Registration 1 DEM^VADPT  

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 SROPLST1  

Entry Points

Name Comments DBIA/ICR reference
S1
SET ; set variables
OPS
PRINT ;
HDR ; print heading
ASK
END
OTHER ; other operations
LOOP ; break procedure if greater than 50 characters
1 ; entry when queued
2 ; entry when queued
STOT ; print specialty total
HDDT ; set up variables common to both reports

External References

Name Field # of Occurrence
^%ZISC END+2
TECH^SROPRIN OPS+3
^SROSTOP HDR+1
$$DIV^SROUTL0 1+2, 2+3
^SRSKILL END+2
MINS^SRSUTL2 OPS+2
DEM^VADPT SET+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: !,?1,"*",SRTS,"*"
  • Line Location: S1+1
Function Call: WRITE
  • Prompt: !!,?1,$E(SROD,4,5)_"/"_$E(SROD,6,7)_"/"_$E(SROD,2,3),?13,$E(SRNM,1,26),?38,SROPS(1)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?90,$E(SRSUR,1,23),?114,$E(SRANES,1,14),!,?1,SRTN,?13,VA("PID")
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?38,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?90,$E(SRFST,1,23),?114,"OP TIME: ",SROT," MIN.",!,SRABORT,?13,SRTYPE
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?38,SROPS(3)
  • Condition for execution: $D(SROPS(3))
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?90,$E(SRTWO,1,23)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,?38,SROPS(4)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,?38,SROPS(5)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,?38,SROPS(5)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,?120,"PAGE ",PAGE,!,?58,"SURGICAL SERVICE",?100,"DATE REVIEWED:",!,?52,"LIST OF OPERATIONS BY SERVICE"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?100,"REVIEWED BY:",!,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,?1,"DATE",?13,"PATIENT",?38,"OPERATION(S)",?90,"PRIMARY SURGEON",?116,"ANESTHESIA",!,"CASE #",?15,"ID#",?90,"FIRST ASSISTANT",?116,"TECHNIQUE",!,?13,"PRIORITY",?90,"SECOND ASSISTANT"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!!,"TOTAL OPERATIONS FOR ALL SERVICES: ",TC
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: !!,?30,"*",SRTS,"*"
  • Line Location: 2+2
Function Call: WRITE
  • Prompt: !!,?1,"TOTAL ",SRTS,": ",C
  • Line Location: STOT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDDT+1
^SRF - [#130] SET+1, SET+2, SET+4, OPS, OPS+2, OTHER+1, OTHER+2, 1+2, 2+3
^SRF("ASP" 1+2, 2+3
^SRO(137.45 - [#137.45] S1
^TMP("SR" 1+1!, 1+2*, 1+3
^VA(200 - [#200] SET+2, SET+3

Label References

Name Line Occurrences
2 1+1
ASK PRINT+1, 1+4, STOT+1
END 1+1, 1+4, 1+5, 2+1, 2+4
HDDT 1+1, 2+1
HDR ASK+1, 1+1, 2+1
LOOP OPS+1
OTHER OPS
S1 1+3
SET 1+3, 2+3
STOT 1+3, 2+3

Naked Globals

Name Field # of Occurrence
^( SET+2, OPS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A OPS+4*
>> C S1*, 1+1*, 1+3*, 2+2*, 2+3*, STOT+1
>> DFN SET+1*
DT HDDT+1
DTIME ASK, END+1
>> I OPS*, HDR+4*
IO 1+1, 2+1
IOF HDR+2, END, END+2
IOM S1
IOSL PRINT+1, 1+4, STOT+1
IOST ASK, END, END+1
>> K S1, 1+1*, 1+2*, 1+3*, 2+2*, 2+3
>> LINE S1*
>> LOOP LOOP+1*
>> M OPS+1*, LOOP+1
MM OPS+1!, LOOP+1*
MMM OPS+1!, LOOP+1*
>> N 1+2*, 2+2*, 2+3*
>> OPER OPS*, OTHER+1*, OTHER+2
>> PAGE HDR+2, HDR+5*, HDDT+1*
>> S( SET+2*
>> S(0 SET+1*, OPS+4
>> SR 1+2*, 1+3*, 2+2*, 2+3*
>> SRABORT SET+4*, PRINT+2
>> SRANES OPS+3*, PRINT+2
>> SRATT SET+1*, SET+2*
>> SRD 1+2, 2+2
>> SRDT SET+1*
>> SRED 1+2, 2+3, HDDT+1
SRFRTO HDR+3, 1+1~, 2+1~, HDDT+1*
>> SRFST SET+1*, SET+2*, SET+3*, PRINT+2
>> SRHALT HDR+1
>> SRINST HDR+2, HDDT+1*
>> SRLONG OTHER+1*, OTHER+2
>> SRNM SET+1*, PRINT+1
>> SROD SET+1*, PRINT+1
SROP SET+1!
>> SROPER OPS*, OPS+1*, OTHER+1, OTHER+3*, LOOP+1*
SROPERS OPS!, OTHER+1*, OTHER+2*, OTHER+3
SROPS OPS+1!
SROPS( LOOP+1*
SROPS(1 OPS+1*, PRINT+1
SROPS(2 PRINT+2
SROPS(3 PRINT+2
SROPS(4 PRINT+3
SROPS(5 PRINT+3
SROPS(6 PRINT+3
>> SROT OPS+2*, PRINT+2
>> SRPRINT HDR+3, HDDT+1*
>> SRQ S1, PRINT+1, HDR+1*, ASK*, ASK+1, END+1, 1+1, 1+2, 1+3, 1+4
, 2+1, 2+3, STOT+1, HDDT+1*
>> SRSD HDDT+1
>> SRSITE("SITE" HDDT+1
>> SRSSN SET+1*
>> SRSUR SET+1*, SET+2*, PRINT+2
>> SRT1 2+2
>> SRTECH OPS+3
SRTN SET+1, SET+2, SET+4, OPS, OPS+2, PRINT+2, END+2!, OTHER+1, OTHER+2, 1+3*
, 2+3*
>> SRTS S1*, S1+1, ASK+1, 2+2, STOT+1
>> SRTWO SET+1*, SET+2*, SET+3*, PRINT+2
>> SRTYPE OPS+4*, PRINT+2
>> SRUL S1, S1+1*, 1+1*
>> SRZZ 1+1
>> TC 1+1*, 1+3*, 1+4, 2+3*
>> VA("PID" SET+1, PRINT+2
>> VADM(1 SET+1
>> X OPS+2*, ASK*, END+1*
>> X1 OPS+2*
>> Y HDDT+1*
>> Z PRINT+1*
>> ZTQUEUED HDR+1, END
>> ZTREQ END*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All