0 (.001)    INDEX (.11)

Name Value
FILE 0
NAME ADEL
SHORT DESCRIPTION Delete Keys and Indexes associated with a deleted field.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY R
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 0
SET LOGIC Q
KILL LOGIC D:'$D(DICATTED)&'$D(DIU) DELXRF^DICATT4(DA(1),DA)