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

Package: Surgery

Routine: SROSUR


Information

SROSUR ;B'HAM ISC/MAM - SURGEON STAFFING REPORT ; [ 07/27/98 2:33 PM ]

Source Information

Source file <SROSUR.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Surgery 4 ^SROSTOP  OTHER^SROSUR1  ($$DIV,$$NODATA)^SROUTL0  ^SRSKILL  
Kernel 1 ^%ZISC  
Registration 1 DEM^VADPT  
VA Fileman 1 D^DIQ  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SROSUR1  SROSUR2  

Entry Points

Name Comments DBIA/ICR reference
ASSTS ;
SET ; set variables and print from ^SRF(
END
NAME
PRINT ; print from ^TMP(
OPS
SETUP ; set up ^TMP(
EN1 ;
OTHER ; other operations
ROLE
PRIN2
ASK
LOOP ; break procedure if greater than 50 characters
HDR ; print heading

External References

Name Field # of Occurrence
^%ZISC END
D^DIQ SET+1
^SROSTOP HDR+1
OTHER^SROSUR1 SETUP+4
$$DIV^SROUTL0 EN1+3
$$NODATA^SROUTL0 PRINT+2
^SRSKILL END
DEM^VADPT SET+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DATE,?23,PAT,?43,SROPS(1),?95,$E(ICD("*"),1,35)
  • Line Location: OPS+6
Function Call: WRITE
  • Prompt: !,SRTN,?23,SSN
  • Line Location: OPS+7
Function Call: WRITE
  • Prompt: ?43,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: OPS+7
Function Call: WRITE
  • Prompt: ?95,$E(ICD(ICD),1,35)
  • Condition for execution: ICD
  • Line Location: OPS+7
Function Call: WRITE
  • Prompt: !,?43,SROPS(3)
  • Line Location: OPS+7
Function Call: WRITE
  • Prompt: !,?43,SROPS(3)
  • Line Location: OPS+7
Function Call: WRITE
  • Prompt: !,?43,SROPS(4)
  • Condition for execution: $D(SROPS(4))
  • Line Location: OPS+9
Function Call: WRITE
  • Prompt: !,?43,SROPS(5)
  • Condition for execution: $D(SROPS(5))
  • Line Location: OPS+9
Function Call: WRITE
  • Prompt: !,?43,SROPS(6)
  • Condition for execution: $D(SROPS(6))
  • Line Location: OPS+9
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+9
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: NAME+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: NAME+0
Function Call: WRITE
  • Prompt: !!,?50,"** "_J_" **"
  • Line Location: NAME+1
Function Call: WRITE
  • Prompt: !!,?50,"ROLE: "
  • Line Location: ROLE+1
Function Call: WRITE
  • Prompt: $S(K="1ST":"FIRST ASSISTANT",K="2ND":"SECOND ASSISTANT",K="ATT":"ATTENDING SURGEON",K="OTH":"OTHER ASSISTANT",1:"SURGEON"),!
  • Line Location: ROLE+1
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,"REVIEWED BY: ",!,?54,"SURGEON STAFFING REPORT",?100,"DATE REVIEWED: "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,?1,"DATE/TIME",?23,"PATIENT",?43,"OPERATION(S)",?95,"DIAGNOSIS",!,?1,"CASE #",?23,"ID #",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: PRINT+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN1+1
^SRF - [#130] SET+1, OPS, OPS+2, OPS+4, SETUP+1, SETUP+2, SETUP+3, SETUP+4, OTHER+1, OTHER+2
, ASSTS+1, EN1+3
^SRF("AC" EN1+3
^TMP("SRO" SETUP+3*, SETUP+5*, ASSTS+1*, EN1+2!, PRINT+1, PRINT+2, PRINT+3!, PRIN2
^VA(200 - [#200] SETUP+3, SETUP+5, ASSTS+1

Label References

Name Line Occurrences
ASK OPS+5, ROLE
END PRINT+5
HDR ASK+1, EN1+2
LOOP OPS+1
NAME HDR+5, PRINT+1
OTHER OPS
PRIN2 PRINT+1
ROLE HDR+5, PRINT+1
SET PRIN2
SETUP EN1+3

Naked Globals

Name Field # of Occurrence
^( OPS+2, SETUP+2, SETUP+3
^(31 SETUP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ATT SETUP+3*, SETUP+5
>> CNT OPS+4*
CPT SET+1!, OPS+6*, OPS+8
>> DATE SET+1*, OPS+6, SETUP+3*, SETUP+5, ASSTS+1
>> DFN SET+1*
DT EN1+1
DTIME ASK, PRINT+4
>> FRST SETUP+3*, SETUP+5
>> I OPS+4*
ICD SET+1!, OPS+4*, OPS+6*, OPS+7*, OPS+8
ICD( OPS+4*, OPS+7, OPS+8
ICD("*" OPS+4*, OPS+6
IO EN1+1
IOF END, HDR+2, PRINT+3
IOM NAME
IOSL OPS+5, ROLE
IOST ASK, PRINT+3, PRINT+4
J NAME+1, HDR+5, EN1+2!*, EN1+3*, PRINT+1*, PRIN2
>> K ROLE+1, PRINT+1*, PRIN2
>> L SET+1, SETUP+3, SETUP+5, EN1+3*, PRINT+1*, PRIN2
>> LINE NAME*, HDR+4*
>> LOOP LOOP+1*
>> M SET+1, PRIN2*
>> MAM OPS+1*, LOOP+1
MM OPS+1!, LOOP+1*
MMM OPS+1!, LOOP+1*
>> OPER OPS*, OTHER+1*, OTHER+2
>> PAGE HDR+2, HDR+5*, EN1+2*
>> PAT SET+1*, SET+2*, OPS+6
>> S( SETUP+3*
>> S(0 SET+1*
>> SCND SETUP+3*, SETUP+5
>> SRDG OPS+2*, OPS+3*, OPS+4
>> SRDG1 OPS+2*, OPS+3*, OPS+4
>> SRED EN1+1, EN1+3
>> SRF OPS+6, ASK*, ROLE+1, HDR+1*, EN1+2*, PRINT+1, PRINT+4, PRIN2
SRFRTO HDR+3, EN1+1~*
>> SRHALT HDR+1
>> SRINST HDR+2
>> SRLONG OTHER+1*, OTHER+2
>> SROPER OPS*, OPS+1*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
SROPS OPS+1!
SROPS( LOOP+1*
SROPS(1 OPS+1*, OPS+6
SROPS(2 OPS+7
SROPS(3 OPS+7
SROPS(4 OPS+9
SROPS(5 OPS+9
SROPS(6 OPS+9
>> SROSUR ASSTS+1
>> SROTH ASSTS+1*
>> SROTHER ASSTS+1*
>> SRPRINT HDR+3, EN1+1*
>> SRSD EN1+1, EN1+2
SRTN SET+1*, OPS, OPS+2, OPS+4, OPS+7, SETUP+1, SETUP+2, SETUP+3, SETUP+4, END!
, OTHER+1, OTHER+2, ASSTS+1, EN1+3*, PRIN2*
>> SRUL ASK*, NAME, NAME+1*, EN1+2*
>> SSN SET+1*, OPS+7
>> SUR SETUP+3*
>> VA("PID" SET+1
>> VADM(1 SET+1
>> X ASK*, PRINT+4*
>> Y SET+1*, EN1+1*
>> ZTQUEUED HDR+1, PRINT+3
>> ZTREQ PRINT+3*
>> ZTSTOP PRINT+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All