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.
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.
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.
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.