Routine: ICDCODE

Package	Total	Call Graph
DRG Grouper	2	($$CODEBA,$$CODEC,$$CODEN,$$ICDD,$$ICDDX,$$ICDOP,$$VCC,$$VLT,$$VLTD,$$VLTP,$$VST,$$VSTD,$$VSTP)^ICDEX HLP^ICDEXH

Package	Total	Caller Graph
Lab Service	10	LR7OB63C LR7OB63D LR7OSAP1 LRAPT3 LRBEBA LRBEBA2 LRBLJPP1 LRBLPC1 LREPI1A LRPXAPIU
DRG Grouper	7	ICD1811 ICD1831J ICD1831K ICDTLB5 ICDTLB5A ICDTLB5B ICDTLB5C
Clinical Reminders	4	PXRMDBL2 PXRMLEX PXRMTDLG PXRMXX2
Registration	4	DGPTLMU4 DGPTLMU5 DGPTLMU6 VAFHCDG
Automated Information Collection System	3	IBDF18E0 IBDFN14 IBDFN9
HINQ	3	DVB458P1 DVB4P66A DVB4P66I
Outpatient Pharmacy	3	PSODIAG PSOHLSN2 PSOHLSNC
Oncology	2	^ONCO(160 ^ONCO(165.5
Prosthetics	2	RMPRBIL RMPRFC4
Radiology Nuclear Medicine	2	RABWORD1 RABWUTL
Emergency Department Integration Software	1	EDPCONV
Event Capture	1	ECEDU
Fee Basis	1	FBPAY67
Health Summary	1	GMTSDCB
Lexicon Utility	1	LEXXM
My HealtheVet	1	MHVUMRPC
National Health Information Network	1	NHINVSIT
Scheduling	1	SDECPAT3

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Main Entry Point
HELP	; Developer Help for an API
ICDDX(CODE,CDT,DFN,SRC)	; Return ICD Dx Code Info	ICR #3990 Status: Retired Usage: Supported
ICDOP(CODE,CDT,DFN,SRC)	; Return ICD Operation/Procedure Code Info	ICR #3990 Status: Retired Usage: Supported
ICDD(CODE,OUTARR,CDT)	; returns ICD description in array	ICR #3990 Status: Retired Usage: Supported
CODEN(CODE,FILE)	; return ien of ICD code	ICR #3990 Status: Retired Usage: Supported
CODEC(IEN,FILE)	;return the ICD code of an ien	ICR #3990 Status: Retired Usage: Supported
CODEZ(CODE,ROOT,FLG)	; Based on IEN/root:
CODEBA(CODE,ROOT)	; Return IEN based on code/root
COMCOM(IEN,VDT)	; Return versioned complication/comorbidity
VST(IEN,VDT,FILE)
VSTD(IEN,VDT)
VSTP(IEN,VDT)	; Versioned Short Text (Proc)
VLT(IEN,VDT,FILE)	; Version Description - Long Text
VLTD(IEN,VDT)	; Versioned Description - Long Text (Dx)
VLTP(IEN,VDT)	; Versioned Description - Long Text (Proc)

Name	Line Occurrences (* Changed, ! Killed)
^TMP("ICDD"	ICDD+32!

Name	Field # of Occurrence
ARR	ICDD+34~*
CDT	ICDDX~, ICDDX+39, ICDOP~, ICDOP+34, ICDD~, ICDD+25, COMCOM+1, VST+1, VSTD+1, VSTP+1 , VLT+1, VLTD+1, VLTP+1
CODE	ICDDX~, ICDDX+39, ICDOP~, ICDOP+34, ICDD~, ICDD+25, CODEN~, CODEN+15, CODEZ~, CODEZ+2 , CODEBA~, CODEBA+11
DFN	ICDDX~, ICDOP~
END	ICDD+24~, ICDD+31*
FILE	CODEN~, CODEN+15, CODEC~, CODEC+9*, CODEC+10, VST~, VST+1, VLT~, VLT+1
FLG	CODEZ~, CODEZ+2
ICDDXARY	ICDD+24~, ICDD+25
ICDDXARY(	ICDD+33, ICDD+34
ICDDXC	ICDD+24~, ICDD+33, ICDD+34, ICDD+35
ICDDXI	ICDD+24~, ICDD+33*, ICDD+34
ICDDXOUT	ICDD+24~, ICDD+25*, ICDD+26, ICDD+27
ICDL	CODEZ+1~, CODEZ+2*, CODEZ+3
IEN	CODEC~, CODEC+10, COMCOM~, COMCOM+1, VST~, VST+1, VSTD~, VSTD+1, VSTP~, VSTP+1 , VLT~, VLT+1, VLTD~, VLTD+1, VLTP~, VLTP+1
OUTARR	ICDD~, ICDD+28, ICDD+29, ICDD+30, ICDD+31, ICDD+32, ICDD+34
ROOT	CODEZ~, CODEZ+2, CODEBA~, CODEBA+11
SRC	ICDDX~, ICDDX+39, ICDOP~, ICDOP+34
U	CODEZ+2
VDT	COMCOM~, VST~, VSTD~, VSTP~, VLT~, VLTD~, VLTP~
X	ICDDX+39~, ICDDX+40, ICDDX+41, ICDOP+34~, ICDOP+35, ICDOP+36, CODEN+15~*, CODEN+16, CODEN+17
Y	CODEZ+1~, CODEZ+2*, CODEZ+3