options ls=90 ps=55;

filename foo URL "http://www.uvm.edu/~abh/stat295/datasets/usaboxoffice.dat";

data movies;
     infile foo;
	 input rank  title & $50.  premier_date : mmddyy10. usa_sales : comma12.  avg_ticket_price : comma5.2 ;
	 tickets_sold = usa_sales/avg_ticket_price;
	 label premier_date = "Premier date"
	       usa_sales = "Total ticket sales in USA"
		   avg_ticket_price = "Average ticket price";
run;

proc print noobs label;
format premier_date mmddyy10.  usa_sales dollar12.  avg_ticket_price dollar5.2  tickets_sold comma12.;
title "Top 20 Movies";
run;