Subset the data for 1996 and generate the vertical bar chart for 1996.

proc gchart data=newgrain;
format country $country.;
where year=1996;
vbar3d country / sumvar=megtons
subgroup=type
autoref
html=countrydrill
html_legend=typedrill
legend=legend1
space=3
coutline=black
maxis=axis3
raxis=axis2
name="year96"
des="Production Breakdown for 1996";
run;
quit;