data raw;
input day$;
cards;
1974nana
********
1983ukuk
........
&&&&&&&&&
2001----
19891---
198912--
1989123-
;run;
data final;
set raw;
m="ukukukukukukukukukukukukukukukukuk";
new=substr(compress(day||m,'- * . &'),1,8); /*把所有缺失字符类型填进去*/
run;
-------------------------------------------------------------------
直接输入类
data a;
input day2 : yymmdd10.;
format day2 ddmmyy10.;
cards;
20090630
20090311
20090327
20090318
20090507
;run;
非直接输入类
data a;
input k;
cards;
20090630
20090311
20090327
20090318
20090507
;run;
data b;
set a;
date=input(put(k,8.),yymmdd10.);
format date ddmmyy10.;
run;