关于宏的一个小问题

我这个宏是关于看t年表A是否出现在t+1年至t+5年的表B里，运行时候出现的问题是：“在需要数值操作数的%EVAL函数或%IF条件中发现字符操作数。条件是%J”
我截取了前一部分程序，我知道问题出在了标黄的地方但是我不知道怎么改，请大家帮忙谢谢。

• %MACRO TEST_MACRO();
• %LET YEAR=2004;
•             %DO I=0 %TO 9;
•             %LET YEAR1=%EVAL(&YEAR.+&I.);
•                                     PROC SORT DATA=WORK.A&YEAR1.;BY ID;RUN;
•                         %DO J=1 %TO 5;
•             %LET YEAR%EVAL(&J.)=%EVAL(&YEAR.+&I.+&J.);
•                         %LET T_YEAR=&&YEAR&J..;
•                         PROC SORT DATA=WORK.B&T_YEAR.;BY ID;RUN;
•                         %END;
  

1. data a2001;
   
2. input id;
   
3. cards;
   
4. 1
   
5. 2
   
6. 3
   
7. 4
   
8. 5
   
9. ;
   
10. run;
    
11. 
    
12. data b2002 b2003 b2004 b2005 b2006;
    
13. input id;
    
14. cards;
    
15. 2
    
16. 3
    
17. 4
    
18. 5
    
19. 6
    
20. ;
    
21. run;
    
22. 
    
23. %MACRO TEST_MACRO();
    
24. %LET YEAR=2001;
    
25. *比如暂定数据的起始年份为2001年，数据总共到2017年;
    
26.         %DO I=0 %TO 0;
    
27.             %LET YEAR0=%EVAL(&YEAR.+&I.);
    
28.                                     PROC SORT DATA=WORK.A&YEAR0.;BY ID;RUN;
    
29.                         %DO J=1 %TO 5;
    
30.             %LET YEAR%EVAL(&J.)=%EVAL(&YEAR.+&I.+&J.);
    
31.                         %LET T_YEAR=&&YEAR&J..;
    
32.                         PROC SORT DATA=WORK.B&T_YEAR.;BY ID;RUN;
    
33.                         %END;
    
34.          
    
35.                         DATA RSLT_&YEAR0.;
    
36.                         MERGE WORK.A&YEAR0.(IN=IN0)
    
37.                               WORK.B&YEAR1.(IN=IN1)
    
38.                               WORK.B&YEAR2.(IN=IN2)
    
39.                               WORK.B&YEAR3.(IN=IN3)
    
40.                               WORK.B&YEAR4.(IN=IN4)
    
41.                               WORK.B&YEAR5.(IN=IN5)
    
42.                                   ;
    
43.                         BY ID;
    
44.                         IF IN0;
    
45.                         IF IN0 AND IN1 THEN FLAG1=1;ELSE FLAG1=0;
    
46.                         IF IN0 AND IN2 THEN FLAG2=1;ELSE FLAG2=0;
    
47.                         IF IN0 AND IN3 THEN FLAG3=1;ELSE FLAG3=0;
    
48.                         IF IN0 AND IN4 THEN FLAG4=1;ELSE FLAG4=0;
    
49.                         IF IN0 AND IN5 THEN FLAG5=1;ELSE FLAG5=0;
    
50.                         RUN;
    
51.     %END;
    
52. %MEND;
    
53. %TEST_MACRO();

复制代码

楼主不要意思 前2天我没看论坛，这是我测试之后的代码 测试没问题，你试下，我追到这回答你的问题，也是没谁了

%MACRO TEST_MACRO();
%LET YEAR=2004;
            %DO I=0 %TO 9;
            %LET YEAR1=%EVAL(&YEAR.+&I.);
                                    PROC SORT DATA=WORK.A&YEAR1.;BY ID;RUN;
                        %DO J=1 %TO 5;
            %LET YEAR&i.&J.=%EVAL(&YEAR.+&I.+&J.);
                        %LET T_YEAR=&&YEAR&J..;
                        PROC SORT DATA=WORK.B&T_YEAR.;BY ID;RUN;
                        %END;

你可以把%eval去掉试试看。

在宏里面，宏变量所代表的值，都是字符串来的，除了两个特殊的宏函数：%eval  %sysevalf ，是在宏环境中
把数字 转换成数值类型来使用，你这里定义宏变量，宏变量本身是字符串的内容，所以无需使用 %eval 来处理。