STANDARD DATA DICTIONARY #80.4 -- ICD CODING SYSTEMS FILE 9/29/25 PAGE 1
STORED IN ^ICDS( (4 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 18.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a listing of ICD coding systems stored in file 80 and 80.1. The Internal Entry Numbers (IENs) in this file are
identical to those found in the Lexicon's CODING SYSTEM file 757.03.
This table file should NOT be edited in anyway by the site.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
POINTED TO BY: ICD VERSION field (#9) of the CATASTROPHIC DISABILITY REASONS File (#27.17)
ICD VERSION field (#.05) of the PTF EXPANDED CODE File (#45.89)
CODING SYSTEM field (#1) of the ICD DIAGNOSIS sub-field (#69.54) of the LAB SEARCH/EXTRACT File (#69.5)
CODING SYSTEM field (#1.1) of the ICD DIAGNOSIS File (#80)
CODING SYSTEM field (#1.1) of the ICD OPERATION/PROCEDURE File (#80.1)
CODING SYSTEM field (#.02) of the ICD SEARCH API File (#130.4)
CODING SYSTEM field (#.01) of the CODING SYSTEM UPDATES sub-field (#357.03) of the ENCOUNTER FORM File (#357)
ICD CODING SYSTEM field (#.22) of the PACKAGE INTERFACE File (#357.6)
CODING SYSTEM field (#7) of the ROR SELECTION RULE File (#798.2)
ICD VERSION field (#.07) of the A&SP DIAGNOSTIC CONDITION File (#509850.1)
CROSS
REFERENCED BY: ICD CODING SYSTEM NOMENCLATURE(B), CODING SYSTEM ABBREVIATION(C), ICD FILE(F)
80.4,.001 ICD CODING SYSTEM NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1.N) X
LAST EDITED: SEP 29, 2011
HELP-PROMPT: Enter a number between 1 and 9999.
DESCRIPTION:
This is a numeric representation of a ICD Coding System.
80.4,.01 ICD CODING SYSTEM NOMENCLATURE 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3) X
LAST EDITED: OCT 03, 2011
HELP-PROMPT: Enter a Coding System Nomenclature (3-30 characters).
DESCRIPTION: This is the ICD Coding system, to include the ICD designator, the version number and an identifier
for the type if ICD coding system (diagnosis or procedure). Examples: ICD-9-CM, ICD-10-CM,
ICD-10-PCS, etc.
CROSS-REFERENCE: 80.4^B
1)= S ^ICDS("B",$E(X,1,30),DA)=""
2)= K ^ICDS("B",$E(X,1,30),DA)
^ICDS("B",NOM,IEN) - Where NOM is the coding system nomenclature (i.e., ICD-9-CM, ICD-10-PCS, etc.)
and IEN is the Internal Entry Number in the ICD CODING SYSTEMS file #80.4 where the nomenclature is
stored.
80.4,.02 CODING SYSTEM ABBREVIATION 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>3!($L(X)<3) X
LAST EDITED: OCT 03, 2011
HELP-PROMPT: Enter the Coding System Abbreviation (3 characters).
DESCRIPTION:
This is a unique 3 character identifier for the coding system.
CROSS-REFERENCE: 80.4^C
1)= S ^ICDS("C",$E(X,1,30),DA)=""
2)= K ^ICDS("C",$E(X,1,30),DA)
^ICDS("C",SAB,IEN) - Where SAB is the coding system abbreviation and IEN is the Internal Entry
Number in the ICD CODING SYSTEMS file #80.4 where the abbreviation is stored.
80.4,.03 ICD FILE 0;3 POINTER TO FILE FILE (#1)
INPUT TRANSFORM: I +Y=80!(+Y=80.1) D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: OCT 03, 2011
HELP-PROMPT: Enter the appropriate file number (80 or 80.1).
DESCRIPTION:
This is the file number were the ICD CODING SYSTEM is stored.
SCREEN: I +Y=80!(+Y=80.1)
EXPLANATION: Selection limited to ICD files 80 and 80.1
CROSS-REFERENCE: 80.4^F
1)= S ^ICDS("F",$E(X,1,30),DA)=""
2)= K ^ICDS("F",$E(X,1,30),DA)
^ICDS("F",FIL,IEN) - Where FIL is the file number where the coding system is stored and IEN is the
Internal Entry Number in the ICD CODING SYSTEMS file #80.4 where the file number is stored.
80.4,.04 IMPLEMENTATION DATE 0;4 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:X<1 X
LAST EDITED: OCT 03, 2011
HELP-PROMPT: Enter the date the ICD coding system was implemented.
DESCRIPTION:
This is the date the ICD CODING SYSTEM was implemented in the VA.
FILES POINTED TO FIELDS
FILE (#1) ICD FILE (#.03)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):