求助，想用宏在data步里做批量处理。

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

初学宏，感觉理解得不对，请问如何能做这种批量化处理，求大神带带。



%macro  combine(name=, length=);
&name=.; *先设置成missing;

%do i=1 %to &length;
%if &name___&&i=1 %then %do;
&name=&i;
%return;%end; *如果abc___x=1，则设置abc=x,退出循环;
%end;
%mend combine;

data datab;
set dataa;
%combine(name=abc, length=3)
*怎么调用都不对;
run;
我以为宏是可以当做一段文本，直接嵌入data步每次改参数（在这里是想要合并的列名，列数）就行，很显然不对

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：data步 Data 批量处理 combine missing return

没人吗

1. data a;
   
2. input abc_1 abc_2 abc_3;
   
3. cards;
   
4. 1 0 0
   
5. 0 1 0
   
6. 0 0 1
   
7. 0 1 0
   
8. ;
   
9. run;
   
10. 
    
11. %macro  combine(name=, length=);
    
12. %do i = 1 %to &length.;
    
13. if &name._&i.=1 then &name.=&i.;
    
14. %end;
    
15. %mend combine;
    
16. 
    
17. data datab;
    
18. set a;
    
19. %combine(name=abc, length=3)
    
20. run;

复制代码

如果需要碰到条件满足即终止：

1. data a;
   
2. input abc_1 abc_2 abc_3;
   
3. cards;
   
4. 1 0 0
   
5. 0 1 1
   
6. 0 0 1
   
7. 0 1 0
   
8. 0 0 0
   
9. ;
   
10. run;
    
11. 
    
12. %macro  combine(name=, length=);
    
13. %do i = 1 %to &length.;
    
14.         if &name._&i.=1 then do;
    
15.                 &name.=&i.;
    
16.                 return;
    
17.         end;
    
18. %end;
    
19. %mend combine;
    
20. 
    
21. data datab;
    
22. set a;
    
23. %combine(name=abc, length=3)
    
24. run;

复制代码

data test;
input abc_1 abc_2 abc_3;
datalines;
1 0 0
0 0 0
0 1 0
0 1 0
0 0 1
0 0 1
0 0 0
0 1 0
;

proc sql;
select nvar into:nvar
from dictionary.tables
where libname='WORK' and memname='TEST';
quit;
%put &nvar;

options mlogic symbolgen;

%macro test(name);
%do i=1 %to &nvar;
if &name._&i=1 then &name=&i;
%if (&name=&i or &i=&nvar) %then %goto leave;
%end;
%leave: if &name <0 then &name=.;
%mend;

data test2;
set test;
%test(abc);
run;

freetiger 发表于 2017-6-13 09:31
如果需要碰到条件满足即终止：

非常感谢啊，终于弄懂了{:2_37:}

albusdzx 发表于 2017-6-13 11:17
data test;
input abc_1 abc_2 abc_3;
datalines;

谢谢，再问一下goto leave的leave是可以随意指定的吗？ 比喻 leave1  leaveend？

这个问题，判断条件比较简单，为什么不用if来做，是不是更简单？

gasxsnake 发表于 2017-6-14 02:43
谢谢，再问一下goto leave的leave是可以随意指定的吗？ 比喻 leave1  leaveend？

对 leave就是标签  标签起什么名字都行

albusdzx 发表于 2017-6-14 09:01
对 leave就是标签  标签起什么名字都行

谢谢~~~~