Sub-Field: 120.814

Parent File	Name	Number	Package
PATIENT ALLERGIES(#120.8)	ID BAND MARKED	120.814	Adverse Reaction Tracking

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DATE/TIME	0;1	DATE	INPUT TRANSFORM: `S %DT="EPSTXR",%DT(0)="-NOW" D ^%DT K %DT(0) S X=Y K:Y<1 X` LAST EDITED: `OCT 14, 1992` DESCRIPTION: This is the date/time the user indicated to the ATS that the patient's ID Band was marked for this reactant. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `120.814^B` 1)= S ^GMR(120.8,DA(1),14,"B",$E(X,1,30),DA)="" 2)= K ^GMR(120.8,DA(1),14,"B",$E(X,1,30),DA) CROSS-REFERENCE: `120.814^A^MUMPS` 1)= S ^GMR(120.8,DA(1),14,"A",9999999-X,DA)="" 2)= K ^GMR(120.8,DA(1),14,"A",9999999-X,DA) RECORD INDEXES: `AHDR (#287)`
1	USER ENTERING	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JUN 20, 1991` DESCRIPTION: This is the user who indicated the ID band was marked. UNEDITABLE RECORD INDEXES: `AHDR (#287)`

DATE/TIME

0;1

DATE

DESCRIPTION:

This is the date/time the user indicated to the ATS that the patient's ID Band was marked for this reactant.

CROSS-REFERENCE: 120.814^B

1)= S ^GMR(120.8,DA(1),14,"B",$E(X,1,30),DA)=""

2)= K ^GMR(120.8,DA(1),14,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 120.814^A^MUMPS

1)= S ^GMR(120.8,DA(1),14,"A",9999999-X,DA)=""

2)= K ^GMR(120.8,DA(1),14,"A",9999999-X,DA)

USER ENTERING

0;2

POINTER TO NEW PERSON FILE (#200)

DESCRIPTION:

This is the user who indicated the ID band was marked.

UNEDITABLE