ICDXLK Special Lookup ICR (5686)

Name

Value

NUMBER

5686

IA #

5686

DATE CREATED

2011/06/08

CUSTODIAL PACKAGE

DRG GROUPER

USAGE

Private

TYPE

Routine

ROUTINE

ICDXLK

NAME

ICDXLK Special Lookup

GENERAL DESCRIPTION

Routine ICDXLK was developed to replace as a special
lookup routine during the ICD-10 project to navigate between the ICD-9
Diagnosis file 80 and the ICD-10 Diagnosis file 8010 under the two file
solution.  The two file solution had the ICD-9 codes and ICD-10 codes stored
in two separate files.  This solution was abandoned in favor of the one file
solution where both ICD-9 and ICD-10 are stored in the same file (ICD
Diagnosis file 80).  A special lookup routine ICDEXLK was written to navigate
between the two code sets in the same file.  Routine ICDXLK was abandoned and
never exported to test sites, and will not be released to the field.  This ICR
is not used.

STATUS

Withdrawn

EXPIRATION DATE

2013/09/09

ICDXLK

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

This is the entry point for a special lookup.

Requires DIC      Global Root OR File Number

Uses     DIC(0)   Parameters
DIC("A") Prompt
DIC("B") Default
DIC("S") Screen
DIC("W") Write

Special Environment variables

ICDVDT   If this variable exist in the
environment and it is a valid
Fileman date, it will be used to
determine if a code is active or
inactive during the lookup,
otherwise TODAYs date is used.

ICDFMT   If this variable exist in the
environment it will be used to
determine the format of the text
in the selection list.

1  Fileman format
Code followed by Text (default)

2  Lexicon format
Text followed by Code

If DIC(0) contains an "I", control of the lookup is passed back to Fileman.