Routine: ICPTMOD

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
DRG Grouper	2	($$MODP,MODA,MODC,MULT)^ICPTMOD2 ($$DTBR,$$EFF,$$MSG)^ICPTSUPT
Kernel	1	$$DT^XLFDT

Package	Total	Caller Graph
Surgery	24	SRHLUO1 SRHLUO2 SRHLVUO1 SRHLVUO2 SROACC0 SROADX1 SROATM3 SROATMNO SROAUTL SROAUTL0 SROCD2 SROCDX SROCPT SROCPT0 SROGMTS SROMOD SROMOD0 SROPCE SROPCE0A SROPCEP SROVER SROVER1 SROVER2 SRSCOR
PCE Patient Care Encounter	10	PXAICPTV PXAIMOD PXBDCPT PXBGCPT4 PXCACPT1 PXCAVST1 PXCECPT PXCPTAPI PXKMOD PXRHS02
Lexicon Utility	8	LEXQCM LEXQCMA LEXQCP2 LEXQHL4 LEXQL LEXQL4 LEXU2 LEXXM
Scheduling	7	SCMSVUT2 SCRPW15 SCRPW401 SCRPW46 SDAMBMR2 SDCO0 SDPPADD1
Automated Information Collection System	4	IBDF18E0 IBDFBK3 IBDFDE1 IBDFDE23
Registration	4	DGAPI1 DGPTUTL1 DGYACPT VAFHLPR1
DRG Grouper	3	ICPTCOD ICPTID ICPTMOD2
Health Summary	3	GMTSPXOP GMTSRAE GMTSROE
GUI Objects	1	BGOVCPT2
Lab Service	1	LRBEBA21
Order Entry Results Reporting	1	ORWPCE
Radiology Nuclear Medicine	1	RACPTMSC
Text Integration Utility	1	TIUPXAPC
Third Party Billing	1	ABMCVAPI

Package

Total

Caller Graph

Surgery

SRHLUO1  SRHLUO2  SRHLVUO1  SRHLVUO2  SROACC0  SROADX1  SROATM3  SROATMNO
SROAUTL  SROAUTL0  SROCD2  SROCDX  SROCPT  SROCPT0  SROGMTS  SROMOD
SROMOD0  SROPCE  SROPCE0A  SROPCEP  SROVER  SROVER1  SROVER2  SRSCOR

PCE Patient Care Encounter

PXAICPTV PXAIMOD PXBDCPT PXBGCPT4 PXCACPT1 PXCAVST1 PXCECPT PXCPTAPI
PXKMOD PXRHS02

Lexicon Utility

LEXQCM LEXQCMA LEXQCP2 LEXQHL4 LEXQL LEXQL4 LEXU2 LEXXM

Scheduling

SCMSVUT2 SCRPW15 SCRPW401 SCRPW46 SDAMBMR2 SDCO0 SDPPADD1

Automated Information Collection System

IBDF18E0 IBDFBK3 IBDFDE1 IBDFDE23

Registration

DGAPI1 DGPTUTL1 DGYACPT VAFHLPR1

DRG Grouper

ICPTCOD ICPTID ICPTMOD2

Health Summary

GMTSPXOP GMTSRAE GMTSROE

GUI Objects

BGOVCPT2

Lab Service

LRBEBA21

Order Entry Results Reporting

ORWPCE

Radiology Nuclear Medicine

RACPTMSC

Text Integration Utility

TIUPXAPC

Third Party Billing

ABMCVAPI

Entry Points

Name	Comments	DBIA/ICR reference
MOD(MOD,MFT,MDT,SRC,DFN)	; returns basic info on CPT MODIFIERs
MODDQ	; Modifier Description Quit
MODC(MOD)	; Checks modifier for range including code
MODQ	; Modifier Quit
CODEN(CODE)
TRIM(X)	; Trim Spaces
MODA(CODE,VDT,ARY)	; Return an array of Modifiers for a CPT Code
MO(X)	; Modifier X = Modifier IEN
VSTCM(IEN,VDATE)	; Versioned Short Text (CPT Modifier)
MODP(CODE,MOD,MFT,MDT,SRC,DFN)	; Check if modifier can be used with code
MODD(CODE,OUTARR,DFN,CDT)
MULT	; Finds Duplicate Modifiers
VLTCM(IEN,VDATE,ARY)	; Versioned Description - Long Text (CPT Modifier)

Name	Field # of Occurrence
$$MODP^ICPTMOD2	MODP+1
MODA^ICPTMOD2	MODA+1
MODC^ICPTMOD2	MODC+1
MULT^ICPTMOD2	MULT+1
$$DTBR^ICPTSUPT	MOD+29, MODD+32
$$EFF^ICPTSUPT	MOD+39
$$MSG^ICPTSUPT	MOD+41, MODD+38
$$DT^XLFDT	MOD+29, MODD+32, VSTCM+3, VLTCM+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(81.3 - [#81.3]	MOD+30, MOD+33, MOD+34, MODD+31, MODD+39, CODEN+2, VSTCM+2, VSTCM+4, VSTCM+5, VSTCM+6 , VSTCM+8, VSTCM+9, VSTCM+10, VLTCM+2, VLTCM+4, VLTCM+5, VLTCM+6, VLTCM+8, VLTCM+9, VLTCM+10 , VLTCM+11, VLTCM+12, VLTCM+13, VLTCM+14, VLTCM+15, VLTCM+16, MO+1
^TMP("ICPTD"	MODD+29!

Name	Line Occurrences
$$CODEN	MODD+30
$$TRIM	MODD+35, VSTCM+11, VLTCM+10, VLTCM+14, VLTCM+16
$$VSTCM	MOD+35
MODDQ	MODD+24, MODD+31
MODQ	MOD+26, MOD+28, MOD+30, MOD+33, MOD+36
MULT	MOD+30
VLTCM	MODD+33

Name	Field # of Occurrence
^(	MOD+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARR	MODD+23~, MODD+35, MODD+37, MODD+38*
ARY	MODA~, VLTCM~, VLTCM+15!
ARY(	VLTCM+10, VLTCM+14, VLTCM+16*
ARY(0	VLTCM+7, VLTCM+10, VLTCM+11, VLTCM+14, VLTCM+16*
CDT	MODD~, MODD+32*, MODD+33, MODD+38
COD	CODEN+2~*, CODEN+3
CODE	MODD~, MODD+24, MODD+30*, MODD+31, MODD+33, MODD+39, MODA~, MODP~, MODP+1, CODEN~ , CODEN+1, CODEN+2
CPT0	VSTCM+1~, VSTCM+4, VSTCM+11, VLTCM+1~, VLTCM+4
CPTC	VSTCM+1~, VSTCM+4, VSTCM+5, VSTCM+6, VSTCM+8, VLTCM+1~, VLTCM+4, VLTCM+5, VLTCM+6, VLTCM+8
CPTD	VLTCM+1~, VLTCM+9, VLTCM+10, VLTCM+13, VLTCM+14, VLTCM+15*, VLTCM+16
CPTI	VSTCM+1~, VSTCM+2, VSTCM+4, VSTCM+6, VSTCM+8, VSTCM+9, VSTCM+10, VLTCM+1~, VLTCM+2, VLTCM+4 , VLTCM+6, VLTCM+8, VLTCM+9, VLTCM+10, VLTCM+11, VLTCM+12, VLTCM+13, VLTCM+14, VLTCM+15, VLTCM+16
CPTSTD	VSTCM+1~, VSTCM+5, VSTCM+6, VSTCM+7, VSTCM+8, VSTCM+9, VSTCM+10, VLTCM+1~, VLTCM+5, VLTCM+6* , VLTCM+7, VLTCM+8, VLTCM+11*, VLTCM+12
CPTSTI	VSTCM+1~, VSTCM+8, VSTCM+10, VLTCM+1~, VLTCM+8, VLTCM+9, VLTCM+10, VLTCM+12, VLTCM+13, VLTCM+14
CPTT	VLTCM+1~, VLTCM+9, VLTCM+10, VLTCM+13, VLTCM+14, VLTCM+15, VLTCM+16
CPTTD	VSTCM+1~, VSTCM+5, VSTCM+6, VLTCM+1~, VLTCM+5, VLTCM+6
CPTTI	VSTCM+1~, VSTCM+6, VLTCM+1~, VLTCM+6
CPTTXT	VSTCM+1~, VSTCM+7, VSTCM+8, VSTCM+9, VSTCM+10, VLTCM+1~
CPTVDT	VSTCM+1~, VSTCM+3, VSTCM+5, VLTCM+1~, VLTCM+3, VLTCM+5
CTV	MODD+23~, MODD+33
CTV(	MODD+34, MODD+35
DATA	MOD+25~, MOD+34*, MOD+36, MOD+37
DFN	MOD~, MODD~, MODP~, MODP+1
EFF	MOD+25~, MOD+39, MOD+40, MOD+41
EFFS	MOD+25~
EFFX	MOD+25~
END	MODD+23~, MODD+28*
I	MODD+23~, MODD+30, MODD+34, MODD+35
IEN	VSTCM~, VSTCM+2, VLTCM~, VLTCM+2
MDT	MOD~, MOD+29*, MOD+35, MOD+39, MOD+41, MODP~, MODP+1
MFT	MOD~, MOD+27*, MOD+28, MOD+30, MOD+31, MODP~, MODP+1
MOD	MOD~, MOD+26, MOD+30, MOD+31, MOD+32, MOD+33, MOD+34, MOD+35, MOD+37, MOD+39 , MODP~, MODP+1, MODC~, MODC+1
MODN	MOD+25~, MOD+30*, MOD+31
MODST	MOD+25~, MOD+35*, MOD+42
N	MODD+23~, MODD+24, MODD+30, MODD+31, MODD+34, MODD+35, MODD+36, MODD+37, MODD+38, MODD+39 , MODDQ+1
OUTARR	MODD~, MODD+25, MODD+26, MODD+27, MODD+28, MODD+29, MODD+35, MODD+37, MODD+38
SRC	MOD~, MOD+38, MODP~, MODP+1
STR	MOD+25~, MOD+26, MOD+28, MOD+30, MOD+33, MOD+36, MOD+37, MOD+38, MOD+41, MOD+42 , MODQ+1
VDATE	VSTCM~, VSTCM+3, VLTCM~, VLTCM+3
VDT	MODA~
X	TRIM~, TRIM+1, TRIM+2, TRIM+3*, TRIM+4, MO~, MO+1

Customize PDF page

Package: DRG Grouper

Routine: ICPTMOD

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 69

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: