请教大家，如何简化如下程序？

data tmp8;set tmp7;by province year;
retain m n o;
if not (first.province) then temperature_avgyear=coalesce(temperature_avgyear,m);
if not (first.province) then temperature_minyear=coalesce(temperature_minyear,n);
if not (first.province) then temperature_avgwinter=coalesce(temperature_avgwinter,o);
m=temperature_avgyear; n=temperature_minyear; o=temperature_avgwinter;
drop m n o;run;

我这里利用重复的程序，填补未来年度的数值，显得很啰嗦。请问如何用数组的方式，一次性处理三个变量呢？