Lexicon/VBA APIs    ICR (5252)

(Required) ICD-9-CM Diagnosis Code

(Required) VA Disability code (Title 38)

(Optional) Effective Date - This is the date that
service was provided to the patient (aka, encounter date) and is used to check
to see if the ICD code was mapped to the Disability code on that date.

(Optional) This is a local array, passed by
reference.  When passed it will return information about the ICD code and
Disability codes.

If the ICD code is mapped to a VA disability, then
the return value is a 5 piece "^" delimited string as follows:

#  Content             Value
1  Service Connected   1=Yes
2  Connection (Match)  1=Full  0=Partial
3  Mapping Status      1=Active 0=Inactive
4  ICD Code Status     1=Active 0=Inactive
5  Code Status         1=Active 0=Inactive

If the ICD Code is not mapped to a VA disability, then the return value is a
negative 2 piece "^" delimited string as follows:

-1 ^ Not Found or Error Message

(Optional) This is a local array passed by reference.
If passed it will contain detailed information about the ICD code and
Disability code.  The local array will contain the following 2 subscripts:

ARY(1)=<ICD status>^<Date>^<Code>^<Term>
ARY(2)=<Disability status>^<Date>^<Code>^<Term>

Where status is either a 1 (active) or 0 (inactive) and date is the effective
date the code became either active or inactive.

(Required) ICD-9-CM Code

(Optional) Effective Date (default TODAY)

(Optional) Local array passed by reference, returns a
list of Disability codes mapped to the ICD code.

Returns the number of Disability codes mapped to an
ICD code.

(Optional) Local Array of Disability Codes passed by
reference

ARY(0) = 5 Piece String detailing input
Diagnosis code

1   Number of Disability Codes found
2   ICD Code
3   Status of ICD Code  1 = Active 0 = Inactive
4   Effective Date of ICD Code Status
5   Versioned Text of ICD Code

ARY(#) = 6 Piece String detailing output
Disability codes

1   Mapping 1 = Full 0 = Partial
2   Effective Date of Mapping
3   Disability Code
4   Status of Disability Code
5   Effective Date of Disability Code Status
6   Versioned Text of Disability Code

ARY("B",MAP,#)=""  Index of Local Array

MAP Mapping 1 = Full 0 = Partial
#   Entry Number in Array

(Required) Disability Code (Title 38)

(Optional) Effective Date (default TODAY)

(Optional) Local array passed by reference, return a
list of ICD codes mapped to a Disability code.

The number of Diagnosis codes mapped to a Disability
code.

(Optional) Local Array of Diagnosis Codes passed by
reference

ARY(0) = 5 Piece String detailing input
Disability code

1   Number of Diagnosis Codes found
2   Disability Code
3   Status of Code  1 = Active 0 = Inactive
4   Effective Date of Disability Code Status
5   Versioned Text of Disability Code

ARY(#) = 6 Piece String detailing output
Diagnosis codes

1   Mapping 1 = Full 0 = Partial
2   Effective Date of Mapping
3   ICD-9-CM  Code
4   Status of ICD-9-CM Code
5   Effective Date of ICD-9-CM Code Status
6   Versioned Text of ICD-9-CM Code

ARY("B",MAP,#)=""  Index of Local Array

MAP Mapping 1 = Full 0 = Partial
#   Entry Number in Array