RACTOE4 ; ;12/27/07
 S X=DE(32),DIIX=2_U_DIFLD D AUDIT^DIET