proc import out=a
datafile='f:\riqi1.xls'
dbms=excel2010
replace;
run;

data c;
set a(keep=ri);
format ri yymmdd10.;
informat ri yymmdd10.;
run;