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

张双亮

%macro create(name,number);
%do n=1 %to &number;
&name.n
0 Q" Q( z" `- ]%end;
%mend create;
data %create(abc,3);
) o9 ?) C) S1 Minput a@@;
if a=1 then output abc1;
else if a=2 then output abc2;
7 |, s, k, p; ~, ]7 Uelse if a=3 then output abc3;
+ \7 y5 g, |4 }cards;
, _8 ~* }' }7 w8 ?" h1 K1 2 3
;
proc print data=abc1;
run;
9 G4 g4 P3 R* s+ ?proc print data=abc2;
0 c7 \0 o% t' G, _! _run;
. T( b, O, t6 Y" y: Tproc print data=abc3;
run;

madio

1. %macro create(name=,number=);
   / |; f! K+ y  A5 [. I9 w( A
2. %do n=1 %to &number;0 J1 W6 x4 l$ m
   
3. &name.&n) Q! v, ^* i$ e+ [  P
   
4. %end;' `& |7 D: e+ L1 i
   
5. %mend create;
   . ~' {/ X5 D0 e  `  T
6. data %create(name=abc,number=3);
   / E. w5 e  W3 x+ v! N) K
7. input a@@;+ F5 l7 a' }$ g% S1 s
   
8. if a=1 then output abc1;, u8 X, E  e+ j3 k
   
9. else if a=2 then output abc2;9 }* B- S8 `( B$ V, {! {& i! w: i
   
10. else if a=3 then output abc3;
    \" B, f) u9 F, b8 t
11. cards;
    ; }0 N! `1 V* s1 Y4 |% o
12. 1 2 3
    5 ^6 ~1 M# d3 k& Y3 ~4 T. ^2 P$ J& r
13. ;
    3 {# E4 t) ?  [: H) ^
14. run;) i9 d' G1 ~- j
    
15. proc print data=abc1;3 Q- F# R  A/ D& b. E: n6 q
    
16. run;
    & M5 ]6 }5 M- h. S  l: V) K- N
17. proc print data=abc2;/ b6 ?% Z0 w; d  y9 o
    
18. run;
    5 }8 o$ U8 i1 W* P6 V0 x, C
19. proc print data=abc3;5 G, q8 u$ d: y. ?0 A5 |
    
20. run;

复制代码

3 s# R5 o4 l7 z8 }4 v8 j$ l