options ls=80 nodate pageno=1 NOFMTERR;  

  * Class12_11.sas   reading "bad" spreadsheet;

 * import 'bad-spreadsheet.xls' as "bad_xls";
 title3;
 proc print data=ph6470.bad_xls;

 proc contents data=ph6470.bad_xls;

run; quit;

 *  bad-spreadsheet.xls saved as  bad_spreadsheet_1.csv;

 data read_csv;
   infile "C:\Documents and Settings\Administrator\Desktop\bad_spreadsheet1.csv"
         DSD dlm="," firstobs=2 missover lrecl=300;
   input subject :$8. city :$17. gender $ BMI visit_date :mmddyy10. min0 min30 min120 PredDose Lymphs;
   if (subject NE ''); * delete blank lines;
   format  visit_date mmddyy10. ;

 proc print;
  title3 "CSV version 1";

 run; quit;

 data read_csv2;
   infile "C:\Documents and Settings\Administrator\Desktop\bad_spreadsheet2.csv"
         DSD dlm="," firstobs=2 missover lrecl=300;
   input subject :$8. city :$17. gender $ BMI visit_date :mmddyy10. min0 min30 min120 PredDose Lymphs;
   if (subject NE ''); * delete blank lines;
   format  visit_date mmddyy10. ;
   format subject $8.; 

 proc contents data=read_csv2;
 
 proc print;
  title3 "CSV version 2: NAs, X, * removed";

 run; quit;