I had to fix the code to get it to work, changing line 36 to:

/*Unemployment=.;*/ Unemployment=unemployment_percent/100.0;/*,percent7.1);*/ /* convert character percent to numeric */

Odd that the original program was publish and yet doesn't run... ?