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

张双亮

%macro create(name,number);
%do n=1 %to &number;
&name.n
8 B+ B$ B- @/ m  Z& V%end;
%mend create;
data %create(abc,3);
- ]; J! o$ r5 @( rinput a@@;
if a=1 then output abc1;
8 a5 \# i; @4 h0 belse if a=2 then output abc2;
else if a=3 then output abc3;
$ |1 G: k6 z7 n$ g. Q; Scards;
& d# P* H. N% U; m! S  w7 D1 2 3
7 Z8 P8 ]* Y3 g9 z9 D, t6 h;
proc print data=abc1;
run;
' ?% s; V) M* F/ p7 A! {. jproc print data=abc2;
9 ^( k4 ~( r8 a1 T6 V8 vrun;
proc print data=abc3;
run;

madio

1. %macro create(name=,number=);
   , X5 q! h) Z, S  ?. I
2. %do n=1 %to &number;6 j6 P9 v3 s7 I& z
   
3. &name.&n7 X; L. e& b. m9 c# T
   
4. %end;
   1 V2 }2 R) W2 ^, o) ?
5. %mend create;7 p* o, w7 s6 e1 B) ]
   
6. data %create(name=abc,number=3);
   . _- t* r2 D* `6 ^3 l
7. input a@@;+ k7 p- A7 Q9 u) C3 z
   
8. if a=1 then output abc1;
   # q  `! W/ a' `; U\" X# V
9. else if a=2 then output abc2;$ G7 o+ D& B/ i* J
   
10. else if a=3 then output abc3;
    ' x4 j0 u* `% p; r( R. H3 q
11. cards;% a1 c/ R) }! S) g
    
12. 1 2 3* a: _3 \- K. W
    
13. ;
    9 B! [  G7 M, p* J& f$ R$ q
14. run;
    * Z4 O; r+ A) {3 Z2 Z
15. proc print data=abc1;
      H- |0 t& G9 N5 o! W! r, r* |
16. run;
    - x+ t) t! N/ _( j* [
17. proc print data=abc2;
    - }9 ?\" K4 b9 P7 g
18. run;5 ]: |/ i8 M6 e) j& ?
    
19. proc print data=abc3;
    1 Y+ Y/ M% w# ~/ h3 W
20. run;

复制代码

4 W& B) X/ t- f7 P