/*lag=timewindow-1*/
%let lag=2 ;
data y;
set x;
by Fundcd notsorted;
format startdte yymmdd10. enddte yymmdd10.;
enddte=Clsdt;
startdte=lag&lag.(Clsdt);
if first.Fundcd then cnt=0;cnt+1;
if cnt>&lag.;
keep Fundcd startdte enddte;
run;
proc print;
run;[/code:36z9gc4e]