ICD Data Extraction    ICR (5747)

This is an ICD diagnosis code in either the external
or internal format.  If the internal format is used, then the input variable
FMT must be set to "I" (Required).

This is the Code Set Versioning date (Fileman format)
used to identify the code and text that was appropriate for the date passed in
this input parameter. (Optional, if not supplied, TODAY will be used)

This is an ICD coding system identifier (taken from
file 80.4).  The following coding systems are found in file 80:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis

(Optional, but highly encouraged)

This variable tells the API if the CODE is in
External or Internal format.

"E" = External (default)
"I" = Internal Entry Number

(Conditional, required if CODE is in internal format)

This is a 20 piece string delimited by "^"

1  IEN of code in ^ICD9(
2  ICD Dx Code                  (#.01)
3  Identifier                   (#1.2)
4  Versioned Dx                 (67 multiple)
5  Unacceptable as Principal Dx (#1.3)
6  Major Dx Cat                 (72 multiple)
7  MDC13                        (#1.4)
8  Compl/Comorb                 (103 multiple)
9  ICD Expanded                 (#1.7)
10  Status                       (66 multiple)
11  Sex                          (10 multiple)
12  Inactive Date                (66 multiple)
13  MDC24                        (#1.5)
14  MDC25                        (#1.6)
15  Age Low                      (11 multiple)
16  Age High                     (12 multiple)
17  Activation Date              (66 multiple)
18  Message
19  Complication/Comorbidity     (103 multiple)
20  Coding System                (#1.1)
21  Primary CC Flag              (103 multiple)
22  PDX Exclusion Code           (#1.11)
or

-1^Error Description

This is a boolean flag used to indicate if the API is
to use local VA codes.  It only applies to ICD-9 for backwards compatibility.

1 = Use local VA codes
0 = Do not use local VA codes (default)

This is an ICD operation/procedure code in either the
external or internal format.  If the internal format is used, then the input
variable FMT must be set to "I" (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the code and text that was appropriate for the date passed in
CDT.  (Optional, if not supplied, TODAY will be used)

This is an ICD coding system identifier (taken from
file 80.4).  The following coding systems are found in file 80.1:

2 = ICD-9 Procedures
31 = ICD-10 Procedures

(Optional, but highly encouraged)

This variable tells the API if the CODE is in
External or Internal format.

"E" = External (default)
"I" = Internal Entry Number

(Conditional, required if CODE is in internal format)

This is a 15 piece string delimited by "^"

1   IEN of code in ^ICD0(
2   ICD procedure code           (#.01)
3   Identifier                   (#1.2)
4   MDC24                        (#1.5)
5   Versioned Oper/Proc          (67 multiple)
6   <null>
7   <null>
8   <null>
9   ICD Expanded                 (#1.7)
10   Status                       (66 multiple)
11   Use with Sex                 (10 multiple)
12   Inactive Date                (66 multiple)
13   Activation Date              (66 multiple)
14   Message
15   Coding System                (#1.1)

or

-1^Error Description

This is a boolean flag used to indicate if the API is
to use local VA codes.  It only applies to ICD-9 for backwards compatibility.

1 = Use local VA codes
0 = Do not use local VA codes (default)

This is an ICD-9 or ICD-10 code in external format
only  (Required).

This is the name of a local array, passed by
reference that will contain the output of this API.  (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the text that was appropriate for the date passed in this
input parameter. (Optional, if not supplied, TODAY will be used)

This is an ICD coding system identifier (taken from
file 80.4).  The following coding systems are found in files 80 and 80.1:

1 = ICD-9 Diagnosis file 80
2 = ICD-9 Procedure file 80.1
30 = ICD-10 Diagnosis file 80
31 = ICD-10 Procedure file 80.1

(Optional, but highly encouraged)

This is the text string length of the description
placed in array .ARY.  (Optional, if passed it must be greater than 27 based
on the longest word found in a diagnosis or procedure description and not
greater than 245.  If not passed it defaults to 245 characters based in the
input transformation)

This is the number of lines in the output array .ARY
or if an error occurs, -1^Error Message

This is a local array, passed by reference,
containing the long description of an ICD code with string lengths defined by
LEN when passed or 245 characters.  If there is a warning message about text
accuracy (ICD-9 only) it will be appended to the end of the message preceded
by a blank line.

ARY(1) - Description (length of LEN)
ARY(n) - Description (continued if necessary)

If there is a warning message (ICD-9 only):

ARY(n+1) - blank
ARY(n+2) - message: CODE TEXT MAY BE INACCURATE

This is an ICD-9 or ICD-10 code in external format
only  (Required).

This is the file number where the CODE is stored,
either 80 or 80.1 (Required)

This is the Internal Entry Number (IEN) of CODE in
file FILE appended by a tilde "~" and the global root FILE:

IEN~^ROOT

or -1^Error Message on error

This is the ICD file number used to retrieve the code
(Required)

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is the internal entry number in FILE were the
code to be retrieved is stored (Required)

This is either the ICD code stored at the Internal
Entry Number IEN in the file identified by the FILE input parameter, or upon
error:

-1 ^ Error Message

This is either an ICD Diagnosis code or ICD Procedure
code (Required)

This is the global root (or file number) where the
code is stored (Required)

This is the internal entry number (IEN) in the
specified file where the code is stored or -1 if not found.

This is either an ICD Diagnosis code or ICD Procedure
code (Required)

This is the global root (or file number) where the
code is stored (Optional if SYS is supplied)

This is an ICD coding system identifier (taken from
file 80.4).  The following coding systems are found in files 80 and 80.1:

1 = ICD-9 Diagnosis file 80
2 = ICD-9 Procedure file 80.1
30 = ICD-10 Diagnosis file 80
31 = ICD-10 Procedure file 80.1

This API will look for the code on one of the system specific
cross-references:

^ICD9("ABA",1,CODE,IEN)    ICD-9 Diagnosis
^ICD9("ABA",30,CODE,IEN)   ICD-10 Diagnosis
^ICD0("ABA",2,CODE,IEN)    ICD-9 Procedure
^ICD0("ABA",31,CODE,IEN)   ICD-10 Procedure

If not supplied, the API will attempt to determine the system based on code
and file.

(Optional, but highly encouraged)

This is the internal entry number (IEN) in the
specified file where the code is stored or -1 if not found.

This is either an ICD Diagnosis code or ICD Procedure
code (Required)

This is the ICD file number where the specified code
was found:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

or NULL if not found or could not resolve to a single file.

This is either an ICD Diagnosis code or ICD Procedure
code (Required)

This is the ICD file number used to resolve the
coding system:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

(Optional, but encouraged)  If not supplied, an attempt to resolve the input
variable FILE will be made using the entry point $$CODEFI(CODE).

This is the Code Set Versioning date (Fileman format)
used to resolve the coding system.

This date is ONLY used if a code is found in both ICD-9 and ICD-10 systems.
If that ever happens, the date passed will determine the coding system. If the
date passed is before the ICD-10 implementation date it will be considered an
ICD-9 code and if it is on or after the ICD-10 implementation date then it
will be considered ICD-10.

This is a 2 piece "^" delimited string containing:

1   Coding System (pointer to file 80.4)
2   Coding Nomenclature (commonly used name)

Example output values:

1^ICD-9-CM
30^ICD-10-CM
2^ICD-9 Proc
31^ICD-10-PCS

NULL if the API cannot resolve the coding system based on code, file and date.

This is the ICD file number used to retrieve the
coding system (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required).

This is a pointer to the ICD CODING SYSTEMS file
#80.4

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the Major Diagnostic Category that was appropriate for the
date passed (Optional, if not passed TODAY is used).

This is a flag used to determine the output format.
Acceptable values are 0 and 1 (Optional, default value is 0).

FMT = 0    Major Diagnostic Category (MDC)
FMT = 1    MDC^Effective Date

This is the Major Diagnostic Category (MDC) that was
appropriate for the date passed and the diagnosis code identified by input
parameter IEN.  The output may also have a second "^" delimited piece
containing the MDC Effective Date if the input parameter FMT is set to 1.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the Age Low value that was appropriate for the date passed
(Optional, if not passed TODAY is used).

This is a flag used to determine the output format.
Acceptable values are 0 and 1 (Optional, default value is 0).

FMT = 0    Age Low
FMT = 1    Age Low^Effective Date

This is the Age Low that was appropriate for the date
passed and the diagnosis code identified by the input parameter IEN.  The
output may also have a second "^" delimited piece containing the Age Low
Effective Date if the input parameter FMT is set to 1.  Null if Age Low not
found for date.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the Age High value that was appropriate for the date passed
(Optional, if not passed TODAY is used).

This is a flag used to determine the output format.
Acceptable values are 0 and 1 (Optional, default value is 0).

FMT = 0    Age High
FMT = 1    Age High^Effective Date

This is the Age High that was appropriate for the
date passed and the diagnosis code identified by the input parameter IEN.  The
output may also have a second "^" delimited piece containing the Age High
Effective Date if the input parameter FMT is set to 1.  Null if Age High is
not found for date.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the CC designation value that was appropriate for the date
passed (Optional, if not passed TODAY is used).

This is a flag used to determine the output format.
Acceptable values are 0 and 1 (Optional, default value is 0).

FMT = 0    CC designation
FMT = 1    CC designation^Effective Date

This is the CC designation that was appropriate for
the date passed and the diagnosis code identified by the input parameter IEN.
The output may also have a second "^" delimited piece containing the CC
designation Effective Date if the input parameter FMT is set to 1.

0 = Non-Complication Comorbidity (Non-CC)
1 = Complication Comorbidity (CC)
2 = Major Complication Comorbidity (MCC)

Null if not found for date

This is the ICD file number used to retrieve the sex
designation:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in either the
DIAGNOSIS file 80 or OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the sex designation value that was appropriate for the date
passed (Optional, if not passed TODAY is used).

This is a flag used to determine the output format.
Acceptable values are 0 and 1 (Optional, default value is 0).

FMT = 0    Sex designation
FMT = 1    Sex designation^Effective Date

This is the sex designation that was appropriate for
the date passed and the code identified by the input parameter IEN.  The
output may also have a second "^" delimited piece containing the sex
designation Effective Date if the input parameter FMT is set to 1.

M = Male
F = Female
Null if sex is N/A or not found for date

This is the ICD file number used to retrieve the
status and effective dates:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in either the
DIAGNOSIS file 80 or OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the status and effective dates that were appropriate for the
date passed (Optional, if not passed TODAY is used).

This is a 6 piece "^" delimited string

1  Status
2  Activation Date
3  Inactivation Date
4  IEN
5  Code
6  Short Text

If the status is active, the short
text will be the most recent.

If the status is inactive, the short
text will be the text in use on the
date it was inactivated.

Null if no status for date.

This is the ICD file number used to retrieve the
Versioned Short Text:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in either the
DIAGNOSIS file 80 or OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Short Text that was appropriate for the date
passed (Optional, if not passed TODAY is used).

This is the Versioned Short Text from either file 80
(DIAGNOSIS) or 80.1 (OPERATION/PROCEDURE) that was appropriate for the date
passed and the code identified by the input parameter IEN.  Null if not found.

This is the ICD file number used to retrieve the
Versioned Long Text (description):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in either the
DIAGNOSIS file 80 or OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Long Text (description) that was appropriate
for the date passed (Optional, if not passed TODAY is used).

This is the Versioned Long Text (description) from
either file 80 or 80.1 that was appropriate for the date passed and the code
identified by the input parameter IEN.  Null if not found.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Short Text that was appropriate for the date
passed (Optional, if not passed TODAY is used).

This is the Versioned Short Text from file 80 that
was appropriate for the date passed and the code identified by the input
parameter IEN.  Null if not found.

This is an Internal Entry Number (IEN) in the
OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Short Text that was appropriate for the date
passed (Optional, if not passed TODAY is used).

This is the Versioned Short Text from file 80.1 that
was appropriate for the date passed and the code identified by the input
parameter IEN.  Null if not found.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Long Text (description) that was appropriate
for the date passed (Optional,  If not passed TODAY is used).

This is the Versioned Long Text (description) from
file 80 that was appropriate for the date passed and the code identified by
the input parameter IEN.  Null if not found.

This is an Internal Entry Number (IEN) in the
OPERATION/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Long Text (description) that was appropriate
for the date passed (Optional,  If not passed TODAY is used).

This is the Versioned Long Text (description) from
file 80.1 that was appropriate for the date passed and the code identified by
the input parameter IEN.  Null if not found.

This is the ICD file number used to retrieve the
Versioned Short Text (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an internal entry number (IEN) in either file
80 or 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Short Text that was appropriate for the date
passed (Optional,  If not passed TODAY is used).

This is a local array name passed by reference that
will contain the Short Text output.

This is a number greater than 27 and less than 246
representing the desired text string lengths for the Short Text output.  If
specified, the output will be parsed into strings not to exceed the length
specified (Optional, default 245)

This is the Versioned Short Text from either file 80
or 80.1 that was appropriate for the date passed and the code identified by
the input parameter IEN.  If not found:

-1^Error Message

If passed, this is a local array containing the
number of text lines, the effective date of the Short Text and the text.  If
the input parameter LEN (length) is specified and the length is shorter than
the Short Text, then the Short Text will be parsed into test strings not to
exceed LEN.

ARY(0)=# lines ^ effective date
ARY(1)=Short Text

LEN is defined shorter than text

ARY(0)=# lines ^ effective date
ARY(1)=String length not to exceed LEN
ARY(n)=String length not to exceed LEN

Null if not found

This is the ICD file number used to retrieve the
Versioned Long Text (description) (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an internal entry number (IEN) in either file
80 or 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the Versioned Long Text (description) that was appropriate
for the date passed (Optional,  If not passed TODAY is used).

This is a local array name passed by reference that
will contain the Long Text (description) output.

This is a number greater than 27 and less than 246
representing the desired text string lengths for the Long Text (description)
output.  If specified, the output will be parsed into strings not to exceed
the length specified (Optional, default 245)

This is the Versioned Long Text (description) from
either file 80 or 80.1 that was appropriate for the date passed and the code
identified by the input parameter IEN.  If not found:

-1^Error Message

If passed, this is a local array containing the
number of text lines, the effective date of the Long Text (description) and
the text.  If the input parameter LEN (length) is specified and the length is
shorter than the Long Text (description), then the Long Text (description)
will be parsed into test strings not to exceed LEN.

ARY(0)=# lines ^ effective date
ARY(1)=Long Text (description)

LEN defined shorter than text

ARY(0)=# lines ^ effective date
ARY(1)=String length not to exceed LEN
ARY(n)=String length not to exceed LEN

This is a local array name passed by reference and
contains the text to be parsed into strings not to exceed the length
specified.

ARY(1) = Unparsed Text

This is a number representing the desired text string
lengths for the text found in ARY().  (Optional, default length 79)

This is a local array containing the input text
parsed so that each text string length does not exceed the length specified.

ARY(1)=Parsed Text length not to exceed LEN
ARY(n)=Parsed Text length not to exceed LEN

This is either an ICD diagnosis or procedure code
(external format) (Required)

This is the Code Set Versioning date (Fileman format)
used to retrieve the code's status, internal entry number (IEN) and effective
date that was appropriate for the date passed (Optional,  If not passed TODAY
is used)

This is an ICD coding system identifier (taken from
file 80.4).  The following coding systems are found in files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

(Optional, but encouraged, if doesn't exist it will try to determine coding
system by input parameter CODE)

This is a three piece "^" delimited string

1  Status 1 = Active, 0 = Inactive
2  IEN or -1 on error
3  Effective Date or error message

Error           0 ^ -1 ^ Error message
Active Code     1 ^ IEN ^ Effective Date
Inactive Code   0 ^ IEN ^ Effective Date

This is the Code Set Versioning date (Fileman format)
used to resolved the business rule date.  (Optional, if not passed TODAY is
used)

This is a coding standard from a Standards
Development Organization (SDO).  A standard may have one or more coding
systems.  (Optional, default is 0)

0 = ICD (Default)
1 = CPT/HCPCS
2 = DRG

This is an ICD coding system identifier (taken from
file 80.4).  (Optional, there is no default value for this parameter, if it
does not exist then it is not used)

The following coding systems are found in files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

Date adjusted by business rules:

If Standard (SDT) = 0 (ICD)

If CDT < 2781001 use 2781001
If CDT < 3131001 and SYS=30, use 3131001
If CDT < 3131001 and SYS=31, use 3131001

If Standard (SDT) = 1 (CPT/HCPCS)

If CDT < 2890101 use 2890101

If Standard (SDT) = 2 (DRG)

If CDT < 2821001 use 2821001

If CDT is year only, use first of the year If CDT is year and month only, use
first of the month

This is a coding system (taken from file 80.4) or a
coding system identifier that can be resolved to a coding system.

1 = ICD-9-CM
2 = ICD-9-PCS
30 = ICD-10-CM
31 = ICD-10-PCS

DX, DIAG, 80, ^ICD9(

1 = ICD-9-CM if CDT is before the ICD-10 implementation date
30 = ICD-10-CM if CDT is on or after the ICD-10 implementation date

PR, PROC, OPER, 80.1, ^ICD0(

2 = ICD-9-CM if CDT is before  the ICD-10 implementation date
31 = ICD-10-CM if CDT is on or after  the ICD-10 implementation date

This is the Code Set Versioning date (Fileman format)
used to resolve the coding system parameter SYS (Optional, if not passed TODAY
is used)

This is the date that a coding system identified by
the input parameters SYS and CDT was implemented in Fileman format or on
error:

-1 ^ Error message

This is the Code Set Versioning date (Fileman format)
used to determine the accuracy of the text being returned (Optional, if not
passed TODAY is used)

This is a coding standard from a Standards
Development Organization (SDO).  A standard may have one or more coding
systems.  (Optional, default is 0)

0 = ICD (Default)
1 = CPT/HCPCS
2 = DRG

This is an ICD coding system identifier (taken from
file 80.4).  (Optional, there is no default value for this parameter, if it
does not exist then it is not used)

The following coding systems are found in files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

If coding system is not ICD-10 and the date passed is
before the Code Set Versioning project Oct 1, 2002, then this variable is set
to the warning message, "CODE TEXT MAY BE INACCURATE" otherwise it is null.

This is an ICD file number:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified.

This is a Boolean value:

1  Entry IEN in file FILE is Selectable
0  Entry IEN in file FILE is NOT Selectable

or

-1  on error

This is either an ICD diagnosis, an ICD procedure
code or null to retrieve the first code in a sequence.

This is an ICD coding system identifier (taken from
file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

This is the Code Set Versioning date (Fileman format)
used to determine the next code being returned (Optional, there is no default
value for this parameter)

If CDT date is not passed then this entry point will return the next code,
regardless of status (active or inactive)

If CDT date is passed then this entry point will return the next active code.

This is the next code in a sequence of codes.  If the
input code is null, then it will return the first code of the sequence of
codes.  If a date is passed in the input parameter CDT, then it will return
the next active code in a sequence of codes.

This is either an ICD diagnosis, an ICD procedure
code or null to retrieve the last code in a sequence.

This is an ICD coding system identifier (taken from
file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

This is the Code Set Versioning date (Fileman format)
used to determine the Previous code being returned (Optional, there is no
default value for this parameter)

If CDT date is not passed then this entry point will return the previous code,
regardless of status  (active or inactive)

If CDT date is passed then this entry point will return the previous active
code.

This is the previous code in a sequence of codes.  If
the input code is null, then it will return the last code of the sequence of
codes.  If a date is passed in the input parameter CDT, then it will return
the previous active code in a sequence of codes.

This is an ICD diagnosis or procedure code.

This is a local array name passed by reference that
will contain the code's activation history.

This is an ICD coding system identifier (taken from
file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

This is set equal to the number of history entries in
the local array ARY or -1 if there is an error or the code is not found.

This is a local array containing the history records

ARY(0) = Number of History Entries
ARY(<effective date>,<status>) = comment

This is either an ICD diagnosis or procedure code.

This is a local array name passed by reference that
will contain the code's activation periods.

This is an ICD coding system identifier (taken from
file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

This is a 2 piece "^" delimited string if successful
and 3 piece "^" delimited string if unsuccessful or error.

1   IEN of code
2   Code is selectable (boolean 1/0)

or on error

-1 ^ 0 ^ Error Message

This is a local array containing the Periods of
activation for the code

ARY(0)

This is a 2 piece "^" delimited string if
successful and a 3 piece "^" delimited string
if unsuccessful or error.

1   IEN of code
2   Code is selectable (boolean 1/0)

or on error

-1^0^Error Message

ARY(Activation Date) = Inactivation Date^Short Name

Where the Short Name is the Versioned text, and the
text is versioned as follows:

Period is active   - Text for TODAY's date
Period is inactive - Text for inactivation date

This is the ICD file number used to determine the
global root to $ORDER through (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is either an ICD diagnosis or procedure code to
$ORDER from (required):

$O(^ROOT("BA",(CODE_" ")))
$O(^ROOT("ABA",SYS,(CODE_" ")))

This is either an ICD diagnosis or procedure

This is an ICD coding system identifier (taken from file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

If the coding system can be identified then the "BA" cross-reference is
ignored and the $ORDER will be performed on the "ABA" cross-reference:

$O(^ROOT("ABA",SYS,(CODE_" ")))

The "ABA" cross-reference is a coding system specific cross-reference.

This is a Reverse $ORDER flag, if set to 1, the
$ORDER operation will be in the reverse direction of "BA" or "ABA"
cross-reference (Optional, default is 0, $ORDER forward)

If equal to 1

$O(^ROOT("BA",(CODE_" ")),-1)
$O(^ROOT("ABA",SYS,(CODE_" ")),-1)

This is the Next or Previous Code in the "BA" or
"ABA" cross-reference depending on the $ORDER direction established by the
input parameter REV.

This is the ICD file number used to determine the
global root to $ORDER through (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is a one or two piece "^" delimited string

1  WORD  This is a single word parsed from the
codes description.

2  IEN   This is the internal entry number where
the description can be found that
contains the parsed word

WORD and IEN can be null.

$$OD $ORDER through "WORD^IEN" on either the D or AD cross-references

Coding System unknown:  $O(^ROOT("D",WORD,IEN)) Coding System known:
$O(^ROOT("AD",SYS,WORD,IEN))

This is an ICD coding system identifier (taken from
file 80.4).  (Optional)

The following coding systems are found in ICD files 80 and 80.1:

1 = ICD-9 Diagnosis
30 = ICD-10 Diagnosis
2 = ICD-9 Procedures
31 = ICD-10 Procedures

If the coding system can be identified then the "D" cross-reference is ignored
and the $ORDER will be performed on the "AD" cross-reference:

$O(^ROOT("AD",SYS,(CODE_" ")))

The "AD" cross-reference is a coding system specific cross-reference.

This is a Reverse $ORDER flag, if set to 1, the
$ORDER operation will be in the reverse direction of "D" or "AD"
cross-reference (Optional, default is 0, $ORDER forward)

If equal to 1

$O(^ROOT("D",WORD)),-1)
$O(^ROOT("AD",SYS,WORD)),-1)

This is a 2 piece "^" delimited string containing the
Next or Previous Word in the "D" or "AD" cross-reference and accompanying IEN
depending on the $ORDER direction established by the input parameter REV.

WORD^IEN taken from cross-references

^ROOT("D",WORD,IEN) or
^ROOT("AD",SYS,WORD,IEN)

This is the ICD file number used to determine the
global root to $ORDER through (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the field number of a versioned data element
in the file specified.  (Optional, with no default value)

If the field number is provided then this API will return the date that the
field was last modified.

If the field number is not provided then this API will return the date that
the record was last modified.

This is the Code Set Versioning date (Fileman format)
used to determine the date last modified (Optional, if not provided then TODAY
is used)

This is the date last modified for the record
identified by the input parameters FILE and IEN.  If the input parameter FIELD
is set to a valid versioned field then this will be the date that the field
was last modified.

or -1 ^ message on error

This is the ICD file number used to select a coding
system (Optional, if not provided you will be prompted for an ICD file
Number):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is a flag to determine the display format for
the prompts:

E  Display External only (default)
I  Display External with Internal

Prompt using External only, default:

FMT=E      1   ICD-9-CM
2   ICD-10-CM

Prompt using External with Internal:

FMT=I      1   ICD-9-CM       (#1)
2   ICD-10-CM      (#30)

This is an optional date to use in selecting a coding
system.  If passed, only coding systems with an implementation date on or
before the date passed are selectable (optional)

This is a 2 piece "^" delimited string

1  Coding System (internal) 2  Coding System (external)

or  -1  on error or non-selection or  ^^  double up-arrows or  ^   timeout or
single up-arrow

This is an ICD file number (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to determine the status and effective dates on the date specified
(Optional, if not provided then TODAY is used)

This is a 3 piece "^" delimited string

1   Status
1 - Active
0 - Inactive
2   Inactivation Date
3   Activation Date

or
-1^error message

This is an ICD file number (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to determine the last activation date based on the date specified
(Optional, if not provided then TODAY is used)

This is the last activation date (Fileman format) or

-1^Not activated on or before date specified

This is an ICD file number (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to determine the last inactivation date based on the date specified
(Optional, if not provided then TODAY is used)

This is the last inactivation date (Fileman format)
or

-1^Not inactivated on or before date specified

This is an ICD file number (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to determine the last code status based on the date specified (Optional,
if not provided then TODAY is used)

This is the last code status based on the date
passed.

1 - Active
0 - Inactive

or

-1^No status on or before date specified

This is either an ICD diagnosis or procedure code
(Required)  (This is the opposite of $$COD)

This is a numeric representation of a code.

This is a numeric representation of an ICD diagnosis
or procedure code (This is the opposite of $$NUM)

This is an ICD diagnosis or procedure code.

This is either an ICD diagnosis or procedure code
(Required)

This is a set of codes as follows:

I  CODE is in an internal format (IEN)
E  CODE is in an external format (Code)

or

Null on error

This is a coding system, a global root or a file
identifier.

Global roots ^ICD9( and ^ICD0( are acceptable Coding Systems can be found in
file 80.4 File Identifier:  DX or PR
DIAG or PROC or OPER

This is an ICD file number 80 or 80.1

or -1 on error

This is a coding system, file number, a file
identifier or even an ICD code, provided the code is unique to a file.

Coding Systems can be found in file 80.4 File Number 80 or 80.1 File
Identifier:  DX or PR
DIAG or PROC or OPER

This is a global root ^ICD9( or ^ICD0( or Null on
error

This can be either a Coding System name,
Abbreviation, system identifier (uses date) or a code.

Coding System Names: ICD-9-CM, ICD-9 Proc, ICD-10-CM or ICD-10-PCS

Coding System Abbreviations: ICD, ICP, 10D or 10P

System Identifier (with date CDT)

Date is before the ICD-10 implementation date

DIAG, ICD9, 80, DX =  1
PROC, OPER, ICD0, ICP9, 80.1, PR = 2

Date is on or after the ICD-10 implementation date

DIAG, ICD9, 80, DX =  30
PROC, OPER, ICD0, ICP9, 80.1, PR = 31

An ICD code

If an ICD code is unique to an ABA
cross-reference then the Coding System
can be determined from a code

^ICD9("ABA",1,(CODE_" "))   = 1
^ICD9("ABA",30,(CODE_" "))  = 30
^ICD9("ABA",2,(CODE_" "))   = 2
^ICD9("ABA",31,(CODE_" "))  = 31

This is the Code Set Versioning date (Fileman format)
used to determine the coding system based on a system identifier (Optional, if
not provided then TODAY is used)

This is a single character identifying the desired
output format (Optional, default is "I"):

I  Internal (default)
E  External
B  Both Internal ^ External

This is the Coding System in the format specified by
the input parameter FMT:

FMT=I     FMT=E        FMT=B
Internal  External     Both

1      ICD-9-CM     1^ICD-9-CM
2      ICD-9 Proc   2^ICD-9 Proc
30      ICD-10-CM    30^ICD-10-CM
31      ICD-10-PCS   31^ICD-10-PCS

or

-1   on error

This can be either a Coding System name,
Abbreviation, system identifier, file number or a code.  (system identifier
and code uses date).

Coding System Names:

ICD-9-CM
ICD-9 Proc
ICD-10-CM or
ICD-10-PCS

Coding System Abbreviations:

ICD, ICP, 10D or 10P

System Identifier/File Number (with date CDT)

Date is before the ICD-10 implementation date

DIAG, ICD9, 80, DX =  1
PROC, OPER, ICD0, ICP9, 80.1, PR = 2

Date is on or after the ICD-10 implementation date

DIAG, ICD9, 80, DX =  30
PROC, OPER, ICD0, ICP9, 80.1, PR = 31

This is the Code Set Versioning date (Fileman format)
used to determine the coding system based on a system identifier (Optional, if
not provided then TODAY is used)

This is a 6 piece "^" delimited string

1      IEN to file 80.4
2      Coding System
3      Coding System Abbreviation
4      File Number
5      Implementation Date
6      Content

or

-1   on error

This is a pointer to the coding system file 80.4

This the coding system name, file 80.4 (.01)

ICD-9-CM
ICD-9 Proc
ICD-10-CM
ICD-10-PCS

Or  -1   on error

This can be either a Coding System name,
Abbreviation, system identifier (uses date) or a code.

Coding System Names: ICD-9-CM, ICD-9 Proc, ICD-10-CM or ICD-10-PCS

Coding System Abbreviations: ICD, ICP, 10D or 10P

System Identifier (with date CDT)

Date is before the ICD-10 implementation date

DIAG, ICD9, 80, DX =  1
PROC, OPER, ICD0, ICP9, 80.1, PR = 2

Date is on or after the ICD-10 implementation date

DIAG, ICD9, 80, DX =  30
PROC, OPER, ICD0, ICP9, 80.1, PR = 31

This is the Code Set Versioning date (Fileman format)
used to determine the source abbreviation based on a system identifier
(Optional, if not provided then TODAY is used)

3 Character Coding System abbreviation, file 80.4
(.02)

ICD
ICP
10D
10P

Or  -1   on error

This is an ICD file number:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified.

Boolean value

1 = Yes, exclude from lookup
0 = No, include in the lookup

This is the internal entry number (IEN) of a code in
file 80 that has a relationship with the code at IEN2  IEN1 is equivalent to
Fileman's DA and identifies a code stored in a multiple in field 20, 30, 40 or
pointed to by field 1.11.

This is the internal entry number (IEN) of a code in
file 80 that may have other codes (IEN1) associated with it.  IEN2 is
equivalent to Fileman's DA(1) and identifies the code in the .01 field.

This is a field number in file 80 that contains one
or more ICD codes that have a relationship to the main entry.   Acceptable
field numbers and the type of relationships to check include:

Field       Relationship
20          Code 1 Not Used With Code 2
30          Code 1 Required With Code 2
40 or 1.11  Code 1 Not Considered CC With Code 2

This is a Boolean value

1   Yes/The relationship is True
0   No/The relationship is False

Field       Answers the Question
-----       --------------------------------
20          Code 1 (identified by IEN1) is
not used with Code 2 (identified
by IEN2)

30          Code 1 (identified by IEN1) is
required with Code 2 (identified
by IEN2)

40 or 1.11  Code 1 (identified by IEN1) is
not considered Complication
Comorbidity (CC) with Code 2
(identified by IEN2)

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is a field number in file 80 that contains one
or more ICD codes that have a relationship to the main entry (Required)
Acceptable field numbers to check include:

20   Code Not Used With
30   Code Required With
40   Code Not Considered CC With

Boolean value

1   Yes/True, codes exist
0   No/False, codes do not exist

Field   Answers the Question
-----   -------------------------------
20      Are there any codes that should
not be used with this code (IEN)
30      Are there any codes required
with this code (IEN)
40      Are there any codes that are not
considered CC with this code
(IEN)

This is the ICD file number used to retrieve the DRGs
(Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the DRGs that were appropriate on that date (Optional, if not
passed then TODAY is used)

This is a Major Diagnostic Category (pointer to file
80.3) used as a screen to limit the DRGs to an MDC.  This input parameter only
applies to the ICD OPERATIONS/PROCEDURE file 80.1 which has multiple MDCs,
each with a possibility of multiple DRGs  (Conditional)

3 piece semi-colon ";" delimited string

1  DRGs delimited by ^
2  Fiscal Year
3  Status flag
0 inactive
1 active

Example output:

907^908^909^;3071001;1

On Error:

-1;No DRG level;0

This is the ICD file number used to retrieve the
Major Diagnostic Categories (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDCs that were appropriate on that date (Optional, if not
passed then TODAY is used)  NOTE:  If no Fiscal Year is found for the input
date then the first (earliest( Fiscal Year is used.

This is a local array name passed by reference that
will contain a list of MDCs by effective date

This is a flag that determines the output format:

I   = Internal (default) Internal values
are always returned

E   = Include External values with Internal
values

ICD Procedures file 80.1 (multiple MDC)

ARY(<fiscal year>,<MDC>)=DRG^;FY;STA
ARY(<fiscal year>,<MDC>)="DRG^DRG^;FY;STA

If Flag contains "E"

ARY(<fiscal year>,"E",<MDC>)=MDC Name
ARY(<fiscal year>,"E",<MDC>,<DRG>)=DRG Name
ARY(<fiscal year>,"E",<MDC>)=MDC Name
ARY(<fiscal year>,"E",<MDC>,<DRG>)=DRG Name
ARY(<fiscal year>,"E",<MDC>,<DRG>)=DRG Name
ARY(<fiscal year>,"E","FY")=External FY

ICD Diagnosis file 80 (single MDC)

ARY(<fiscal year>,<MDC>)="DRG^DRG^;FY;STA

If Flag contains "E"

ARY(<fiscal year>,"E",<MDC>)=MDC Name
ARY(<fiscal year>,"E",<MDC>,<DRG>)=DRG Name
ARY(<fiscal year>,"E",<MDC>,<DRG>)=DRG Name
ARY(<fiscal year>,"E","FY")=External FY

NOTE:  If no Fiscal Year found for the input date then the first (earliest)
Fiscal Year is used.

External date (Required), examples of valid dates:

JAN 20 1957 or 20 JAN 57
1/20/57 or 012057
T   (for TODAY)
T+1 (for TOMORROW),  T+2,  etc.
T-1 (for YESTERDAY)
T-3W (for 3 WEEKS AGO), etc.

Internal Fileman Date

or -1 on error

This is an internal Fileman date.

This is a 4 digit fiscal year (YYYY) for the date
specified or null on error.

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDCs that was appropriate on that date (Optional, if not
passed then TODAY is used)

This is a single MDC (pointer to file 80.3) active on
the date specified.

This is an Internal Entry Number (IEN) in the
OPERATION/PROCEDURE file 80.1 (Required)

This is a Major Diagnostic Category (pointer to file
80.3) used as a screen to limit the results to a single MDC (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDC that was appropriate on that date (Optional, if not
passed then TODAY is used)

4 piece "^" delimited string

1   Fiscal Year, Fileman format
2   MDC, pointer to file 80.3
3   Fiscal Year, pointer to sub-file
80.171 (formerly DADRGFY)
4   MDC, pointer to sub-file 80.1711
(formerly DAMDC)

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDCs that were appropriate on that date (Optional, if not
passed then TODAY is used)

This is a local array name passed by reference that
will contain a list of MDCs (Required)

This is an array listing MDCs for all DRGs associated
with a diagnosis on the date specified.

ARY(MDC)=""
ARY(MDC)=""

This is an Internal Entry Number (IEN) in the
OPERATIONS/PROCEDURE file 80.1 (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDCs that were appropriate on that date (Optional, if not
passed then TODAY is used)

This is a local array passed by reference containing
a list of MDCs for comparison (Required)

This is a flag defining the output format (optional):

0   Boolean value only (default)
1   2 piece "^" delimited string

1   Boolean value
2   String of matching MDCs
delimited by ";"

Boolean value

0  The ICD Procedure code identified by IEN
does not include any of the MDCs passed
in .ARY(MDC) on the date specified (CDT)

1  The ICD Procedure code identified by IEN
includes one or more of the MDCs passed
in .ARY(MDC) on the date specified (CDT)

Assuming the following input parameters:

IEN=4
CDT=3111110
ARY(2)=""
ARY(21)=""

Output format when input parameter FMT=0
(default)

$$MDCT(IEN,CDT,.ARY) = "1"

Output format when input parameter FMT=1

$$MDCT(IEN,CDT,.ARY) = "1^2;21"

This is an Internal Entry Number (IEN) in the
OPERATIONS/PROCEDURE file 80.1 (Required)

This is a Major Diagnostic Category (pointer to file
80.3) (Required)

This is the Code Set Versioning date (Fileman format)
used to identify the MDCs that were appropriate on that date (Optional, if not
passed then the first FY is used)

Boolean value

0  MDC does not exist on date specified
1  MDC exist on date specified

This is an Internal Entry Number (IEN) in the
OPERATIONS/PROCEDURE file 80.1 (Required)

Major O.R. Procedure or Null if the procedure is not
defined as a Major O.R. Procedure or is not found

Major O.R. Procedure definitions include:

1   Bowel                 2  Chest         3   Lymphoma/Leukemia     4  Joint
5   Pancreas/Liver        6  Pelvic 7   Shoulder/Elbow        8  Thumb/Joint 9
Head/Neck             A  Cardio M   Musculoskeletal       B  Spine

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

Boolean value, answers the question:

Is the diagnosis UNACCEPTABLE as a Principle DX?

1   Yes  Code is Unacceptable as Principle DX
0   No   Code is Acceptable as Principle DX

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is a subscript name used in a ^TMP global array
(Optional, if not provided, the subscript "ICDNOT" will be used)

^TMP(SUB,$J)

This is a flag defining the output format.

0 - Total number only (default)
1 - Total number with global array

The number of ICD codes that cannot be used with the
ICD code identified by IEN (FMT=0 or 1)

TMP global array as follows (FMT=1):

^TMP(SUB,$J,IEN)=CODE
^TMP(SUB,$J,"B",(CODE_" "),IEN)=""

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is a subscript name used in a ^TMP global array
(Optional, if not provided, the subscript "ICDREQ" will be used)

^TMP(SUB,$J)

This is a flag defining the output format.

0 - Total number only (default)
1 - Total number with global array

The number of ICD codes required when the ICD code
identified by IEN is used. (FMT=0 or 1)

TMP global array as follows (FMT=1):

^TMP(SUB,$J,IEN)=CODE
^TMP(SUB,$J,"B",(CODE_" "),IEN)=""

This is an Internal Entry Number (IEN) in the
DIAGNOSIS file 80 (Required)

This is a subscript name used in a ^TMP global array
(Optional, if not provided, the subscript "ICDNCC" will be used)

^TMP(SUB,$J)

This is a flag defining the output format.

0 - Total number only (default)
1 - Total number with global array

The number of ICD codes not considered CC with the
code identified by IEN. (FMT=0 or 1)

TMP global array as follows (FMT=1):

^TMP(SUB,$J,IEN)=CODE
^TMP(SUB,$J,"B",(CODE_" "),IEN)=""

Versioning Date (Fileman format)

ICDVDT or
^TMP("ICDEXLK",$J,"ICDVDT")=<date>

This is a Code Set Versioning Date (in Fileman format).  If set, it must also
be killed by the calling application.

If supplied, it is assumed that the lookup is to be a versioned lookup and
only active codes on that date will be included in the selection list.

If not supplied, the date will default to TODAY and all codes may be selected,
active and inactive.

In both cases the display will be altered based on the date.

Coding System (from file 80.4)

ICDSYS or
^TMP("ICDEXLK",$J,"ICDSYS")=<coding system>

This is the Coding System taken from file 80.4.  If set, it must be killed by
the calling application.  It may be any of the following:

1    ICD    ICD-9-CM
2    ICP    ICD-9 Proc
30    10D    ICD-10-CM
31    10P    ICD-10-PCS

If supplied, the lookup will only look in the cross-references specific for
that coding system.

Display Format (numeric, 1-4)

ICDFMT or
^TMP("ICDEXLK",$J,"ICDFMT")=<display format>

This is a flag defining a Display Format (numeric, 1-4).  If set, it must be
killed by the calling application.

1 = Fileman format, code and short text
(default)

250.00    DMII WO CMP NT ST UNCNTR

2 = Fileman format, code and description

250.00    DIABETES MELLITUS WITHOUT
MENTION OF COMPLICATION,
TYPE II OR UNSPECIFIED TYPE,
NOT STATED AS UNCONTROLLED

3 = Lexicon format, short text followed
by code

DMII WO CMP NT ST UNCNTR (250.00)

4 = Lexicon format, description followed
by code

DIABETES MELLITUS WITHOUT MENTION OF
COMPLICATION, TYPE II OR UNSPECIFIED
NOT STATED AS UNCONTROLLED (250.00)

This is the user's input, if not available the user
will be prompted for input.

FileMan Variables used

DIC, DIC(0), DIC("A"), DIC("B"),
DIC("S"), DIC("W"), DIC("?N",<file>)

FileMan Variables not used:

DIC("DR"),DIC("PTRIX",<fm>,<to>,<file>),
DIC("T"), DIC("V"), DIC("?PARAM")

DIC(0) parameters applicable to a versioned file

A   Ask the entry; if erroneous, ask again
B   Only the B index is used
E   Echo information
F   Forget the lookup value
I   Ignore the special lookup program
O   Only find one entry if it matches exactly
Q   Question Input ??
S   Suppresses display of .01
T   Search until user selects or enters ^^
X   EXact match required
Z   Zero node in Y(0), external form in Y(0,0)

DIC(0) parameters NOT applicable to a versioned file and not used

C   Versioned cross-references not turned off
K   Primary Key not established
L   Learning a new entry LAYGO not allowed
M   Multiple-index lookup allowed
N   Uppercase, IEN lookup allowed (not forced)
n   ICD has no pure numeric entries
U   All values are external
V   Verification is not optional

FileMan Variables KILLed:

DLAYGO
DINUM

Fileman Compliant:

Y        IEN ^ Code

If DIC(0) containing "Z"

Y(0)     0 Node
Y(0,0)   Code

Non-Fileman Compliant, DIC(0) contains "Z"

Y(0,1)   $$ICDDX or $$ICDOP
Y(0,2)   Long Description

This is a string of text to search for.

This is either a global root or file number to
indicate either the DIAGNOSIS file 80 or the OPERATIONS/PROCEDURE file 80.1

This is the Code Set Versioning date (Fileman format)
used to determine the status of a code (active or inactive) It normally
represents the date that service was provided to the patient (HIPAA).
However, it may also represent the date of onset, visit date or movement date
depending on the application calling the lookup.

This is a coding system identifier (pointer to file
80.4)

1 = ICD-9-CM
2 = ICD-9-PCS
30 = ICD-10-CM
31 = ICD-10-PCS

This is the versioned flag (boolean) to indicate if
the lookup is to be versioned or not:

0  No   Include all codes, active
and inactive

1  Yes  Include only Active codes
for date specified

This is a flag that defines the output format:

1  Fileman, Code and Short Text (default)

250.00    DMII WO CMP NT ST UNCNTR

2  Fileman, Code and Description

250.00    DIABETES MELLITUS WITHOUT
MENTION OF COMPLICATION TYPE
II OR UNSPECIFIED TYPE, NOT
STATED AS UNCONTROLLED

3  Lexicon, Short Text and Code

DMII WO CMP NT ST UNCNTR (250.00)

4  Lexicon, Description and Code

DIABETES MELLITUS WITHOUT MENTION OF
COMPLICATION, TYPE II OR UNSPECIFIED,
NOT STATED AS UNCONTROLLED (250.00)

This is the number of entries found

The entries will be included in a ^TMP Global Array:

^TMP(ID,$J,"SEL")
^TMP(ID,$J,"SEL",0)=# of entries
^TMP(ID,$J,"SEL",#)=IEN ^ Display Text

Where ID is a package namespaced subscript:

ICD9 - for file #80
ICD0 - for file #80.1

This is a pointer to the coding system file 80.4

This input parameter indicates the relationship of
the output coding system to the input coding system (Optional)

0   N/A - Return the current version (default)
1   Return the next version
-1   Return the previous version

This is a 5 piece string containing:

1   Coding System (pointer to file 80.4)
2   Coding System Nomenclature
3   Coding System Abbreviation
4   File Number containing the Coding System
5   Date Coding System was Implemented or
-1   on error

This is either an ICD global root or file number.

This is an Internal Entry Number in the file
identified by the input parameter ROOT.

This is a code set versioning date used to returned
versioned (date sensitive) data from the ICD files.

This is a output format flag (optional, default 0).

0  Return standard Fileman Y - IEN ^ CODE
1  Return Expanded Y as if DIC(0) contained a "Z"

Input parameter FMT = 0 or 1

Y = IEN ^ Code

Input parameter FMT = 1

FileMan Compliant

Y(0)    =  0 Node    (aka Code)
Y(0,0)  =  .01 Field (aka Code)

Non-FileMan Compliant

Y(0,1)  =  $$ICDDX or $$ICDOP
Y(0,2)  =  Versioned Long Description

This is a text string to parse.

This is a global root or file number (required)

^ICD9(  or  80
^ICD0(  or  80.1

This is the coding system  (Required)

1  or  ICD  or  ICD-9-CM
2  or  ICP  or  ICD-9 Proc
30  or  10D  or  ICD-10-CM
31  or  10P  or  ICD-10-PCS

This is the output array passed by reference that
contains a list of words parsed from the input string X and arranged by
frequency of use

ARY(0)=# of words
ARY(#)=word

The least frequently used word will be ARY(1) and the most frequently used
word will be ARY($O(ARY(" "),-1)).  Words not found in the file and coding
system will not appear in the parsed array.

This is a single word.

This is a global root or file number (optional)

^ICD9(  or  80
^ICD0(  or  80.1

This is the coding system (Optional)

1  or  ICD  or  ICD-9-CM
2  or  ICP  or  ICD-9 Proc
30  or  10D  or  ICD-10-CM
31  or  10P  or  ICD-10-PCS

This is a Boolean value indicating if a word is
contained in a set (file or system).

1 = Word was found

If ROOT is not supplied, the word was
found in either file 80 or 80.1

If SYS is not supplied, the word was
found in the file designated by ROOT
in any coding system in the file

If both ROOT and SYS are supplied,
the word was found in the specified
coding system

0 = Word was not found

This is the ICD file number used to retrieve the
identifier codes (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified (Required).

This is a local array of identifiers found for the
code identified input parameters FILE and CODE.

ARY(<identifier>)=""

This is the number of identifiers found for the code
identified by the input parameters FILE and CODE, or upon error:

-1^error message

This is the ICD file number used to retrieve the
identifier codes (Required):

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is a Diagnosis or Procedure code identifier
(required)

This is an Internal Entry Number (IEN) in the file
specified (Required).

Boolean value

1 if identifier was found for code
0 if identifier was not found for code

or upon error -1^error message

This is the Internal Entry Number (IEN) of the ICD
Diagnosis file #80.

Date to use to extract CC (default TODAY)

This is a flag that controls the output format:

0 = CC only (default)
1 = CC ^ Effective Date

Complication/Comorbidity (CC)

DX is Own CC  Format  Output
------------  ------  -------------------------
Yes        0     CC Value
Yes        1     CC Value ^ Effective Date
No        N/A    0 (zero)

or upon error -1^error message

This is an Internal Entry Number for the DRG file
80.2 (required)

Date to use to extract CC/MCC flag (default TODAY)

This is the Complication/Comorbidity/Major CC flag

0   No CC or MCC
1   CC present
2   MCC present
3   CC or MCC present

or upon error -1^error message

DRG code, internal or external format (Required)

Date to check status for, FileMan format (default =
TODAY)

If CDT < 10/1/1978, use 10/1/1978
If CDT > DT, validate with In/Activation Dates
If CDT is year only, use first of the year
If CDT is year and month, use first of the month

Returns an 22 piece string delimited by the up-arrow
(^) the pieces are:

1  DRG name (field #.01)
2  Weight (field #2)
3  Low Trim (days) (field #3)
4  High Trim (days) (field #4)
5  MDC (field #5)
6  Surgery Flag (field #.06)
7  <null>
8  Avg Length of Stay (days) (field 10)
9  Local Low Trim Days (field #11)
10  Local High Trim Days (field #12)
11  <null>
12  Local Breakeven (field #13)
13  Activation Date (.01 field, 66 multiple)
14  Status (.03 field, 66 multiple)
15  Inactivation Date (.01 field, 66 multiple)
16  Effective date (.01 field, 66 multiple)
17  Internal Entry Number (IEN)
18  Effective date (.01 field, 66 multiple)
19  Reference (field #900)
20  Weight (Non Affil) (field #7)
21  Weight (Int Affil) (field #7.5)
22  Message

or

-1^Error Description

ICD Code, Internal or External Format (required)

Input:   Name of Output Array for description

e.g. "ABC" or "ABC("TEST")"

Default = ^TMP("DRGD",$J)

Output:  Description in array

@ARY(1:n) - Description (lines 1-n)
@ARY(n+1) - Blank
@ARY(n+1) - Warning Message

or

-1^Error Description

NOTE:

User must initialize ^TMP("DRGD",$J)
if used.  The data is place in the
array unformatted, exactly as it is in
the DESCRIPTION multiple (sub-files
#80.068 or #80.168)

SEE ALSO:

$$DRGDES^ICDEX(IEN,CDT,.ARY,LENGTH) to
retrieve the description formatted into
string lengths specified by input
parameter for length.

Date to screen against (default = TODAY)

If CDT < 10/1/1978, use 10/1/1978
If CDT > DT, use DT
If CDT = year only, use 01/01/yyyy
If CDT = year & month, use mm/01/yyyy

This is the number of lines in description output
array.

Internal Entry Number of DRG file 80.2

Date to screen against (default = TODAY)

This is a local array passed by reference containing
the DRG description.  The text is formatted into string lengths specified by
the LEN input parameter.

Length of line of the description in the output array

Missing        Defaults to 79
Less than 25   Defaults to 25

This is the number of lines in description output
array.

This is a DRG code.

This is the IEN of the DRG code specified.

This is a 3 piece "^" delimited string containing an
effective date in both internal and external formats:

1   Date Fileman format         nnnnnnn
2   Date External Short Format  mm/dd/yyyy
3   Date External Long Format   Mmm dd, yyyy

or
"^^" if the user enters double up-arrows
"^"  if the user enters a single up-arrow
""   if the user times out

The earliest possible date is Oct 1, 1978, the initial ICD implementation date
in the VA.

If today's date is less than the implementation date of ICD-10, then the
latest possible date is 3 years from the ICD-10 implementation date.

If today's date is greater than the implementation date of ICD-10, then the
latest possible date is 3 years from today's date.

This is an Internal Entry Number of the PTF file #45

This is the correct "EFFECTIVE DATE" for a patient to
be used retrieving DRG/ICD/CPT data (default TODAY)

"EFFECTIVE DATE" Derived from:

Census Date      ^DGPT         0;13
Discharge Date   ^DG(45.86     0;1
Surgery Date     ^DGPT(D0,"S"  0;1
Movement Date    ^DGPT(D0,"M"  0;10
Default          $$NOW^XLFDT

This is a Global Root or File Number for either the
ICD Diagnosis or ICD Procedure files (Required)

This is an Internal Entry Number (IEN) in the
specified file (Required)

Initial Activation Date

OR

-1 ^ Error Message

File Number or root (required)

80 or ^ICD9     = File #80
80.1 or ^ICD0   = File #80.1

This is a Diagnosis/Procedure code IEN (required)

This is a string of Identifiers delimited by a
semi-colon

ID;ID;ID

This is a file number or global root for either the
ICD Diagnosis file or the ICD Procedure file

This is an Internal Entry Number (IEN) in the file
specified.

This is the date to use to determine if the code is
valid for date (default TODAY)

This is a Boolean value

1 if the code is valid
0 if the code is not valid

This is an Internal Entry Number (IEN) for the ICD
Diagnosis file #80

This is a pointer to DRG CC Exclusions file #82.13

This is an Internal Entry Number (IEN) of the DRG
file #80.2

Effective date to use (default TODAY)

Table reference associated with a DRG entry or null
if not found

This is an Internal Entry Number (IEN) in the ICD
Diagnosis file 80 (required)

This is the date to use to Extract CC Primary Flag
(default TODAY)

Is is a flag to determine the output format
(optional):

0 = CC Primary Flag only (default)
1 = CC Prim Flag^Effective Date^Value

This the CC Primary Flag in one of two formats:

CC Primary Flag only (FMT=0)
CC Primary Flag^Effective Date^Value  (FMT=1)

This is an Internal Entry Number (IEN) of the DRG
file 80.2

This is the Weighted Work Unit (WWU) for a DRG

This is an Internal Entry Number (IEN) of the DRG
file 80.2

This is a DRG Code (field .01)

This is the Internal Entry Number (IEN) for file 80.3

This is a Major Diagnostic Category Name

This is a File Number or Global Root

80    or  ^ICD9(
80.1  or  ^ICD0(

This is the header node of either the ICD Diagnosis
file 80 or the Operation Procedure file 80.1

^ICD9(0)
^ICD0(0)

This is an ICD Diagnosis or Procedure Code from
either the ICD-9 or ICD-10 coding systems (required)

This is a file number or global root (optional)

^ICD9( or 80
^ICD0( or 80.1

This is a coding system (optional)

1 = ICD-9 Diagnosis
2 = ICD-9 Procedure
30 = ICD-10 Diagnosis
31 = ICD-10 Procedure

Returns the Internal Entry Number (IEN) for a CODE or
-1 if not found

This is an ICD file number:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified.

This is a local array name passed by reference that
will contain the code's short description history.

This is a three piece "^" delimited string
containing:

1   The number of short descriptions found
2   The earliest date found
3   The latest date found

This is a local array containing a history of Short
Descriptions by date:

ARY(0)= # ^ Earliest Date ^ Latest Date
ARY(DATE)=Long Description

This is an ICD file number:

80   = ICD Diagnosis file
80.1 = ICD Operation/Procedure file

This is an Internal Entry Number (IEN) in the file
specified.

This is a local array name passed by reference that
will contain the code's long description history.

This is a three piece "^" delimited string
containing:

1   The number of long descriptions found
2   The earliest date found
3   The latest date found

OR -1 ^ Error Message

This is a local array containing a history of Long
Descriptions by date:

ARY(0)= # ^ Earliest Date ^ Latest Date
ARY(DATE)=Long Description

Internal Entry Number for file 80

Boolean value

0  No, Diagnosis Code is not exempt for POA 1  Yes, Diagnosis Code is exempt
for POA

Internal Entry Number for file 80

Boolean value

0  No, Diagnosis Code is not a Hospital
Acquired Condition 1  Yes, Diagnosis Code is a Hospital
Acquired Condition

Code or Code Fragment (Required)

Versioning Date (Optional, Default TODAY)

ICD Diagnosis code from fragment if it can be
resolved.  -1 ^ error message if not resolved

Example:

Input                   Output
Fragment    Oct 1, 2014        Oct 1, 2015
--------    ------------------------------
E8310         E831.0              E83.10
311           311.                311.
A870          A87.0               A87.0
A0201         -1^Could not resolve code fragment