你好问题解决没？我的论坛币。。谢谢！

如果每个id的VALUE均为三个，楼主可以试试以下方法：

proc datasets lib=work memtype=data nolist kill;
quit;

data finace;
input id date yymmdd10. value;
cards;
1 2013/01/01    -200
1 2013/02/14    50
1 2013/04/15    120
2 2013/02/02    -50
2 2013/03/04    20
2 2013/04/01    25
run;

proc sort data=finance;
        by id;
run;

data finace1;
        set finace;
        by id;
        if first.id then ord=0;
        ord+1;
run;

proc sort data=finace1;
        by id ord;
run;

%macro finace(dout=, var=, name= );

proc transpose data=finace1 out=&dout.(drop=_name_) prefix=&name.;
        id ord;
        by id;
        var &var.;
run;

proc sort data=&dout.;
        by id;
run;

%mend;

%finace(dout=finace2, var=value, name=v);
%finace(dout=finace3, var=date, name=d);

data fin;
        merge finace2 finace3;
        by id;
run;

data rate(keep=id rate);
        set fin;
        rate = finance('xirr', v1, v2, v3, d1, d2, d3, 0.1);
run;

您好，关键是每个id对应的数量都不是一样的，这应该怎么解决呢？真的急需要您的帮助，谢谢您！

而且有些数量非常多，上千个。

只要每个ID的数量相同就可以做；不同的话可以对数量相同的ID进行分组，再把最终的结果用set语句连接到一起就行了！