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

张双亮

%macro create(name,number);
( s3 I7 ^- |4 Q! a  A%do n=1 %to &number;
&name.n
%end;
%mend create;
data %create(abc,3);
/ q: n  X% N: @9 q& ninput a@@;
if a=1 then output abc1;
6 r3 t7 K1 _1 Q" Zelse if a=2 then output abc2;
- s" j. ^* j5 A1 f% w  nelse if a=3 then output abc3;
; V% b( S9 D0 }+ c5 }+ j! Bcards;
1 S# U2 g8 V$ g) J' X& Z9 D1 E; [: L% B1 2 3
;
proc print data=abc1;
) E- Q  k: U, }- A4 Krun;
proc print data=abc2;
run;
proc print data=abc3;
run;

madio

1. %macro create(name=,number=);
   % n$ D  V) f8 V- M; ]- O
2. %do n=1 %to &number;
   & d, c\" a5 S, y\" t4 x2 V' b+ _+ k
3. &name.&n
   5 O0 z. R: U2 G( @$ S
4. %end;
   * j' `: c+ ?: B. [# y3 u
5. %mend create;
   9 ]0 z' S# f, ^/ ?) G
6. data %create(name=abc,number=3);
   - M1 N2 l  G( C' I* V. n
7. input a@@;  V2 J/ n5 x) U\" Y8 p; n
   
8. if a=1 then output abc1;+ S# u% M5 r% A
   
9. else if a=2 then output abc2;
   ) S; L& f- m- ?0 Q
10. else if a=3 then output abc3;
    / U, r4 ~$ ^( g4 R6 \! v# F. o' q: p; [
11. cards;
    9 N. ^( }! `/ M# m; ]- C
12. 1 2 3
    ! ~5 z# a* U& P7 E- L
13. ;/ z5 j, C. ^* s\" U% g
    
14. run;9 J2 @4 _1 b5 z. i1 e) y
    
15. proc print data=abc1;
    2 a- j* u: ~: x3 V6 c# K- U
16. run;
    8 I\" c8 l$ ~  U4 ]3 [7 m
17. proc print data=abc2;
    9 [( i* @  e3 x' D
18. run;
    0 C* _\" W0 r4 S4 V. d
19. proc print data=abc3;
    . Q$ w- v- ^( U- `
20. run;

复制代码