Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 2.0534

Package: Registration

PATIENT(#2)-->2.0534

Sub-Field: 2.0534

Information

Parent File	Name	Number	Package
PATIENT(#2)	PH DATE/TIME UPDATED	2.0534	Registration

Details

Field #	Name	Loc	Type	Details
.01	PH DATE/TIME UPDATED	0;1	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 07, 2000` DESCRIPTION: `This field is automatically stuffed with the current date and time whenever the Purple Heart data is updated. This may be done initially by the local site, then subsequently by HEC.` CROSS-REFERENCE: `2.0534^B` `1)= S ^DPT(DA(1),"PH","B",$E(X,1,30),DA)=""` `2)= K ^DPT(DA(1),"PH","B",$E(X,1,30),DA)`
1	PH?	0;2	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `AUG 07, 2000` DESCRIPTION: `Field will be stuffed with the CURRENT PURPLE HEART INDICATOR at the date/time of the update.`
2	PH STATUS	0;3	SET	'1' FOR PENDING; '2' FOR IN PROCESS; '3' FOR CONFIRMED; LAST EDITED: `NOV 22, 2000` DESCRIPTION: `Field will be stuffed with CURRENT PURPLE HEART STATUS (if any) at date/time of the update.`
3	PH REMARKS	0;4	SET	'1' FOR UNACCEPTABLE DOCUMENTATION; '2' FOR NO DOCUMENTATION REC'D; '3' FOR ENTERED IN ERROR; '4' FOR UNSUPPORTED PURPLE HEART; '5' FOR VAMC; '6' FOR UNDELIVERABLE MAIL; LAST EDITED: `DEC 15, 2000` DESCRIPTION: `Field will be stuffed with CURRENT PURPLE HEART REMARKS field, if any, at time of update.`
4	PH USER	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `AUG 07, 2000` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `Field will be stuffed with the user who updated PH information. If local user, then the value will be the free text user name from the NEW PERSON file. If updated by the HEC, then the value will be "HEC User".`