/* Lesson 3-5 */                                      
 /*    File Name = les0305err.sas   10/16/03   */         
options linesize=72 pagesize=20;
                                                       
data naikaku;                                          
  infile 'naikaku001.prn'
    firstobs=2;
  input name $ sex $ goukei;

proc print data=naikaku;
ran;
prok means data=naikaku;
run;