proc sql;
     create table test as
           select  fcode, tcode, date1, min(date1) as mindt, max(date1) as maxdt
           from (select fcode, tcode, input(put(date,6.),yymmn6.) as date1 from YOURDATA)
           group by fcode
                order by fcode, tcode, date1;
quit;

data _null_;
length fcode tcode date 8;
format date yymmn6.;
if _n_=1 then do;
     declare hash a(multidata:'yes');
     a.definekey('fcode');
     a.definedata('fcode','date','tcode');
     a.definedone();
     call missing(fcode,date,tcode);
end;
     set test;
     by fcode tcode;
     retain date;
     if first.tcode then do; date=mindt; rc=a.add(); end;
     else do while(date<maxdt) ;
           date=intnx('month',date,6);
           rc=a.add();
     end;
     rc=a.output(dataset: 'want' );
run;

你是说这个意思吗？

1. 先按照fcode组预读每组所有的date

2. 再按照 fcode组的date池 - tcode组的date池算出一个补，接到tcode中？

前面勉强看得明白的话，这句：对于11持有的1，（前面）要补齐199912 200006 200012
就完全看不明白了。

根据11，看看开始的date最早为199912，最晚为200512。


对于11持有的1，前面要补齐199912 200006 200012，因为11的跨度为199912到200512  而持有的1跨度为200106到200512

你好  ，能否解释一下data  _null_以后程序的运行思路   特别是declare  hash 这段