sas hash 小示例

要求：A表是每日基金净值表，其中name是基金名称；date是收盘日期；value是当日净值。B表是各客户持有各基金的起始日期与终止日期，
其中name是基金名称，sdate是起始日期，edate是终止日期。真实环境中：A表不大，只有几千条记录；B表巨大，会有一亿条记录。 
       目标表C含有各客户持有各基金起始日期的净值；终止日期的净值；期间净值累计值。即在保留B表所有字段的基础上衍生计算三个字段：
       svalue（起始日期的净值）；evalue（终止日期的净值）；tvalue（期间净值累计值）。 
          
 data value;
 input name $ date value;
 informat date yymmdd8.;
 format date date9.;
 cards;
 A 20070101 1
 A 20070102 2
 A 20070103 3
 A 20070104 4
 A 20070105 5
 A 20070106 6
 A 20070107 7
 B 20070101 8
 B 20070102 9
 ;
 run;
 data original;
 input name$ sdate edate;
 informat sdate edate yymmdd10. ;
 format  sdate edate yymmdd10. ;
 datalines;
 A 20070102 20070106
 A 20070101 20070104
 B 20070101 20070102;
 run;
 
 data value_compute;
  if _N_ = 0 then
  set value;
    if _N_=1 then do;
    declare hash h(dataset:'value');
    h.definekey('name','date');
    h.definedata(all:'yes');
    h.definedone();
    end;
  set original;
  rc=h.find(key:name,Key:sdate);/*把具体的key值传给find方法找到对应的内存地址将hash表中对应的数据取出*/;
  svalue=value; /****根据以上name和开始时间找到对应的value并赋值给svalue****/
  rc=h.find(key:name,key:edate);
  evalue=value;
  sum_value=0;
  do i = sdate to edate;
  rc=h.find(Key:name,key:i);/*注意：日期在sas中存储为数值*/
     sum_value+value;
  end;
  keep name sdate edate svalue evalue sum_value;
 run;