Sub-Field: 90668.812

Parent File	Name	Number	Package
UDS 16 TABLE CODE LISTS(#90668.8)	ICD PROCEDURES	90668.812	IHS Uniform Data System

Parent File

Name

Number

Package

ICD PROCEDURES

90668.812

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ICD PROCEDURES	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `DEC 01, 2015` HELP-PROMPT: `Answer must be 1-10 characters in length.` CROSS-REFERENCE: `90668.812^B` 1)= S ^BUDDTSSC(DA(1),12,"B",$E(X,1,30),DA)="" 2)= K ^BUDDTSSC(DA(1),12,"B",$E(X,1,30),DA)
.02	POINTER	0;2	POINTER TO ICD OPERATION/PROCEDURE FILE (#80.1)	ICD OPERATION/PROCEDURE(#80.1) LAST EDITED: `NOV 17, 2016` CROSS-REFERENCE: `90668.8^AP` 1)= S ^BUDDTSSC("AP",$E(X,1,30),DA(1),DA)="" 2)= K ^BUDDTSSC("AP",$E(X,1,30),DA(1),DA)
.03	CODING SYSTEM	0;3	POINTER TO ICD CODING SYSTEMS FILE (#80.4)	ICD CODING SYSTEMS(#80.4) LAST EDITED: `DEC 01, 2015`

ICD PROCEDURES

0;1

FREE TEXT

CROSS-REFERENCE: 90668.812^B

1)= S ^BUDDTSSC(DA(1),12,"B",$E(X,1,30),DA)=""

2)= K ^BUDDTSSC(DA(1),12,"B",$E(X,1,30),DA)

POINTER

0;2

POINTER TO ICD OPERATION/PROCEDURE FILE (#80.1)

CROSS-REFERENCE: 90668.8^AP

1)= S ^BUDDTSSC("AP",$E(X,1,30),DA(1),DA)=""

2)= K ^BUDDTSSC("AP",$E(X,1,30),DA(1),DA)

CODING SYSTEM

0;3

POINTER TO ICD CODING SYSTEMS FILE (#80.4)