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

Package: Surgery

Routine: SROCPT0


Information

SROCPT0 ;BIR/ADM - CPT CODING UTILITY ;04/20/05

Source Information

Source file <SROCPT0.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
DRG Grouper 2 ($$CPT,$$CPTD)^ICPTCOD  $$MOD^ICPTMOD  
VA Fileman 1 EN^DDIOL  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Surgery 9 SROACOD  SROALST  SROAOTH  SROAPCA1  SROAPRT6  SROAUTL0  SROCD0  SROCDX  
SROUTLN  

Entry Points

Name Comments DBIA/ICR reference
ACTIV(SRTN,SRCODE) ; screen for active CPT codes
SSPRIN ; append CPT modifiers to principal CPT code
DES ; get short name and description
1
SSOTH ; append CPT modifiers to other CPT code
IN ; check CPT input
DUP ; check for duplicate other procedure CPT
OTHDISP ; output other procedure CPT
DISPLAY ; output principal CPT

External References

Name Field # of Occurrence
EN^DDIOL 1+6, DISPLAY+6, DISPLAY+9, OTHDISP+6, OTHDISP+9, DUP+4
$$CPT^ICPTCOD DISPLAY+3, OTHDISP+3, DES+3, ACTIV+4
$$CPTD^ICPTCOD 1+5, DES+4
$$MOD^ICPTMOD DISPLAY+9, OTHDISP+9, SSPRIN+3, SSOTH+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] 1+3, DISPLAY+9, OTHDISP+9, DES+2, ACTIV+3
^SRO(136 - [#136] DISPLAY+5, DISPLAY+8, DISPLAY+9, OTHDISP+5, OTHDISP+8, OTHDISP+9, DUP+2, DUP+4, SSPRIN+1, SSPRIN+2
, SSPRIN+3, SSOTH+1, SSOTH+2, SSOTH+3

Label References

Name Line Occurrences
DES DISPLAY+5, OTHDISP+5
SSOTH OTHDISP+4
SSPRIN DISPLAY+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA 1+2, OTHDISP+3, DUP+3
>> DA(1 1+2
DT 1+1, DES+2, ACTIV+2
ICPTVDT 1+4, ACTIV+1!, ACTIV+4*
>> QPQPQ DISPLAY+4, OTHDISP+4
SRCMOD IN+1!*, SSPRIN+1~, SSPRIN+2*, SSPRIN+3*, SSPRIN+4, SSOTH+1~, SSOTH+2*, SSOTH+3*, SSOTH+4
SRCODE 1~, 1+5*, DISPLAY+2~, OTHDISP+2~, DES+1*, DES+3, DES+4, ACTIV~, ACTIV+4
SRCOMMA SSPRIN+1~, SSPRIN+2*, SSPRIN+4*, SSOTH+1~, SSOTH+2*, SSOTH+4*
SRCPT DISPLAY+2~, DISPLAY+6*, OTHDISP+2~, OTHDISP+6*, IN+1~*, IN+2, SSPRIN+1~, SSPRIN+2*, SSPRIN+4*, SSPRIN+5
, SSOTH+1~, SSOTH+2*, SSOTH+4*, SSOTH+5
SRDA 1~, 1+2*, 1+3, DISPLAY+2~, DISPLAY+3*, DISPLAY+5, DISPLAY+8, DISPLAY+9, OTHDISP+2~, OTHDISP+3*
, OTHDISP+5, OTHDISP+8, OTHDISP+9, DES+1, SSOTH+1, SSOTH+2, SSOTH+3
SRDA(1 OTHDISP+3*, OTHDISP+5, OTHDISP+8, OTHDISP+9, DES+1
SRDAA DES+1~*, DES+2
SRDATE 1~, 1+1*, 1+3*, 1+4*, 1+5
SRDD DES+1~, DES+2*, DES+3, DES+4
SRDES 1~, DISPLAY+2~, OTHDISP+2~
SRDES( 1+6, DES+5
>> SRDIE DISPLAY+4, OTHDISP+4
SRI 1~, 1+6*, DISPLAY+2~, DISPLAY+8*, DISPLAY+9, OTHDISP+2~, OTHDISP+8*, OTHDISP+9, DES+4*, DES+5
, SSPRIN+1~, SSPRIN+2*, SSPRIN+3, SSOTH+1~, SSOTH+2*, SSOTH+3
SRK DISPLAY+2~, OTHDISP+2~, DES+1*, DES+3*, DES+4*, DES+6
SRM SSPRIN+1~, SSPRIN+3*, SSOTH+1~, SSOTH+3*
SROK ACTIV+2~*, ACTIV+4*, ACTIV+5
SRP DISPLAY+2~, OTHDISP+2~
SRQ DUP+1~, DUP+2*, DUP+3*, DUP+4*
SRSDATE ACTIV+2~*, ACTIV+3*, ACTIV+4
SRTN 1+2, DISPLAY+3, OTHDISP+3, DES+1, ACTIV~, ACTIV+3, DUP+2, DUP+4, SSPRIN+1, SSPRIN+2
, SSPRIN+3, SSOTH+1, SSOTH+2, SSOTH+3
SRW DISPLAY+2~, DISPLAY+6, OTHDISP+2~, OTHDISP+6, DES+3*
SRX 1~, 1+5*, 1+6, DISPLAY+2~, DISPLAY+7*, DISPLAY+9*, OTHDISP+2~, OTHDISP+7*, OTHDISP+9*, IN+1~*
, DUP+1~, DUP+2*, DUP+3, DUP+4
SRY DISPLAY+2~, DISPLAY+9*, OTHDISP+2~, OTHDISP+9*, DES+3*, DES+4*
SRZ DISPLAY+2~, DISPLAY+9*, OTHDISP+2~, OTHDISP+9*
U DUP+4
X DES+1~, DES+4, DES+5*, IN+1, IN+2*, DUP+4!, SSPRIN+1~, SSOTH+1~
>> Y 1+5, DISPLAY+1, DISPLAY+3*, OTHDISP+1, OTHDISP+3*, DES+1, DES+6*, SSPRIN+2, SSPRIN+5*, SSOTH+2
, SSOTH+5*
Z DES+1~, DES+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All