Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls