表1中的code是没有排序的，但是是聚集的，那么需要在第一个BY语句后加NOTSORTED

    do _n_=1 by 1 until(last.code);
        set one;
        by code notsorted;
   end;

我也来凑个热闹，别忘了金币啊，呵呵

data one;

    input code $ date a b;

datalines;
1 2 0.1 0.2
1 3 0.1 0.2
1 4 0.1 0.2
1 5 0.1 0.2
1 6 0.1 0.2
2 5 0.1 0.2
2 6 0.1 0.2
2 7 0.1 0.2
2 8 0.1 0.2
2 9 0.1 0.2
3 3 0.1 0.2
3 4 0.1 0.2
3 5 0.1 0.2
3 6 0.1 0.2
3 7 0.1 0.2
;
run;
data two;

    input code $ date a b;

datalines;
1 1 1111 4444
2 2 2222 5555
3 2 3333 6666
;
run;
data one;
  set one;
  by code notsorted;
  output;
  if first.code then output;
run;

data one;
  modify one two;
  by code;
run;

谢谢