data kirby1 ; infile 'ch18a.dat' ; input code study nsmear biopsy interval ; proc print; proc contents data=kirby1 ;