options nodate pageno=1 linesize=80 pagesize=60;
x "cd D:\Docs";
ods listing close;
ods pdf file="table1.pdf" style=temp;
proc tabulate data=energy format=dollar12.;
class region division type / style=[foreground=blue just=left];
var expenditures;
table region*division,
type='Customer Base'*expenditures=' '*sum=' '
/ rts=25;
format region regfmt. division divfmt. type usetype.;
title 'Energy Expenditures for Each Region';
title2 '(millions of dollars)';
run;