SAS新手关于在一个表中查询另一个表求问？

SAS新手，论坛新手，向各位大神求助。
我现在有表A和表B，都有共同的变量ID号，有n个已经按年份排序。
有两个问题：1.现在想看t年表A的ID在t+1年的表B中是否存在，并在表A中设立一个变量，存在就标1，没有存在就标0，请问怎么操作？
2.因为要做很多年的，请问怎么做这种操作的循环？
谢谢各位大神，麻烦了。

1. %MACRO TEST_MACRO();
   
2. %LET YEAR=2001;
   
3. *比如暂定数据的起始年份为2001年，数据总共到2017年;
   
4.         %DO I=0 %TO 16;
   
5.             %LET YEAR1=%EVAL(&YEAR.+&I.);
   
6.                                     PROC SORT DATA=WORK.A&YEAR1.;BY ID;RUN;
   
7.                         %DO J=1 %TO 5;
   
8.             %LET YEAR%EVAL(&J.)=%EVAL(&YEAR.+&I.+&J.);
   
9.                         %LET T_YEAR=&&YEAR&J..;
   
10.                         PROC SORT DATA=WORK.B&T_YEAR.;BY ID;RUN;
    
11.                         %END;
    
12.          
    
13.                         DATA RSLT_&YEAR0.;
    
14.                         MERGE WORK.A&YEAR0.(IN=IN0)
    
15.                               WORK.B&YEAR1.(IN=IN1)
    
16.                               WORK.B&YEAR2.(IN=IN2)
    
17.                                                           WORK.B&YEAR3.(IN=IN3)
    
18.                                                           WORK.B&YEAR4.(IN=IN4)
    
19.                                                           WORK.B&YEAR5.(IN=IN5)
    
20.                                   ;
    
21.                         BY ID;
    
22.                         IF IN0;
    
23.                         IF IN0 AND IN1 THEN FLAG1=1;ESLE FLAG1=0;
    
24.                         IF IN0 AND IN2 THEN FLAG2=1;ESLE FLAG2=0;
    
25.                         IF IN0 AND IN3 THEN FLAG3=1;ESLE FLAG3=0;
    
26.                         IF IN0 AND IN4 THEN FLAG4=1;ESLE FLAG4=0;
    
27.                         IF IN0 AND IN5 THEN FLAG5=1;ESLE FLAG5=0;
    
28.                         RUN;
    
29.     %END;
    
30. %MEND;
    
31. %TEST_MACRO();

复制代码

如果能给一个测试数据，或许能更容易理解你的意思！

1. %MACRO TEST_MACRO();
   
2. %LET YEAR=2001;
   
3. *比如暂定数据的起始年份为2001年，数据总共到2017年;
   
4.         %DO I=0 %TO 16;
   
5.                 %LET YEAR1=%EVAL(&YEAR.+&I.);
   
6.             %LET YEAR2=%EVAL(&YEAR.+&I.+1);
   
7.                           PROC SORT DATA=WORK.CNT_&YEAR1.;BY ID;RUN;
   
8.                         PROC SORT DATA=WORK.CNT_&YEAR2.;BY ID;RUN;
   
9.          
   
10.                         DATA RSLT_&YEAR1.;
    
11.                         MERGE WORK.CNT_&YEAR1.(IN=IN1)
    
12.                               WORK.CNT_&YEAR2.(IN=IN2)
    
13.                                   ;
    
14.                         BY ID;
    
15.                         IF IN1;
    
16.                         IF IN1 AND IN2 THEN FLAG=1;ESLE FLAG=0;
    
17.                         RUN;
    
18.     %END;
    
19. %MEND;
    
20. %TEST_MACRO();

复制代码

舍身卫道 发表于 2018-1-12 10:07

谢谢大神，不过我还有一点小问题，我在执行命令之前，是要把这n个t年的表A和n+1个t年的表B放进哪个数据库中还是怎么样重命名？因为我把这个程序敲进去执行只是出了日志而并未执行。

emilycly 发表于 2018-1-12 10:35
谢谢大神，不过我还有一点小问题，我在执行命令之前，是要把这n个t年的表A和n+1个t年的表B放进哪个数据库 ...

打错了，n个t+1年的表B

流水不朽 发表于 2018-1-12 09:21
如果能给一个测试数据，或许能更容易理解你的意思！

我有n个表A，名称为A2000，A2001...A2016;
还有n个表B，名称为B2001,B2002...B2017;
他们有共同的变量ID，我想看A2000有没有ID在B2001、B2002、B2003、B2004、B2005中；
A2001有没有ID在B2002、B2003、B2004、B2005、B2006中；
然后如果A2000中在B2001中找到ID，则flag1标1，没有标0；
A2000在B2002中找到ID，flag2标1，其他标0；依次类推在5年内；
最后每个A表里会有五个flag变量；
都是t年的A表在t+1，t+2，t+3，t+4和t+5年的B表是否存在；
大概就是这个意思。

emilycly 发表于 2018-1-12 10:35
谢谢大神，不过我还有一点小问题，我在执行命令之前，是要把这n个t年的表A和n+1个t年的表B放进哪个数据库 ...

还有大神，就是我想看每个t年的表A在t+1，t+2，t+3，t+4，t+5年每年的B表中是否存在，是不是特别难实现。

舍身卫道 发表于 2018-1-12 13:47

您好，我在操作中出现了一个问题：
"没有解析宏J的调用。
在需要数值操作的%EVAL函数或%IF条件中发现字符操作数，条件是%J"。
请问该怎么解决，谢谢。

不好意思，原来想的程序本来只是想告诉你一下方法的，代码我没有测试，还有一些代码因为手误写错的，真是惭愧，下面我将测试过的代码发给你看下

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();

复制代码