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

张双亮

%macro create(name,number);
1 v' `( v& ~* s%do n=1 %to &number;
&name.n
%end;
# B5 n1 S% p$ V%mend create;
data %create(abc,3);
- O+ Z/ U2 s: c" M$ Q. H& v; Oinput a@@;
" F- U# G! `/ O& h8 I- a  gif a=1 then output abc1;
else if a=2 then output abc2;
% ?; x5 u$ Q" r; n2 i0 k$ u. xelse if a=3 then output abc3;
cards;
- U# h* ~% p# o( z1 2 3
;
proc print data=abc1;
run;
proc print data=abc2;
run;
proc print data=abc3;
: `) o( r( `% p/ t. Frun;

madio

1. %macro create(name=,number=);
   % T; q( y+ ]  g* @+ j/ @
2. %do n=1 %to &number;
   3 [& G6 i\" s8 I. w
3. &name.&n# w\" q, u3 g1 D2 I3 L
   
4. %end;
   \" I2 m7 h( u7 H: K& ~+ m
5. %mend create;
     k1 O# d6 ?* G6 h\" U; s6 Q\" ~
6. data %create(name=abc,number=3);
   5 z2 c% u( v6 L) [
7. input a@@;( C- ?* r% \1 r' Y* L
   
8. if a=1 then output abc1;
   % k: }8 O3 R! ~+ L
9. else if a=2 then output abc2;0 m  ~1 N2 H; m- l2 f8 U- P
   
10. else if a=3 then output abc3;. S% H* M8 [4 m) H8 P+ k2 `
    
11. cards;\" d6 f7 }) R* e, G1 o
    
12. 1 2 3
    \" @2 i# I+ @4 a' N9 r! M
13. ;
    $ w# n$ M% T1 c1 C6 l/ F0 d$ ^9 G! ~& M  y
14. run;6 D4 u$ z' E$ n/ Q0 q
    
15. proc print data=abc1;
    0 X  u; j# h3 g5 R- D: G- L8 n+ R
16. run;
      H4 f\" g1 x\" I+ T
17. proc print data=abc2;
    5 E( b% z: h2 k& X7 t  ]5 \( \
18. run;
    3 S+ a% `! u8 D: J+ F( \. d% Z+ {
19. proc print data=abc3;# l\" k8 U6 d/ |! S2 G% A' R
    
20. run;

复制代码

4 Y3 B& k+ H7 w* i1 H; A: w