Routine: SROMOD

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

SROMOD ;BIR/ADM - CPT Modifier Input ; [ 02/27/01 6:32 AM ]

Source Information

Source file <SROMOD.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Surgery	1	SROCVER

Entry Points

Name	Comments	DBIA/ICR reference
QUES1
OCHK	; return value of modifier if acceptable for other procedure
QUES
SOTH	; set logic for ACPT1 x-ref
DISPLAY	; display name with modifier
OTH()	; screen for acceptable CPT code/modifier pair for other procedure
HYPH27	; input CPT hyphenated modifier for principal procedure
KPRIN	; kill logic for ACPT x-ref
KOTH	; kill logic for ACPT1 x-ref
HYPHOTH	; input CPT hyphenated modifier for other procedure
SCR27()	; screen for acceptable CPT code/modifier pair for principal procedure
PCHK	; return value of modifier if acceptable for principal procedure
SPRIN	; set logic for ACPT x-ref

External References

Name	Field # of Occurrence
EN^DDIOL	SPRIN+12, SPRIN+15, SOTH+11, SOTH+14, HYPH27+5, HYPHOTH+5
FILE^DIE	SPRIN+12, SPRIN+15, SOTH+11, SOTH+14
UPDATE^DIE	SPRIN+14, SOTH+13, HYPH27+7, HYPHOTH+7
^DIR	SPRIN+6, SPRIN+9, SOTH+6, SOTH+9
$$MOD^ICPTMOD	DISPLAY+4, SPRIN+3, SOTH+3, HYPH27+4, HYPHOTH+4, QUES+2, QUES1+2
$$MODP^ICPTMOD	PCHK+5, OCHK+5

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	DISPLAY+3, PCHK+3, OCHK+3, SPRIN+3, SPRIN+5, SPRIN+7, SPRIN+10, SPRIN+11*, KPRIN+1!, SOTH+3 , SOTH+5, SOTH+7, SOTH+10, KOTH+1!, HYPH27+6, HYPHOTH+6, QUES+1, QUES+2, QUES1+1, QUES1+2

Name	Line Occurrences
HYPH27	SPRIN+2
HYPHOTH	SOTH+2
OCHK	OTH+1, HYPHOTH+4
PCHK	SCR27+1, HYPH27+4
QUES	SPRIN+5
QUES1	SOTH+5

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, SPRIN+3, SPRIN+6, SPRIN+9, SPRIN+14, KPRIN+1, SOTH+3, SOTH+6* , SOTH+9*, SOTH+13, KOTH+1, HYPH27+7, HYPHOTH+7
>> DA(1	DISPLAY+2, PCHK+2, OCHK+2, SOTH+3, SOTH+6*, SOTH+13, KOTH+1, HYPHOTH+7
>> DA(2	OCHK+2
>> DIK	SPRIN+1, KPRIN+1, SOTH+1, KOTH+1
DIR	SPRIN+4!, SPRIN+6!, SPRIN+7~, SOTH+4!, SOTH+6!, SOTH+7~
DIR("?"	QUES, QUES+3, QUES+4, QUES1, QUES1+3, QUES1+4
DIR("A"	SPRIN+5, SPRIN+8, SOTH+5, SOTH+8
DIR("B"	SPRIN+5, SPRIN+8, SOTH+5, SOTH+8
DIR(0	SPRIN+5, SPRIN+8, SOTH+5, SOTH+8
DT	DISPLAY+1, PCHK+1, OCHK+1
>> DTOUT	SPRIN+6, SPRIN+9, SOTH+6, SOTH+9
>> DUOUT	SPRIN+6, SPRIN+9, SOTH+6, SOTH+9
ICPTVDT	PCHK+1!, PCHK+6, OCHK+1!, OCHK+6
IOST	SPRIN+1, KPRIN+1, SOTH+1, KOTH+1
SRCMOD	SCR27+1~, OTH+1~, SPRIN+2, SPRIN+3, SPRIN+4!, SPRIN+5, SPRIN+15, SOTH+2, SOTH+3, SOTH+4! , SOTH+5, SOTH+14, HYPH27+1, HYPH27+2, HYPH27+4, HYPH27+5!, HYPHOTH+1, HYPHOTH+2, HYPHOTH+4, HYPHOTH+5!
SRCODE	SCR27+1~, PCHK+2, PCHK+3, PCHK+4, PCHK+5, OTH+1~, OCHK+2, OCHK+3, OCHK+4, OCHK+5 , SPRIN+2~, SOTH+2~, HYPH27+1~, HYPHOTH+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, SPRIN+2~ , SPRIN+3, SPRIN+5, SPRIN+6, SPRIN+7, SPRIN+9, SPRIN+10, SPRIN+11, SPRIN+12, SPRIN+15, SOTH+2~ , SOTH+3*, SOTH+5, SOTH+6, SOTH+7, SOTH+9, SOTH+10, SOTH+11, SOTH+14, HYPH27+1~, HYPH27+6 , HYPHOTH+1~, HYPHOTH+6, QUES+1, QUES+2, QUES1+1, QUES1+2
SRDA(1	SOTH+3*, SOTH+5, SOTH+6, SOTH+7, SOTH+10, SOTH+11, SOTH+14, QUES1+1
SRDATE	DISPLAY+1~, DISPLAY+3, DISPLAY+4
SRDEF	SPRIN+2~, SOTH+2~
SRDUP	HYPH27+1~, HYPH27+3, HYPH27+6, HYPH27+7, HYPHOTH+1~, HYPHOTH+3, HYPHOTH+6, HYPHOTH+7
SRI	QUES~, QUES+1, QUES1~, QUES1+1
SRIEN	SPRIN+2~, SPRIN+3, SPRIN+15, SOTH+2~, SOTH+3, SOTH+14
SRJ	SPRIN+2~, SPRIN+7, SPRIN+11, SPRIN+12, SOTH+2~, SOTH+7, SOTH+11, HYPH27+6, HYPHOTH+6
>> SRK	SPRIN+10, SOTH+10
SRLIST	HYPH27+1~, HYPH27+2, HYPHOTH+1~, HYPHOTH+2
SRM	SCR27+1!, PCHK+2, PCHK+5, OTH+1!, OCHK+2, OCHK+5, SPRIN+4!, SOTH+4!, HYPH27+4!, HYPHOTH+4!
SRMD	QUES~, QUES+1, QUES+2, QUES1~, QUES1+1, QUES1+2
SRN	HYPH27+1~, HYPH27+2, HYPHOTH+1~, HYPHOTH+2
SROK	SCR27+1~, SCR27+2, PCHK+2, PCHK+5, OTH+1~, OTH+2, OCHK+2, OCHK+5, HYPH27+1~, HYPH27+3* , HYPH27+5, HYPH27+6, HYPH27+7, HYPHOTH+1~, HYPHOTH+3*, HYPHOTH+5, HYPHOTH+6, HYPHOTH+7
SROTH	OTH+1~, OCHK+2*, OCHK+3, HYPHOTH+1~, HYPHOTH+6
SRQ	SPRIN+2~, SPRIN+4, SPRIN+10, SPRIN+11, SPRIN+12, SPRIN+13, SOTH+2~, SOTH+4, SOTH+11, SOTH+12
SRSDATE	SCR27+1~, PCHK+1~, PCHK+3, PCHK+5, PCHK+6, OTH+1~, OCHK+1~, OCHK+3, OCHK+5, OCHK+6 , SPRIN+2~, SOTH+2~
SRSEL	SPRIN+2~, SPRIN+8, SOTH+2~, SOTH+8
SRSOUT	SPRIN+2~, SPRIN+4, SPRIN+6, SPRIN+9, SPRIN+13, SOTH+2~, SOTH+4, SOTH+6, SOTH+9, SOTH+12
>> SRTN	DISPLAY+2, PCHK+2, OCHK+2
SRX	SPRIN+2~, SPRIN+3, SOTH+2~, SOTH+3, QUES~, QUES+2, QUES1~, QUES1+2
SRY	DISPLAY+1~, DISPLAY+4, DISPLAY+5, SPRIN+2~, SOTH+2~, HYPH27+1~, HYPHOTH+1~, QUES~, QUES+2, QUES+3 , QUES1~, QUES1+2*, QUES1+3
SRY(	SPRIN+12, SPRIN+14, SPRIN+15, SOTH+11, SOTH+13, SOTH+14, HYPH27+7, HYPHOTH+7
SRZ	SCR27+1~, PCHK+5, OTH+1~, OCHK+5, QUES~, QUES+2, QUES+3, QUES1~, QUES1+2, QUES1+3
X	SPRIN+2~, SPRIN+6, SPRIN+9, SPRIN+12, SPRIN+15, SOTH+2~, SOTH+6, SOTH+9, SOTH+11, SOTH+14
>> Y	DISPLAY+4, DISPLAY+5, PCHK+2, OCHK+2, SPRIN+7, SPRIN+10, SPRIN+11, SPRIN+14, SOTH+7, SOTH+10 , SOTH+13
>> Y(0	SPRIN+8, SOTH+8
Z	SPRIN+2~, SOTH+2~

Customize PDF page

Package: Surgery

Routine: SROMOD

Call Graph Total: 4

Caller Graph Total: 1