如何实现LOCF

if ^missing(a11) and missing(a12) then a12=a11;
if ^missing(a12) and missing(a13) then a13=a12;  

data a;
set a;
retain b1 b2 b3;
if ^missing(a011) then b1=a011;
if ^missing(a021) then b2=a021;
if ^missing(a031) then b3=a031;
run;

LOCF中文名称末次观测转结法，即若有数据缺失，则用该次观测前最后一次有效观测的数据对该数据进行填补（也可进行其他补充规定）。我一般是用向上填补过程实现的，
proc sort;by xx xx xx ;run;
data b;set a;
do i=1 to n;
l_x=lag(x);
  l_y=lag(y);
  if x=. and x=l_x then y=l_y;
end;
drop l_x l_y ;
run;