/* Lesson 7-3 */
 /*    File Name = les0703.sas   06/15/00   */

options linesize=72 pagesize=20;

data kodukai;
  infile 'kodukai00.prn';
  input jitaku $ kodukai;

proc print data=kodukai(obs=10);
run;
proc chart data=kodukai;
  hbar kodukai / midpoints=0 to 300000 by 10000;
run;
proc chart data=kodukai;
  vbar kodukai / midpoints=0 to 300000 by 10000 axis=0 2 4 6 8 10;
run;