options msglevel = i;

data ia.sale2000(index = (Origin 
				 FlightDate = (FlightID Date)/unique));
   infile 'sale2000.dat';
   input FlightID $7. RouteID $7. Origin $3. Dest $3. 
		 Cap1st 8. CapBusiness 8. CapEcon 8. 
		 CapTotal 8. CapCargo 8. Date date9. 
         Psgr1st 8. / PsgrBusiness 8. PsgrEcon 8. 
		 Rev1st dollar15.2 RevBusiness dollar15.2 
		 RevEcon dollar15.2 SaleMon $7. CargoWgt 8. 
		 / RevCargo dollar15.2;
run;