| GENERAL DESCRIPTION |
This agreement will be retired on 6/1/2006. Please do
not add any additional code that utilizes this Integration Agreement. APIs
have been created that can be used in place of any code needing to make use of
this agreement. These APIs were released with patch PSN*4*94. Documentation
information can be found in the patch description. In addition, any code that
currently utilizes this Integration Agreement must be converted to use the new
API's. If any part of this Integration Agreement cannot be satisfied with the
APIs, please contact the PRE development team mail group at EMAIL GROUP
DEV using Microsoft Outlook.
The Adverse Reaction Tracking (ART) package will point to the VA Drug Class
(50.605) file.
The ART package can do lookups on this file using the "C" cross-reference.
The package can do a direct global read of the the "C" cross-reference node.
The ART package will:
a. Use the "B" cross-reference of the VA Drug Class (50.605) file to
find the internal entry number (IEN) of a record, e. g.,
IEN=$O(^PS(50.605,"B",Class_Code,"")).
b. Use a direct global read on the CLASSIFICATION CODE (.01) field in
the VA Drug Class (50.605), e.g.,
Class_code=$P(PS(50.605,IEN,0),"^").
c. Use a direct global read on the CLASSIFICATION (1) field in the VA
Drug Class (50.605), e. g.,
Class=$P(^PS(50.605,IEN,0),"^",2).
|
| GLOBAL REFERENCE |
| GLOBAL REFERENCE |
FIELD NUMBER |
GLOBAL DESCRIPTION |
PS(50.605,D0,0) |
| FIELD NUMBER |
ACCESS |
FIELD NAME |
LOCATION |
.01 |
Direct Global Read & w/Fileman |
CLASSIFICATION CODE |
0;1 |
1 |
Direct Global Read & w/Fileman |
CLASSIFICATION |
0;2 |
.01 |
Pointed to |
CLASSIFICATION CODE |
0;1 |
.01 |
Read w/Fileman |
CLASSIFICATION CODE |
0;1 |
|
|
PS(50.605,'B', |
|
Direct global read access to the "B" cross-reference
will be used to determine the internal entry number for a record.
|
PS(50.605,'C', |
|
DIrect global read access to the "C" cross-reference
will be used to lookup an entry by its CLASSIFICATION (#1) value.
|
|
