DGRPTX14 ; ;04/21/06
 S X=DE(16),DIC=DIE
 D KILL^DGREGDD1(DA,.338,.33,8,$E(X,1,5))