* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
* SAS code for converting 1970 NCHS county code to 1970 FIPS county code  *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

cnty=(nchs*2) - 1;
if stfips eq 13 and (nchs ge 21 and nchs le 100) then cnty=(2*nchs)+1;
if stfips eq 13 and nchs ge 101 then cnty=(2*nchs)+3;
if stfips eq 24 and cnty eq 7 then cnty=510;
if stfips eq 29 and nchs eq 94 then cnty=187;
if stfips eq 29 and nchs eq 97 then cnty=186;
if stfips eq 29 and nchs eq 96 then cnty=510;
if stfips eq 32 and nchs eq 13 then cnty=510;
if stfips eq 35 and nchs ge 16 then cnty=(2*nchs) - 3;
if stfips eq 35 and nchs eq 15 then cnty=28;
if stfips eq 36 and (nchs ge 3 and nchs le 22) then cnty=(2*nchs) + 1;
if stfips eq 36 and (nchs ge 23 and nchs le 38) then cnty=(2*nchs) + 3;
if stfips eq 36 and nchs ge 40 then cnty=(2*nchs) + 7;
if stfips eq 36 and nchs eq 29 and city eq 24 then cnty=5;
if stfips eq 36 and nchs eq 29 and city eq 27 then cnty=47;
if stfips eq 36 and nchs eq 29 and city eq 155 then cnty=61;
if stfips eq 36 and nchs eq 29 and city eq 213 then cnty=81;
if stfips eq 36 and nchs eq 39 then cnty=83;
if stfips eq 36 and nchs eq 29 and city eq 219 then cnty=85;
if stfips eq 46 then cnty=(2*nchs) + 1;
if stfips eq 46 and nchs eq 66 then cnty=135;
if stfips eq 46 and nchs eq 67 then cnty=137;
if stfips eq 51 and (nchs ge 3 and nchs le 81) then cnty=((2/3)*nchs) - 1;
if stfips eq 51 and nchs eq 57 then cnty=36;
if stfips eq 51 and nchs eq 60 then cnty=37;
if stfips eq 51 and (nchs ge 84 and nchs le 279) then cnty=((2/3)*nchs) +
1;
if stfips eq 51 and nchs eq 225 then cnty=153;
if stfips eq 51 and (nchs ge 282 and nchs le 294)then cnty=((2/3)*nchs)+3;
if stfips eq 51 and (nchs ge 306 and nchs le 327)then cnty=((10/3)*nchs) - 
500;
if stfips eq 51 and (nchs ge 333 and nchs le 354)then cnty=((10/3)*nchs) - 
510;
if stfips eq 51 and (nchs ge 360 and nchs le 387)then cnty=((10/3)*nchs) - 
520;
if stfips eq 51 and nchs ge 393 then cnty=(10/3*nchs) - 530;
if stfips eq 51 and nchs eq 300 then cnty=510;
if stfips eq 51 and nchs eq 303 then cnty=515;
if stfips eq 51 and nchs eq 330 then cnty=595;
if stfips eq 51 and nchs eq 357 then cnty=678;
if stfips eq 51 and nchs eq 183 then cnty=123;
if stfips eq 51 and nchs eq 390 then cnty=775;
if stfips eq 55 and nchs ge 41 then cnty=(2*nchs) - 3;
if stfips eq 55 and nchs eq 40 then cnty=78;