| Name | Value | |||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| NUMBER | 1253 | |||||||||||||||
| IA # | 1253 | |||||||||||||||
| FILE NUMBER | 9000011 | |||||||||||||||
| GLOBAL ROOT | AUPNPROB( | |||||||||||||||
| DATE CREATED | 1995/05/30 | |||||||||||||||
| CUSTODIAL PACKAGE | PROBLEM LIST | |||||||||||||||
| CUSTODIAL ISC | Salt Lake City | |||||||||||||||
| USAGE | Controlled Subscription | |||||||||||||||
| TYPE | File | |||||||||||||||
| DBIC APPROVAL STATUS | APPROVED | |||||||||||||||
| NAME | DBIA1253 | |||||||||||||||
| GENERAL DESCRIPTION | The Health Summary Package desires to set up an
integration agreement with the Problem List Package to access the Problem
(#900011) file. Health Summary needs to check if the Problem List file
contains a specific ICD9 code (diagnosis) for a given patient. The "AC" cross
reference is checked to get problem entries for a patient. DFN is the internal
patient record number. The Diagnosis pointer (1st piece of the 0 node) and
Date Entered (8th piece of the 0 node) are retrieved for each record found.
This is done in the following manner: S GMTSHRFE="" F S
GMTSHRFE=$O(^AUPNPROB("AC",DFN,GMTSHRFE)) Q:'GMTSHRFE S
Y=$P(^AUPNPROB(GMTSHRFE,0),U),GMTSHRID=$P(^(0),U,8),
GMTSHRIC=$P(^ICD9(Y,0),U)_" "
|
|||||||||||||||
| GLOBAL REFERENCE |
|
|||||||||||||||
| STATUS | Active | |||||||||||||||
| DURATION | Till Otherwise Agreed | |||||||||||||||
| ID | AUPNPROB( | |||||||||||||||
| SUBSCRIBING PACKAGE |
|