Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All
Print Page as PDF
Global: ^ICDS

Package: DRG Grouper

Global: ^ICDS


Information

FileMan FileNo FileMan Filename Package
80.4 ICD CODING SYSTEMS DRG Grouper

Description

Directly Accessed By Routines, Total: 46

Package Total Routines
DRG Grouper 13 ^ICD9    ICDDICA    ICDEXA    ICDEXA3    ICDEXC2    ICDEXD2    ICDEXLK    ICDEXLK3
ICDEXLK5    ICDEXLK6    ICDEXS    ^ICD0    ICDEXS2    
Diabetes Registry 6 BDMDDTV    BDMDETV    BDMDFTV    BDMDGTV    BDMTAPI    BDMTV    
IHS GPRA Information System 5 BGP4XTV1    BGP5XTV1    BGP6XTV1    BGP7XTV1    BGP8XTV1    
Taxonomy 5 ATXAPI    ATXCODE    ATXTAXE    ATXTAXI    ATXTV1    
IHS Changes To Lab 3 BLRAG07    BLRRLEVN    BLRRLICD    
Table Maintenance 3 AUM16D    AUM17D    AUMI10D    
IHS ICD CPT Lookup and Grouper 2 AICDPOST    AICDPREI    
IHS Patient 2 AUPNSICA    AUPNSICD    
Electronic Dental Record 1 BADEHL3    
IHS Accounts Receivable 1 BARCFLD    
IHS Dental System 1 ADEAPC1    
Mental Health Social Services 1 AMHUTIL2    
PCC Medical Query 1 AMQQTXC    
Tracking Procedure Workflow 1 BTPWTAX    

Accessed By FileMan Db Calls, Total: 13

Package Total Routines
IHS Changes To Lab 4 BLRAG05C    BLRAG07    BLRICDU0    BLRSGNSU    
Patient Care Component 2 APCDFOA3    APCDFQA3    
Patient Care Component Reports 2 APCLAUD5    APCLYV3    
Taxonomy 2 ATXCODE    ATXTAXI    
IHS ICD CPT Lookup and Grouper 1 AICDPOST    
Lab Service 1 LR7OF1    
PCC Medical Query 1 AMQQTXG    

Pointed To By FileMan Files, Total: 11

Package Total FileMan Files
IHS Uniform Data System 7 UDS 15 TABLE 6 CODES(#90667.7)[#90667.77(.03)]    UDS 15 TABLE 6B&7 CODE LISTS(#90667.8)[#90667.811(.03), #90667.812(.03)]    UDS 16 TABLE 6 CODES(#90668.7)[#90668.77(.03)]    UDS 16 TABLE CODE LISTS(#90668.8)[#90668.811(.03), #90668.812(.03)]    UDS 17 TABLE CODE LISTS(#90669.8)[#90669.811(.03), #90669.812(.03)]    UDS 18 TABLE 6 CODES(#90669.907)[#90669.9077(.03)]    UDS 18 TABLE CODE LISTS(#90669.908)[#90669.90811(.03), #90669.90812(.03)]    
DRG Grouper 2 ICD OPERATION/PROCEDURE(#80.1)[1.1]    ICD DIAGNOSIS(#80)[1.1]    
Patient Care Component 1 HEALTH SUMMARY FLOWSHEET(#9001020)[#9001020.02(.02)]    
Taxonomy 1 TAXONOMY(#9002226)[#9002226.02101(.03)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
VA Fileman 1 FILE(#1)[.03]    

Fields, Total: 5

Field # Name Loc Type Details
.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.
.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.
.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.
.03 ICD FILE 0;3 POINTER TO FILE FILE (#1) 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.
.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.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  All