- data stock;
- input id value date yymmdd10.;
- year = year(date);
- month = month(date);
- format date yymmdd10.;
- datalines;
- 603766 100 2013-03-31
- 603766 200 2013-06-30
- 603766 300 2013-09-30
- 603766 400 2013-12-31
- 603766 500 2014-03-31
- 603993 100 2012-01-01
- 603993 200 2012-09-30
- 603993 300 2012-12-31
- 603993 400 2013-01-01
- 603993 500 2013-03-31
- 603993 700 2013-09-30
- 603993 800 2013-12-31
- 603993 900 2014-03-31
- ; run;
- data want;
- set stock;
- by id;
- month_lag = lag(month);
- value_lag = lag(value);
- if month > 6 and month - month_lag > 3 then do;
- output;
- date = mdy(6, 30, year(date));
- month = 6;
- value = value_lag;
- output;
- end;
- else output;
- drop month_lag value_lag;
- run;
- proc sort data=want;
- by id date;
- run;


雷达卡







京公网安备 11010802022788号







