不知道错哪里了？求大神解答

张双亮

%macro create(name,number);
%do n=1 %to &number;
&name.n
: T4 i3 {* `( X: l+ C( ^%end;
%mend create;
data %create(abc,3);
input a@@;
2 S) G& K+ s' H# V6 t' @if a=1 then output abc1;
else if a=2 then output abc2;
, M) f# W# B& L  f6 ielse if a=3 then output abc3;
/ u* E4 P. h3 ]cards;
1 2 3
% g/ H) a, v' B% r' y4 k, b+ t8 w;
. f: G) s+ H2 s, m3 v! _# g% W. ^proc print data=abc1;
run;
+ V: S" T; b; B; Iproc print data=abc2;
run;
7 [; j: w0 O, ]0 n4 ?+ oproc print data=abc3;
  S7 O9 _# d/ ^$ Trun;

madio

1. %macro create(name=,number=);
   ) L! Q/ a, i# D7 y$ S6 n
2. %do n=1 %to &number;
   / P: u- P6 U( G' }
3. &name.&n& S. E4 n) z5 {7 M  E
   
4. %end;& O$ B1 {) j5 e7 P1 d
   
5. %mend create;
   3 n  Q+ p6 y\" X
6. data %create(name=abc,number=3);# y/ Y' Y5 @# Z$ x1 N\" I' J8 E9 Z
   
7. input a@@;
   1 z9 h0 ]% l; s7 }
8. if a=1 then output abc1;\" k2 u* @3 l: B
   
9. else if a=2 then output abc2;
   ) `* f- W\" _; Z\" r
10. else if a=3 then output abc3;
    ) A( D0 f8 \; u\" C
11. cards;
    5 }+ b: q! m1 @3 ?, V' _
12. 1 2 3
    $ s' y& D* C% q5 T
13. ;( S3 t1 X- t, ]2 G
    
14. run;
    + e5 ~$ g  G8 O
15. proc print data=abc1;, A\" T: {7 Y1 q1 T4 W5 {, |/ e; X
    
16. run;1 B+ B4 ?) k, v7 t) c3 y
    
17. proc print data=abc2;) \% Z: M% V9 h' ]: L! t6 D9 F( O
    
18. run;
    : g0 Y6 ~+ b, C7 _
19. proc print data=abc3;
    4 R7 X& H! r4 ?2 G0 q  S: y
20. run;

复制代码

( U! L+ t  E) H1 `+ n! p- e- S