IBXST3 ; ;10/29/04
 S X=DE(19),DIC=DIE
 K ^DGCR(399,"ALEX",$E(X,1,30),DA)