data ex1(drop=b4) ex2(drop=b3);
input A B1        B2 @;
   do i=1 to b1;
       b3=a;
           keep b3;
           output ex1;
        end;
   do i=1 to b2;
      b4=a;
          keep b4;
          output ex2;
        end;
cards;
1        2        1
2        3        4
3        3        2
4        2        3
;
run;
data ex;
   merge ex1 ex2;
   run;

多谢LS两位指教，学习了~！

2# sxlion

I just simplify it to make it more readable.

data b3(keep=a)  b4(keep=a);
  input a b c ;
  do i = 1 to b;
      output b3;
   end;
  do i = 1 to c;
      output b4;
   end;
cards;
1        2        1
2        3        4
3        3        2
4        2        3
;

proc print data=b3; run;
proc print data=b4; run;

楼上的了不起。

我连楼主的问题都没有看懂。看了楼上的程序，才知道楼主要问的是什么。