求大家看一段程序哪里有问题

1. %macro df_lag(data= ,index=, n=);
   
2. 
   
3. %let i=1;
   
4. 
   
5. %do %while(%scan(%quote(&index),&i,%quote(&delim)) ne );
   
6. %let Nindex=%scan(%quote(&index),&i,%quote(&delim));
   
7. %let j=1;
   
8. 
   
9. %do j=1 %to &n;
   
10. 
    
11. data &data;
    
12. set &data;
    
13. lg&j&Nindex=lag&j.(&Nindex);
    
14. run;
    
15. 
    
16. %end;
    
17. 
    
18. %let i=%eval(&i+1);
    
19. %end;
    
20. 
    
21. %mend;
    
22. 
    
23. %df_lag(data=a1,index=%str(stkcd ,avgroe ,roa ),n=8);

复制代码

%macro df_lag(data= ,index=, n=, delim=);

%let i=1;
%do %while(%scan(%quote(&index), &i, %quote(&delim)) ne );
%let Nindex=%scan(%quote(&index),&i, %quote(&delim));
        %let j=1;
        %do j=1 %to &n;
        data &data;
                set &data;
                lg&j&Nindex=lag&j.(&Nindex);
        run;
        %end;

%let i=%eval(&i+1);
%end;

%mend;

options symbolgen;
%df_lag(data=sashelp.prdsale,index=%str(predict,actual,year),n=3, delim=',');

&delim  这个东西哪里来的？

分隔符号吧

小鳄鱼a 发表于 2014-9-21 21:42
分隔符号吧

人家是说你没有定义&delim；去
%let delim=%str(,);
一下;
ne 后面是不是应该' ' ，你自己试一下。

1. %macro df_lag(data= ,index=, n=, delim=%bquote(,));
   
2. ...

复制代码