C**********o
发帖数: 658 | 1 有一组保险单，都有有效日期，想把它们的有效日期自动label为周。如 －－－
8月26日 －－－ “Aug25ToAug31" (Aug 25 is Sunday).
不知道有没有这样的？谢谢！ | s******r
发帖数: 1524 | 2 data ttt;
format datee date9. date_week date9. date_week22 date9.;
do i =1 to 33;
datee='01Aug2013'd + i;
date_week=datee-weekday(datee)+1;
date_week22=int((datee-2) /7)*7+2;
output;
end;
drop i;
run;
【在 C**********o 的大作中提到】
: 有一组保险单，都有有效日期，想把它们的有效日期自动label为周。如 －－－
: 8月26日 －－－ “Aug25ToAug31" (Aug 25 is Sunday).
: 不知道有没有这样的？谢谢！
| l****u
发帖数: 529 | 3 data yourdata;
set yourdata;
week=substr(put(date-weekday(date)+1,date9.),1,5)||'to'||
substr(put(date+7-weekday(date),date9.),1,5);
run; | C**********o
发帖数: 658 | |
|
