Sub-Field: 65.099

Parent File	Name	Number	Package
BLOOD INVENTORY(#65)	DATA CHANGE DATE	65.099	Lab Service

Details

Field #	Name	Loc	Type	Details
.01	DATA CHANGE DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X S DINUM=$P($H,",",1)_$P($H,",",2) H 1` LAST EDITED: `MAY 12, 1985` DESCRIPTION: `This field contains the date the reported value was changed.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.02	PERSON CHANGING DATA	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 08, 1985` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the person that alter the reported value.`
.03	DATA ELEMENT	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 08, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field indicated what result name the data was altered.`
.04	OLD VALUE	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 08, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the value before it was altered.`
.05	NEW VALUE	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the new value after the field was altered.`