filename datafile "csaucy3.dat" RECFM=F LRECL=13612;
   /*--------------------------------------------------------------*
    * create OUT=csauy3 data set with ASCII 2003 Industrial Data   *
    * compare it with the OUT=csauc data set created by DATA STEP  *
    *--------------------------------------------------------------*/
   
   proc datasource filetype=csaucy3 ascii
                   infile=datafile
                   interval=year
                   outselect=on
                   outkey=y3key
                   out=csauy3;
   
        keep data197-data199 label;
        range from 2002;
   run;
   
   proc sort
      data=csauy3 out=csauy3;
      by dnum cnum cic file zlist smbl xrel stk;
   run;
   
   title1 'Price, High, Low and Close for Range from 2002';
   proc contents data=csauy3;
   run;
   
   proc print data=csauy3;
   run;