Routine: SROMOD0

Package	Total	Call Graph
VA FileMan	3	EN^DDIOL (FILE,UPDATE)^DIE ^DIR
CPT HCPCS Codes	1	($$MOD,$$MODP)^ICPTMOD

Package	Total	Caller Graph
Surgery	7	OTHER PROCEDURE CODES OTHER PROCEDURE CPT MODIFIERS PRIN PROCEDURE CPT MODIFIERS SROCD0 SROCD2 SROCDX ^SRO(136

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

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+7, OCHK+5, PHYPH+9

Name	Line Occurrences (* Changed, ! Killed)
^DIC(81.3 - [#81.3]	PCHK+8
^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

Name	Field # of Occurrence
^(0	PCHK+8

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+5, PCHK+7, 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+7, 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+7, PCHK+8, 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+7, 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+7, PCHK+8, OTH+1~, OCHK+5, PHYPH+2~, PHYPH+9, QUES~, QUES+2, QUES+3 , QUES1~, QUES1+2, QUES1+3
U	PCHK+8
X	PCHK+5, 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

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: