Sub-Field: 90461.632

Parent File	Name	Number	Package
BEH RECONCILIATION(#90461.63)	ITEM RECONCILED	90461.632	IHS Electronic Health Record

Details

Field #	Name	Loc	Type	Details
.01	ITEM RECONCILED DATE/TIME	0;1	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 04, 2013` CROSS-REFERENCE: `90461.632^B` 1)= S ^BEHOCIR(DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^BEHOCIR(DA(1),2,"B",$E(X,1,30),DA)
.02	RECONCILING PERSON	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `MAR 04, 2013`
.03	ITEM TYPE	0;3	SET	'A' FOR ALLERGY; 'P' FOR PROBLEM; 'M' FOR MEDICATION; LAST EDITED: `DEC 03, 2013` CROSS-REFERENCE: `90461.63^F` 1)= S ^BEHOCIR("F",$E(X,1,30),DA(1),DA)="" 2)= K ^BEHOCIR("F",$E(X,1,30),DA(1),DA)
.04	ID	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 04, 2013` HELP-PROMPT: `Answer must be 1-30 characters in length.` CROSS-REFERENCE: `90461.63^G^MUMPS` 1)= S ^BEHOCIR("G",$P(^BEHOCIR(DA(1),2,DA,0),U,3),$E(X,1,30),DA(1),DA)="" 2)= K ^BEHOCIR("G",$P(^BEHOCIR(DA(1),2,DA,0),U,3),$E(X,1,30),DA(1),DA)
.05	CCDA ID	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>120!($L(X)<1) X` LAST EDITED: `SEP 12, 2013` HELP-PROMPT: `Answer must be 1-120 characters in length.` DESCRIPTION: `Items entered from the CCDA will be as follows Codeine - Allergy will store the text of the causative agent 22023478 - Problems will store the SNOMED CONCEPT CT` 21913 - Meds will store the RxNorm code