Sub-Field: 9002318.43

Parent File	Name	Number	Package
BSTS CONCEPT(#9002318.4)	ICD MAPPING	9002318.43	IHS Standard Terminology

Details

Field #	Name	Loc	Type	Details
.01	COUNTER	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 08, 2012` HELP-PROMPT: `Type a number between 1 and 9999, 0 decimal digits.` CROSS-REFERENCE: `9002318.43^B` 1)= S ^BSTS(9002318.4,DA(1),3,"B",$E(X,1,30),DA)="" 2)= K ^BSTS(9002318.4,DA(1),3,"B",$E(X,1,30),DA)
.02	CODE	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `JUL 24, 2013` HELP-PROMPT: `Answer must be 1-10 characters in length.` CROSS-REFERENCE: `9002318.43^C` 1)= S ^BSTS(9002318.4,DA(1),3,"C",$E(X,1,30),DA)="" 2)= K ^BSTS(9002318.4,DA(1),3,"C",$E(X,1,30),DA) CROSS-REFERENCE: `9002318.4^F^MUMPS` 1)= D ICDSX^BSTSUTIL 2)= D ICDKX^BSTSUTIL
.03	CODE TYPE	0;3	SET	'IC9' FOR ICD9 DX; 'ICP' FOR ICD9 PR; '10D' FOR ICD10 DX; '10P' FOR ICD10 PR; LAST EDITED: `JUL 14, 2014`
.04	REVISION IN	0;4	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 08, 2012`
.05	REVISION OUT	0;5	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 08, 2012`