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

Package: Surgery

Routine: SROAOTH


Information

SROAOTH ;BIR/MAM - PRINT OTHER PROCEDURES ;04/11/06

Source Information

Source file <SROAOTH.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Surgery 2 SSOTH^SROCPT  (SSOTH,SSPRIN)^SROCPT0  
DRG Grouper 1 $$CPT^ICPTCOD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROAPRT3  

Entry Points

Name Comments DBIA/ICR reference
LIST
LOOP ; break procedures
CON ; get CPT modifiers for concurrent procedure

External References

Name Field # of Occurrence
$$CPT^ICPTCOD SROAOTH+4, SROAOTH+6, SROAOTH+12, LIST
SSOTH^SROCPT LIST
SSOTH^SROCPT0 SROAOTH+6
SSPRIN^SROCPT0 SROAOTH+4, CON+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$J("Procedure CPT Codes: ",39)_CPTT
  • Line Location: SROAOTH+7
Function Call: WRITE
  • Prompt: !!,$J("Concurrent Procedure: ",39)_$S(SROPS(1)="":"N/A",1:SROPS(1))
  • Line Location: SROAOTH+14
Function Call: WRITE
  • Prompt: !,?39,SROPS(2)
  • Line Location: SROAOTH+14
Function Call: WRITE
  • Prompt: !,?39,SROPS(2)
  • Line Location: SROAOTH+14
Function Call: WRITE
  • Prompt: !,$J("CPT Code: ",39)_$S(CPT="":"N/A",1:CPT)
  • Line Location: SROAOTH+15
Function Call: WRITE
  • Prompt: !,$J("Other Procedure ("_CNT_"): ",39)_OPER
  • Line Location: LIST+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] SROAOTH+3, SROAOTH+9, SROAOTH+10
^SRO(136 - [#136] SROAOTH+4, SROAOTH+5, SROAOTH+10

Label References

Name Line Occurrences
CON SROAOTH+12
LIST SROAOTH+3
LOOP SROAOTH+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT SROAOTH+3*, SROAOTH+8!, LIST+2
>> CON SROAOTH+9*, SROAOTH+10, CON+1
CPT SROAOTH+3*, SROAOTH+5*, SROAOTH+6*, SROAOTH+8!, SROAOTH+9*, SROAOTH+10*, SROAOTH+12, SROAOTH+13*, SROAOTH+15, CON+1*
, LIST*, LIST+1*
CPTT SROAOTH+2~, SROAOTH+3*, SROAOTH+4*, SROAOTH+6*, SROAOTH+7
>> LOOP LOOP+1*
>> M SROAOTH+11*, LOOP+1
MM SROAOTH+11!, LOOP+1*
MMM SROAOTH+11!, LOOP+1*
OPER SROAOTH+3*, SROAOTH+5*, SROAOTH+8!, LIST+2
OTH SROAOTH+3*, SROAOTH+5*, SROAOTH+6, SROAOTH+8!, LIST
>> SRDA SROAOTH+6*, LIST*
>> SROPER SROAOTH+10*, SROAOTH+11*, LOOP+1*
SROPS SROAOTH+8!, SROAOTH+11!
SROPS( LOOP+1*
SROPS(1 SROAOTH+8*, SROAOTH+11*, SROAOTH+14
SROPS(2 SROAOTH+14
SROPS(3 SROAOTH+14
SRTN SROAOTH+3, SROAOTH+4, SROAOTH+5, SROAOTH+9, CON+1~*
>> X SROAOTH+4*
>> Y SROAOTH+4*, SROAOTH+6*, SROAOTH+12*, CON+1, LIST*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All