data work.fltat1;
   infile 'fltat1.dat';
   input @1 EmpID $5. @7 HireDate date9. @17 Salary 5.;
   Bonus=Salary*.05;
run;