[code:7be79]data fund;
input name $ date:yymmdd10. value;
format date yymmdd10.;
datalines;
A基金 20060101 1.002
A基金 20060102 1.005
B基金 20060101 1.011
B基金 20060102 1.001
;
run;
proc sort data=fund;
by name date;
run;
data fund(drop=value_old);
set fund;
by name date;
value_old=lag(value);
if first.name then diff=.;
else diff=(value-value_old)/value_old;
run;
proc sql noprint;
create table work.sql as
select * from fund;
quit;[/code:7be79]