Print Page as PDF
DBIA453 ICR (453)

DBIA453    ICR (453)

Name Value
NUMBER 453
IA # 453
FILE NUMBER 121.2
GLOBAL ROOT GMR(121.2,
DATE CREATED 1994/04/12
CUSTODIAL PACKAGE PROGRESS NOTES
CUSTODIAL ISC Salt Lake City
USAGE Private
TYPE File
NAME DBIA453
ORIGINAL NUMBER 453
GENERAL DESCRIPTION 
The Adverse Reaction Tracking package (ART) needs to be
able to check for the existence of the ALLERGY/ADVERSE REACTION entry in the B
cross reference in the Generic Progress Notes Title (#121.2) file. The ART
v4.0 post-init routine will change the .01 value of this File 121.2 entry to
ADVERSE REACTION/ALLERGY. After ART v4.0 is installed, ART will check for the
existence of the new value in the B cross reference of File 121.2.

Also, ART needs to do a direct global read of the second piece of the zero
node of this File 121.2 entry to determine the PROGRESS NOTE TYPE value.
GLOBAL REFERENCE
GLOBAL REFERENCE FIELD NUMBER GLOBAL DESCRIPTION
GMR(121.2,'B', 
Direct global read access to the "B" cross-reference
will be used to determine the internal entry number for that record.
GMR(121.2,D0,0)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.02 Direct Global Read & w/Fileman PROGRESS NOTE TYPE 0;2
.01 Write w/Fileman 
A "one time only" change to the .01 value of File 121.2.
NAME 0;1
STATUS Retired
DURATION Till Otherwise Agreed
ID GMR(121.2,
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
ADVERSE REACTION TRACKING Hines