请教一段程序，哪里有错？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请问这段用宏实现的程序，统计sashelp.class年龄13岁的人并输出这些记录，将个数统计到sum宏变量中，哪里有问题，sum运行结果都是缺失值？
%macro sss(dat,num);
%global mm;
data test;
set &dat;
%if age eq &num %then %do;
  retain sum 0;
  sum=sum+1;
  output;
%end;
call symput('mm',sum);
run;
%mend sss;

%sss(sashelp.class, 13);
%put &mm;

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：哪里有 SASHELP symput Global output 请教 程序

1. %macro sss(dat,num);
   
2.     %global mm;
   
3.     data test;
   
4.         set &dat;
   
5.         if age eq &num then do;
   
6.             sum+1;
   
7.             output;
   
8.         end;
   
9.         call symputx('mm',sum);
   
10.     run;
    
11. %mend sss;
    
12. 
    
13. %sss(sashelp.class, 13);
    
14. %put NOTE:*** &mm ***;

复制代码

2# hopewell

为什么不需要用%if 和%then %do呢，不是在宏里面的函数吗

2# hopewell
还想请教call symput和callsymputx的区别，非常感谢

The four benefits of CALL SYMPUTX are:
1.) CALL SYMPUTX does not write a note to the SAS log when the second argument is numeric. CALL SYMPUT, however, writes a note to the log stating that numeric values were converted to character values.
2.) CALL SYMPUTX uses a field width of up to 32 characters when it converts a numeric second argument to a character value. CALL SYMPUT uses a field width of up to 12 characters.
3.) CALL SYMPUTX left-justifies both arguments and trims trailing blanks.CALL SYMPUT does not left-justify the arguments, and trims trailing blanks from the first argument only. Leading blanks in the value of name cause an error.
4.) CALL SYMPUTX enables you to specify the symbol table in which to store the macro variable, whereas CALL SYMPUT does not. This is accomplished by an optional third argument to the SYMPUTX function.

大牛们,小弟膜拜一下.