Sub-Field: 9000092.11

Parent File	Name	Number	Package
CARE PLAN(#9000092)	STATUS	9000092.11	IHS Patient

Details

Field #	Name	Loc	Type	Details
.01	STATUS	0;1	SET	'A' FOR ACTIVE; 'I' FOR INACTIVE; 'E' FOR ENTERED IN ERROR; 'R' FOR REPLACED; 'M' FOR MET; LAST EDITED: `FEB 21, 2013` CROSS-REFERENCE: `9000092.11^B` 1)= S ^AUPNCPL(DA(1),11,"B",$E(X,1,30),DA)="" 2)= K ^AUPNCPL(DA(1),11,"B",$E(X,1,30),DA) RECORD INDEXES: `ASDT (#508) (WHOLE FILE #9000092)`
.02	USER WHO ENTERED	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 21, 2013`
.03	DATE/TIME ENTERED	0;3	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 21, 2013` RECORD INDEXES: `ASDT (#508) (WHOLE FILE #9000092)`
.04	REASON ENTERED IN ERROR	0;4	SET	'D' FOR DUPLICATE; 'E' FOR ENTERED IN ERROR; 'O' FOR OTHER; LAST EDITED: `FEB 21, 2013`
.05	REASON IF OTHER	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>100!($L(X)<2) X` LAST EDITED: `FEB 21, 2013` HELP-PROMPT: `Answer must be 2-100 characters in length.`
.06	NEW PLAN IF REPLACED	0;6	POINTER TO CARE PLAN FILE (#9000092)	CARE PLAN(#9000092) LAST EDITED: `FEB 21, 2013`
1	COMMENT IF INACTIVE	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>100!($L(X)<2) X` LAST EDITED: `FEB 21, 2013` HELP-PROMPT: `Answer must be 2-100 characters in length.`