data finance.quarters(drop=i j);
	set finance.monthly;
       array m(4,3) month1-month12;
	array Qtr(4);
	   do i=1 to 4;
	     qtr(i=0);
	      do j=1 to 3;
	         qtr(i)+m(i,j);
	      end;
	   end;
    run;