如何得到宏变量z

1. %let x=a;
   
2. %let y=1 2 4 5;
   
3. 
   
4. %let x=a0;
   
5. %let y=1 2 4 5;

复制代码

两种情况如何得到宏变量z为a1 a2 a4 a5

1. /* loop needs to be used inside data step or macro */
   
2. %let x=a;
   
3. %let y=1 2 4 5;
   
4. 
   
5. %let x=a0;
   
6. %let y=1 2 4 5;
   
7. 
   
8. %let xx=%substr(&x,1,1);
   
9. %let z =&xx%scan(&y,1) &xx%scan(&y,2) &xx%scan(&y,3) &xx%scan(&y,4);
   
10. 
    
11. %macro aaa(x=, y=);
    
12.   %global zz;
    
13.   %let xx = %substr(&x,1,1);
    
14.   %let nz = %sysfunc(countw(&y));
    
15.   %do i=1 %to &nz;
    
16.      %let zz=&zz &xx%scan(&y, &i);
    
17.    %end;
    
18.    %put zz=&zz;
    
19. %mend;
    
20. %aaa(x=b0, y=1 2 5 6)
    
21. 
    
22. data _null_;
    
23.       length z $20;
    
24.          nz = countw("&y");
    
25.        do i = 1 to nz;
    
26.           z = catx(' ', z, cats(substr("&x",1,1), scan("&y", i)));
    
27.       end;
    
28.    call symput('zzz', z);
    
29. run;

复制代码