Routine: SROMOD0

Package	Total	Call Graph
VA Fileman	3	EN^DDIOL (FILE,UPDATE)^DIE ^DIR
DRG Grouper	1	($$MOD,$$MODP)^ICPTMOD

Package	Total	Caller Graph
Surgery	3	SROCD0 SROCD2 SROCDX

Name	Comments	DBIA/ICR reference
OHYPH	; input CPT hyphenated modifier for other procedure
PHYPH	; called from input transform to process hyphenated modifier list
OPROC	; enter CPT modifiers for other CPT code
PRIN	; enter CPT modifiers for principal CPT code
OCHK	; return value of modifier if acceptable for other procedure
OTH()	; screen for acceptable CPT code/modifier pair for other procedure
QUES
KPMOD	; delete principal CPT modifiers when CPT code is edited
QUES1
SCR27()	; screen for acceptable CPT code/modifier pair for principal procedure
PCHK	; return value of modifier if acceptable for principal procedure
DISPLAY	; display name with modifier
KOMOD	; delete other CPT modifiers when CPT code is edited

Name	Field # of Occurrence
EN^DDIOL	PRIN+13, PRIN+16, OPROC+10, OPROC+13, PHYPH+10, OHYPH+5
FILE^DIE	PRIN+13, PRIN+16, OPROC+10, OPROC+13, KOMOD+4, KPMOD+3
UPDATE^DIE	PRIN+15, OPROC+12, PHYPH+12, OHYPH+7
^DIR	PRIN+7, PRIN+10, OPROC+5, OPROC+8
$$MOD^ICPTMOD	DISPLAY+4, PRIN+4, OPROC+2, PHYPH+7, OHYPH+4, QUES+2, QUES1+2
$$MODP^ICPTMOD	PCHK+5, OCHK+5, PHYPH+9

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	DISPLAY+3, PCHK+3, OCHK+3, PHYPH+4, QUES+2, QUES1+2
^SRO(136 - [#136]	PCHK+3, OCHK+3, PRIN+3, PRIN+4, PRIN+6, PRIN+8, PRIN+11, PRIN+12*, OPROC+2, OPROC+4 , OPROC+6, OPROC+9, KOMOD+3, PHYPH+11, KPMOD+2, OHYPH+6, QUES+1, QUES1+1

Name	Line Occurrences
KPMOD	PHYPH+2
OCHK	OTH+1, OHYPH+4
OHYPH	OPROC+1
PCHK	SCR27+1
QUES	PRIN+6
QUES1	OPROC+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D0	OCHK+2
>> D1	OCHK+2
>> DA	DISPLAY+2, PCHK+2, OCHK+2, PRIN+3, PRIN+7, PRIN+10, PRIN+15, OPROC+2, OPROC+5, OPROC+8 , OPROC+12, KOMOD+1, KOMOD+2, PHYPH+3, PHYPH+12, KPMOD+2, OHYPH+7
>> DA(1	DISPLAY+2, PCHK+2, OCHK+2, OPROC+2, OPROC+5*, OPROC+12, KOMOD+2, PHYPH+3, OHYPH+7
>> DA(2	OCHK+2
>> DIK	PRIN+1, PHYPH+1
DIR	PRIN+5!, PRIN+7!, PRIN+8~, OPROC+3!, OPROC+5!, OPROC+6~
DIR("?"	QUES, QUES+3, QUES+4, QUES1, QUES1+3, QUES1+4
DIR("A"	PRIN+6, PRIN+9, OPROC+4, OPROC+7
DIR("B"	PRIN+6, PRIN+9, OPROC+4, OPROC+7
DIR(0	PRIN+6, PRIN+9, OPROC+4, OPROC+7
DT	DISPLAY+1, PCHK+1, OCHK+1, PHYPH+3
>> DTOUT	PRIN+7, PRIN+10, OPROC+5, OPROC+8
>> DUOUT	PRIN+7, PRIN+10, OPROC+5, OPROC+8
IOST	PRIN+1, PHYPH+1, PHYPH+10
SRCMOD	SCR27+1~, OTH+1~, PRIN+4, PRIN+5!, PRIN+6, PRIN+16, OPROC+1, OPROC+2, OPROC+3!, OPROC+4 , OPROC+13, PHYPH+2, PHYPH+3, PHYPH+5, PHYPH+7, PHYPH+10!, OHYPH+1, OHYPH+2, OHYPH+4, OHYPH+5!
SRCODE	SCR27+1~, PCHK+2, PCHK+3, PCHK+4, PCHK+5, OTH+1~, OCHK+2, OCHK+3, OCHK+4, OCHK+5 , PRIN+2~, PRIN+3, OPROC+1~, KOMOD+2~, KOMOD+3, KOMOD+5, PHYPH+2, PHYPH+9, PHYPH+13, OHYPH+1~
>> SRCT	QUES+1, QUES+3, QUES+4, QUES1+1, QUES1+3, QUES1+4
SRDA	DISPLAY+1~, DISPLAY+2, DISPLAY+3, SCR27+1~, PCHK+2, PCHK+3, OTH+1~, OCHK+2, OCHK+3, PRIN+2~ , PRIN+3, PRIN+4, PRIN+6, PRIN+7, PRIN+8, PRIN+10, PRIN+11, PRIN+12, PRIN+13, PRIN+16 , OPROC+1~, OPROC+2, OPROC+4, OPROC+5, OPROC+6, OPROC+8, OPROC+9, OPROC+10, OPROC+13, KOMOD+2~ , KOMOD+3, KOMOD+4, PHYPH+2~, PHYPH+3, PHYPH+4, PHYPH+11, KPMOD+1~, KPMOD+2, KPMOD+3, OHYPH+1~ , OHYPH+6, QUES+1, QUES+2, QUES1+1, QUES1+2
SRDA(1	OPROC+2, OPROC+4, OPROC+5, OPROC+6, OPROC+9, OPROC+10, OPROC+13, KOMOD+2, KOMOD+3, KOMOD+4 , QUES1+1
SRDATE	DISPLAY+1~, DISPLAY+3, DISPLAY+4
SRDEF	PRIN+2~, OPROC+1~
>> SRDIRED	KOMOD+1*
SRDUP	PHYPH+2~, PHYPH+6, PHYPH+11, PHYPH+12, OHYPH+1~, OHYPH+3, OHYPH+6, OHYPH+7
SRI	QUES~, QUES+1, QUES1~, QUES1+1
SRIEN	PRIN+2~, PRIN+3, PRIN+4, PRIN+16, OPROC+1~, OPROC+2, OPROC+13
SRJ	PRIN+2~, PRIN+8, PRIN+12, PRIN+13, OPROC+1~, OPROC+6, OPROC+10, KOMOD+2~, KOMOD+3, KOMOD+4 , PHYPH+2~, PHYPH+11, KPMOD+1~, KPMOD+2, KPMOD+3, OHYPH+6
>> SRK	PRIN+11, OPROC+9
SRLIST	PHYPH+2~, PHYPH+3, PHYPH+5, OHYPH+1~, OHYPH+2
SRM	SCR27+1!, PCHK+2, PCHK+5, OTH+1!, OCHK+2, OCHK+5, PRIN+5!, OPROC+3!, PHYPH+2~, PHYPH+7! , PHYPH+8, PHYPH+9, OHYPH+4*!
SRMD	QUES~, QUES+1, QUES+2, QUES1~, QUES1+1, QUES1+2
SRN	PHYPH+2~, PHYPH+5, OHYPH+1~, OHYPH+2
SROK	SCR27+1~, SCR27+2, PCHK+2, PCHK+5, OTH+1~, OTH+2, OCHK+2, OCHK+5, PHYPH+2~, PHYPH+6* , PHYPH+8, PHYPH+9, PHYPH+10, PHYPH+11, PHYPH+12, OHYPH+1~, OHYPH+3*, OHYPH+5, OHYPH+6, OHYPH+7
SROTH	OTH+1~, OCHK+2*, OCHK+3, OHYPH+1~, OHYPH+6
SRQ	PRIN+2~, PRIN+3, PRIN+5, PRIN+11, PRIN+12, PRIN+13, PRIN+14, OPROC+1~, OPROC+3, OPROC+10 , OPROC+11
SRSDATE	SCR27+1~, PCHK+1~, PCHK+3, PCHK+5, OTH+1~, OCHK+1~, OCHK+3, OCHK+5, PRIN+2~, OPROC+1~ , PHYPH+2~, PHYPH+3, PHYPH+4, PHYPH+9
SRSEL	PRIN+2~, PRIN+9, OPROC+1~, OPROC+7
SRSOUT	PRIN+2~, PRIN+3, PRIN+5, PRIN+7, PRIN+10, PRIN+14, OPROC+1~, OPROC+3, OPROC+5, OPROC+8 , OPROC+11
>> SRTN	DISPLAY+2, PCHK+2, OCHK+2, PHYPH+3
SRX	PRIN+2~, PRIN+4, OPROC+1~, OPROC+2, QUES~, QUES+2, QUES1~, QUES1+2
SRY	DISPLAY+1~, DISPLAY+4, DISPLAY+5, PRIN+2~, OPROC+1~, KOMOD+2~, PHYPH+2~, KPMOD+1~, OHYPH+1~, QUES~ , QUES+2, QUES+3, QUES1~, QUES1+2*, QUES1+3
SRY(	PRIN+13, PRIN+15, PRIN+16, OPROC+10, OPROC+12, OPROC+13, KOMOD+4, PHYPH+12, KPMOD+3, OHYPH+7
SRZ	SCR27+1~, PCHK+5, OTH+1~, OCHK+5, PHYPH+2~, PHYPH+9, QUES~, QUES+2, QUES+3, QUES1~ , QUES1+2*, QUES1+3
X	PRIN+7, PRIN+10, PRIN+13, PRIN+16, OPROC+1~, OPROC+5, OPROC+8, OPROC+10, OPROC+13, KOMOD+3 , KOMOD+5, PHYPH+2, PHYPH+13*
>> Y	DISPLAY+4, DISPLAY+5, PCHK+2, OCHK+2, PRIN+8, PRIN+11, PRIN+12, PRIN+15, OPROC+6, OPROC+9 , OPROC+12, PHYPH+8
>> Y(0	PRIN+9, OPROC+7
Z	PRIN+2~, OPROC+1~

Customize PDF page

Package: Surgery

Routine: SROMOD0

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: