Generate the vertical bar chart of leading producers for each grain type. BY-group processing generates a separate graph for each value TYPE. Each new graph generates a new body file. NOZERO suppresses the midpoints that do not have any observations. The SHAPE= option assigns the bar shape. The INSIDE= option displays the SUM statistic inside the bars.

proc gchart data=type (where=(megtons gt 31));
format country $country.;
by type;
vbar3d year / discrete
sumvar=megtons
group=country
nozero
shape=cylinder
noframe
patternid=group
inside=sum
width=8
maxis=axis4
raxis=axis2
gaxis=axis5
name="type"
des="Leading Producers";
run;
quit;