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

Package: Surgery

Routine: SROAUTL0


Information

SROAUTL0 ;BIR/ADM,SLM - RISK ASSESSMENT UTILITY ;08/16/2011

Source Information

Source file <SROAUTL0.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 4 HDR^SROAUTL  EN^SROCCAT  (DES,SSOTH,SSPRIN)^SROCPT0  $$ICD^SROICD  
CPT HCPCS Codes 2 $$CPT^ICPTCOD  $$MOD^ICPTMOD  
VA FileMan 2 C^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 36

Package Total Caller Graph
Surgery 36 SR54UTL  SR61UTL  SR68UTL0  SRO1L1  SROACMP  SROACOP  SROAEX  SROALC  
SROALCP  SROALCS  SROALCSP  SROALL  SROALLP  SROALLS  SROALLSP  SROALM  
SROALMN  SROALSS  SROALSSP  SROALST  SROALSTP  SROALT  SROALTP  SROALTS  
SROALTSP  SROAMAN  SROANT  SROANTP  SROANTS  SROANTSP  SROAOP  SROAOP1  
SROAPRT7  SROASS  SROATM2  SROAUTL3  

Entry Points

Name Comments DBIA/ICR reference
PREOP
PREMD
OPER
LR
OUT1 ; man preop edit scr
LAB ; man lab edit scrn
CPTS ; put CPT codes in array for display
DISP ; display CPT code info
OTH
PRESS
OCC ; occur data
OCCEND

External References

Name Field # of Occurrence
C^%DTC OCC+9
^DIR PRESS+2
$$CPT^ICPTCOD CPTS+1, CPTS+5, DISP+3, OTH+1
$$MOD^ICPTMOD DISP+8, OTH+6
HDR^SROAUTL DISP+2
EN^SROCCAT OCC+2
DES^SROCPT0 DISP+3, OTH+1
SSOTH^SROCPT0 CPTS+6
SSPRIN^SROCPT0 CPTS+2
$$ICD^SROICD OCC+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Principal CPT Code: "_SRW
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !,?5,SRDES(I)
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !,?3,"Modifier: "
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: $P($$MOD^ICPTMOD(SRMO,"I"),"^",2),"-",$P($$MOD^ICPTMOD(SRMO,"I"),"^",3)
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !
  • Line Location: OTH+0
Function Call: WRITE
  • Prompt: !,?5,SRDES(I)
  • Line Location: OTH+2
Function Call: WRITE
  • Prompt: !,?3,"Modifier: "
  • Line Location: OTH+3
Function Call: WRITE
  • Prompt: $P($$MOD^ICPTMOD(SRMO,"I"),"^",2),"-",$P($$MOD^ICPTMOD(SRMO,"I"),"^",3)
  • Line Location: OTH+6
Routine Call
  • DIR
  • Line Location:
    • PRESS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] OCC+4, OCC+5, OCC+6, OCC+7, OCC+8, OCC+12, OCC+18, OCC+19, OCC+23, OCC+24
OCC+25
^SRO(136 - [#136] CPTS+1, CPTS+4, CPTS+5, DISP+1, DISP+3, DISP+5, DISP+6, DISP+7, OTHOTH+1
OTH+3, OTH+4, OTH+5
^TMP("SROCC" OCC+2!, OCC+6*, OCC+13*, OCC+14, OCC+16, OCC+18, OCC+21*, OCC+22, OCC+23, OCC+24
OCC+25, OCCEND!

Label References

Name Line Occurrences
OCCEND OCC+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR PRESS!, PRESS+2!
DIR("A" PRESS*, PRESS+1*, PRESS+2*
DIR(0 PRESS*
DR PREOP!*, PREMD!*, OPER!*, LR!*
>> I DISP+4*, OTH+2*, OCC+26*, OCC+28*
K CPTS+1~*, CPTS+3, CPTS+7, CPTS+8*
SR40 OCC+1~*, OCC+26*, OCC+31
SRCSTAT DISP+1~*
SRDA CPTS+1~, CPTS+4*, CPTS+5, OCC+18*, OCC+19, OCCEND!
SRDATE OCC+8*, OCC+10, OCC+11*, OCC+13, OCCEND!
SRDES DISP+10!, OTH!
SRDES( DISP+4, OTH+2
SRDES(1 DISP+4, OTH+2
SRDUR OCC+1!, OCC+24*, OCC+30*
SRFIRST DISP+1~, DISP+2*, DISP+8, DISP+9*, OTH+3*, OTH+6, OTH+7*
SRFLG OCC+4*, OCCEND!
SRICD OCC+18*, OCC+19, OCCEND!
>> SRIO OCC+4*, OCC+5, OCC+6
SRJ OCCEND!
SRK OCC+3*, OCC+22*, OCCEND!
>> SRL CPTS+7
SRMO DISP+1~, DISP+7*, DISP+8, OTH+5*, OTH+6
SRMOD DISP+1~, DISP+6*, DISP+7, OTH+4*, OTH+5
SRO OCC+2!, OCC+22*, OCC+28*, OCC+29*, OCC+30*, OCC+31*
SROC OCC+2!
SROC( OCC+3*, OCC+27*, OCC+28
SROC(40 OCC+31
SROC(41 OCC+31
SROC(42 OCC+31
SROCC OCC+5*, OCC+6, OCC+12*, OCC+13, OCC+16*, OCC+17, OCC+18, OCC+19, OCC+20, OCC+21
OCC+22*, OCC+23, OCC+24, OCC+25, OCC+27, OCCEND!
SROCCDT OCC+16*, OCC+18, OCC+21, OCC+22*, OCC+23, OCC+24, OCC+25, OCC+27, OCCEND!
SROOC OCC+2!
SROOC( OCC+19*, OCC+20*
>> SROTH OTH*, OTH+1, OTH+3, OTH+4, OTH+5
>> SRPAGE DISP+1*
SRPO OCC+4*, OCC+7*, OCC+8, OCC+12, OCC+13, OCC+23*, OCC+24*, OCC+25*, OCCEND!
SRPOCC OCCEND!
SRPOCCD OCCEND!
SRPROC CPTS+1!
SRPROC( CPTS+3*, CPTS+7*, CPTS+8*
SRPROC(1 CPTS+9*
>> SRQ PREOP*, PREMD*, OPER*, LR*
SRSDATE OCC+9, OCCEND!
SRSEP OCC+1!, OCC+23*, OCC+29*
>> SRTN CPTS+1, CPTS+4, CPTS+5, DISP+1, DISP+3, DISP+5, DISP+6, DISP+7, OTHOTH+1
OTH+3, OTH+4, OTH+5, OCC+4, OCC+5, OCC+6, OCC+7, OCC+8, OCC+12, OCC+18
OCC+19, OCC+23, OCC+24, OCC+25
SRTYPE OCC+16*, OCC+18, OCC+19, OCCEND!
>> SRW DISP+2*, DISP+4, OTH+2
U OCC+5, OCC+6, OCC+8, OCC+12, OCC+18, OCC+19
X CPTS+1~, OCC+10, OCC+23*, OCC+24*, OCC+25*, OCC+26, OCC+29*, OCC+30*
X1 OCC+9*, OCCEND!
X2 OCC+9*, OCCEND!
XX CPTS+1~
Y CPTS+1~*, CPTS+2, CPTS+3, CPTS+5*, CPTS+6, CPTS+7, CPTS+8, DISP+3*, OTH+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All