STANDARD DATA DICTIONARY #80.4 -- ICD CODING SYSTEMS FILE 3/24/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):