可以在程序的run;之前加上这个语句
if last.name then time2="7jan2013"d-date;
time2即为所求的时间，但是有的观测中time2会是缺失的，只有在每个名字的最后一次出现 的那一行才有time2 的值。

data old;
input name $ date yymmdd10.;
cards;
张三 2012/12/11
张三 2012/12/12
张三 2012/12/15
李四 2012/12/13
李四 2012/12/15
李四 2012/12/25
王五 2012/12/26
;
run;
proc sort data=old out=old_s;
by name date;
run;
data new(drop=date1);
set old_s;
by name;
retain date1;
if first.name then date1=date;
a=date-date1;
if not last.name then date1=date;
if last.name then date1=0;
run;

/**
c原始数据：
姓名 购买日期
张三 2012/12/11
张三 2012/12/12
张三 2012/12/15
李四 2012/12/13
李四 2012/12/15
李四 2012/12/25
王五 2012/12/26
期望结果：
姓名 购买日期 购买时间间隔
张三 2012/12/11 0
张三 2012/12/12 1
张三 2012/12/15 3
李四 2012/12/13 0
李四 2012/12/15 2
李四 2012/12/25 10
王五 2012/12/26 0
即：不同用户的消费时间间隔，如张三第一次消费是2012/12/11，
那第一次的消费时间间隔是0，第二次消费时间是2012/12/12，
与第一次的消费时间间隔为1天，第三次消费时间是2012/12/15，
与上一次的间隔为3，以此类推
**/


data a;
input name $ date yymmdd10.;
datalines;
张三 2012/12/11
张三 2012/12/12
张三 2012/12/15
李四 2012/12/13
李四 2012/12/15
李四 2012/12/25
王五 2012/12/26
;
run;

proc sort data=a out=b;
  by name date;
run;

data c;
  set b;
  by name;
  retain date1;
  if first.name then date1=date;
  date2=date1;
  date1=date;
  dif=date-date2;
  drop date1 date2;
run;
proc print data=c;
  format date yymmdd10.;
run;