data ia.route1_5;
   set ia.rawdata;
   infile in filevar = ReadIt end = LastFile;
   do while(LastFile = 0);
      input  @1 RouteID $7.
             @8 Origin $3.
            @11 Dest $3.
            @14 Distance 5.
            @19 Fare1st 4.
            @23 FareBusiness 4.
            @27 FareEcon 4.
            @31 FareCargo 5.;	  
      output;
   end;
run;