非常感谢你的指点！！！
已经做出来了，再次感谢！！！
基本思路应该是，首先建立一个各个层级的变量组合后无重复的一个表，然后把各个层级的变量按需求用cat把变量和时间组合创建一个新的key，然后用sql自相连出来。

我把 原始 表中的33189619RC 改成33189619SL了
不然 木有 同比。


上code
data a;
input com : $20. cou : $20. cate $ year_month : $6. sum;
cards;
3301260251        阿尔巴尼亚        W        201310        535
3301260262        阿尔巴尼亚        E        201311        8132
33189619KK        阿尔巴尼亚        A        201404        5630.4
33189619MF        阿尔巴尼亚        G        201405        4150.6
33189619PN        阿尔巴尼亚        F        201404        11233.2
33189619R1        阿尔巴尼亚        C        201303        1216
33189619SL        阿尔巴尼亚        B        201309        6902
33189619S9        阿尔巴尼亚        A        201311        3960
33189619SL        阿尔巴尼亚        B        201409        921.6
33189619SL        阿尔巴尼亚        B        201410        2802.3
33189619SL        阿尔巴尼亚        A        201412        22263.5
33189619SQ        阿尔巴尼亚        G        201303        13950
33189619YR        阿尔巴尼亚        V        201409        4465.81
33189619Z6        阿尔巴尼亚        A        201412        1410
3318961A0C        阿尔巴尼亚        A        201412        9909.74
3318961A1J        阿尔巴尼亚        B        201406        4500
3318961A1J        阿尔巴尼亚        A        201407        11610
3318961A1J        阿尔巴尼亚        B        201412        1128.6
;
run;
data b;
set a;
year=substr(year_month,1,4);
month=substr(year_month,5,2);
run;
/*计算环比*/
proc sort data=b out=c;
by cate cou com year_month;
run;
data huanbi_final(drop = lag_yearmonth lag_sum temp year month);
set c;
by cate cou com;
retain lag_yearmonth 0 lag_sum 0;
temp=input(year_month,8.);
if first.com then do;
huanbi=0;
lag_yearmonth=0;
lag_sum=0;
end;
else if lag_yearmonth=temp-1 then
huanbi=(sum-lag_sum)/lag_sum;
output;
lag_yearmonth=temp;
lag_sum=sum;
run;
/*计算同比*/
proc sort data=b out=c_final;
by cate cou com month year;
run;
data tongbi_final(drop= lag_year lag_sum temp year month);
set c_final;
by cate cou com month;
retain lag_year 0 lag_sum 0;
temp=input(year,4.);
if first.month then do;
tongbi=0;
lag_year=0;
lag_sum=0;
end;
else if lag_year=temp-1 then
tongbi=(sum-lag_sum)/lag_sum;
output;
lag_year=temp;
lag_sum=sum;
run;
proc sort data=tongbi_final out=tongbi;
by cate cou com year_month sum;
run;
proc sort data=huanbi_final out=huanbi;
by cate cou com year_month sum;
run;
data union;
merge huanbi tongbi;
by cate cou com year_month sum;
run;