DGRPTX18 ; ;12/13/08
 S X=DE(22),DIC=DIE
 X "S DGXRF=.331 D ^DGDDC Q"