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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SROMOD

Package: Surgery

Routine: SROMOD


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

Global Variables Directly Accessed

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

Label References

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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All