假设楼主的数据是这样的：
data a;
input code:$6. date:best12. price;
datalines;
1 20080709 15
1 20090102 20
1 20090301 11
1 20100102 12
1 20100329 23
2 20080101 10
2 20090102 28
2 20090301 19
2 20100102 32
2 20100329 43
;
run;
楼主可以通过下面的语句，将这个date转化成日期格式：
data a0;
set a;
newdate = mdy(substr(trim(left(put(date,$8.))),5,2),substr(trim(left(put(date,$8.))),7,2),substr(trim(left(put(date,$8.))),1,4));
format newdate yymmdd10.;
run;
另外不清楚楼主所说的一年是对每个code都是这个范围么？
如果是的话，不知道这样能否满足楼主的要求：

%let day2=%sysfunc(mdy(1,2,2010));
%let day1=%eval(&day2-365);
proc summary data = a0(where = (&day1<=newdate<=&day2));
var price;
by code;
output out = a1(drop = _TYPE_ _FREQ_) max=;
run;

细想下，拉链实现不了，别的算法我再想想，实在不好意思，误导了

闰年的问题之前SQL的方法不需要考虑，这个方法我没认真考虑
希望是对的
这个方法快很多。。。。。。