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

Package: Surgery

Routine: SROCOMP


Information

SROCOMP ;BIR/MAM - VIEW OCCURRENCES ; [ 05/11/04 7:54 AM ]

Source Information

Source file <SROCOMP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Surgery 3 SSPRIN^SROCPT  ^SROPS  ^SRSKILL  
DRG Grouper 1 $$CPT^ICPTCOD  
Registration 1 DEM^VADPT  
VA Fileman 1 (D,Y)^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROMEN-M&M  

Entry Points

Name Comments DBIA/ICR reference
END
HDR
RELATE ; print related returns
RET
POST ; postop occurrences
INTRA ; intraop occurrences
LOOP ; break procedure if greater than 55 characters

External References

Name Field # of Occurrence
D^DIQ SROCOMP+4
Y^DIQ SROCOMP+7
$$CPT^ICPTCOD SROCOMP+9
SSPRIN^SROCPT SROCOMP+9
^SROPS SROCOMP+2
^SRSKILL END+1
DEM^VADPT SROCOMP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Date of Operation: ",?21,SRSDATE,!,"Principal Operation: ",?21,SROPS(1)
  • Line Location: SROCOMP+17
Function Call: WRITE
  • Prompt: !,?21,SROPS(2)
  • Line Location: SROCOMP+17
Function Call: WRITE
  • Prompt: !,?21,SROPS(2)
  • Line Location: SROCOMP+17
Function Call: WRITE
  • Prompt: !!,"Surgeon: ",?19,SRSUR,!,"Attending Surgeon: "_SRATT,!,"Attending Code: ",?16,SRATC
  • Line Location: SROCOMP+18
Function Call: WRITE
  • Prompt: !!,"Principal "_$S(DIAG="POST":"Postop",1:"Preop")_" Diagnosis: ",?30,SRDIAG
  • Line Location: SROCOMP+19
Function Call: WRITE
  • Prompt: "NONE ENTERED"
  • Line Location: SROCOMP+20
Function Call: WRITE
  • Prompt: "NONE ENTERED"
  • Line Location: SROCOMP+22
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RET+0
Function Call: WRITE
  • Prompt: !!,"Press RETURN to list more information, or '^' to leave this option."
  • Line Location: RET+1
Function Call: WRITE
  • Prompt: @IOF,!,SRNAME,?50,"OCCURRENCES",!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CMP>1
  • Line Location: INTRA+2
Function Call: WRITE
  • Prompt: ?30,$P(INTRA(CMP),"^")
  • Line Location: INTRA+2
Function Call: WRITE
  • Prompt: !,?30,"Outcome: "_OUT
  • Line Location: INTRA+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CMP>1
  • Line Location: POST+2
Function Call: WRITE
  • Prompt: ?30,$P(POST(CMP),"^")
  • Line Location: POST+2
Function Call: WRITE
  • Prompt: D
  • Line Location: POST+2
Function Call: WRITE
  • Prompt: !,?30,"Outcome: "_OUT
  • Line Location: POST+3
Function Call: WRITE
  • Prompt: !,SRSDATE,?10,SROPS(1)
  • Line Location: RELATE+4
Function Call: WRITE
  • Prompt: !,?10,SROPS(2)
  • Line Location: RELATE+4
Function Call: WRITE
  • Prompt: !,?10,SROPS(2)
  • Line Location: RELATE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: RELATE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 SROCOMP+7
^ICD9 - [#80] SROCOMP+12
^SRF - [#130] SROCOMP+3, SROCOMP+5, SROCOMP+7, SROCOMP+9, SROCOMP+11, SROCOMP+12, SROCOMP+14, SROCOMP+15, SROCOMP+25, RELATE+2
^VA(200 - [#200] SROCOMP+6

Label References

Name Line Occurrences
END SROCOMP+2, SROCOMP+22, SROCOMP+24
HDR SROCOMP+16
INTRA SROCOMP+21
LOOP SROCOMP+10, RELATE+3
POST SROCOMP+23
RELATE SROCOMP+26
RET SROCOMP+26, RET+1, INTRA+1, POST+1, RELATE+1

Naked Globals

Name Field # of Occurrence
^("OP" SROCOMP+9
^(0 SROCOMP+14, SROCOMP+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C SROCOMP+7*
>> CMP SROCOMP+14*, SROCOMP+15*, SROCOMP+21*, SROCOMP+23*, INTRA+2, POST+2, POST+3
>> CNT SROCOMP+14*, SROCOMP+15*, SROCOMP+25*
>> CPT SROCOMP+9*
>> D POST+2*
>> DFN SROCOMP+3*
>> DIAG SROCOMP+11*, SROCOMP+12, SROCOMP+19
DTIME END, RET
>> ICD SROCOMP+12*
>> INTRA( SROCOMP+14*, SROCOMP+21, INTRA+2
>> INTRA(0 SROCOMP+20, SROCOMP+21
IOF END+1, HDR
IOSL INTRA+1, POST+1, RELATE+1
>> LINE HDR*
>> LOOP LOOP+1*
>> M SROCOMP+10*, LOOP+1, RELATE+3*
MM SROCOMP+10!, LOOP+1*, RELATE+3!
MMM SROCOMP+10!, LOOP+1*, RELATE+3!
>> OUT INTRA+2*, POST+3*
>> POST( SROCOMP+15*, SROCOMP+23, POST+2, POST+3
>> POST(0 SROCOMP+22, SROCOMP+23
>> RET SROCOMP+25*, SROCOMP+26*, RELATE+2
>> SR( SROCOMP+5*
>> SR(0 SROCOMP+3*, SROCOMP+4
>> SRATC SROCOMP+7*, SROCOMP+8*, SROCOMP+18
>> SRATT SROCOMP+5*, SROCOMP+6*, SROCOMP+18
>> SRDIAG SROCOMP+12*, SROCOMP+13*, SROCOMP+19
>> SRNAME SROCOMP+3*, HDR
SRNEWOP SROCOMP+2!
>> SROPER SROCOMP+9*, SROCOMP+10*, LOOP+1*, RELATE+2*, RELATE+3*
SROPS SROCOMP+10!, RELATE+3!
SROPS( LOOP+1*
SROPS(1 SROCOMP+10*, SROCOMP+17, RELATE+3*, RELATE+4
SROPS(2 SROCOMP+17, RELATE+4
SROPS(3 SROCOMP+17, RELATE+4
SRRET SROCOMP+25!
SRRET( SROCOMP+25*, SROCOMP+26, RELATE+2
SRRET(0 SROCOMP+26
>> SRSDATE SROCOMP+4*, SROCOMP+17, RELATE+2*, RELATE+4
>> SRSOUT SROCOMP+2*, SROCOMP+21, SROCOMP+22, SROCOMP+23, SROCOMP+24, SROCOMP+26, END, RET*, INTRA+1, POST+1
, RELATE+1
>> SRSUR SROCOMP+5*, SROCOMP+6*, SROCOMP+18
SRTN SROCOMP+2, SROCOMP+3, SROCOMP+5, SROCOMP+7, SROCOMP+9, SROCOMP+11, SROCOMP+12, SROCOMP+14, SROCOMP+15, SROCOMP+25
, END+1!
>> VA("PID" SROCOMP+3
>> VADM(1 SROCOMP+3
>> X SROCOMP+9*, SROCOMP+11*, SROCOMP+12*, SROCOMP+25*, END*, RET*, RET+1
>> Y SROCOMP+4*, SROCOMP+7*, SROCOMP+9*, SROCOMP+25*, RELATE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All