*This program reads 1970 Census Summary File 1A Data File *Note: This program is distributed under the GNU GPL. See end of *this file and http://www.gnu.org/licenses/ for details. *by Jean Roth Mon Nov 1 14:34:21 EST 2004 *Please report errors to jroth@nber.org *Change output file name/location as desired. *Change the input file location as needed. *If you have trouble running this program, *then try opening a new syntax file & type this command: *INCLUDE "c:\sf1a70.sps". *and choose to RUN ALL file handle sf1a70 /name='c:\sf1a70' . data list file=sf1a70 / summary_type 1 state_1970 2-3 county_1970 4-6 state_1960 7-8 central_county 12 quasi_state 13-14 mcd_ccd 15-16 annex 18 place 19-22 ward 23-24 tract 25-28 tract_suffix 29-30 district_office 31-34 congressional 35-36 cbd 37 ed 38-41 ed_suffix 42-42 (a) ed_type 43 urban_potential 45-48 (a) sca 49-49 (a) smsa 50-53 urban 54 urban_actual 55-58 sea 59-60 (a) tracted_area 61-64 place_desc 65 city_w_rural 66-66 (a) eco_sub_region 67-69 county_tab_1970 70-72 ne_town_size 73-74 ne_town_code 75-78 univ_ac_level 79 univ_area_code 80-84 place_size 97-98 publication 99 area_code 100-102 block_group 103 dollar_symbol 120-120 (a) t1 121-128 t2 129-136 t3 137-144 t4 145-152 t5 153-160 t6 161-168 t7 169-176 t8 177-184 t9 185-192 t10 193-200 t11 201-208 t12 209-216 t13 217-224 t14_1 225-240 t14_2 241-256 t14_3 257-272 t15_1 273-288 t15_2 289-304 t15_3 305-320 t16_1 321-336 t16_2 337-352 t16_3 361-376 t17_1 377-392 t17_2 393-408 t17_3 409-424 t18_1 425-432 t18_2 433-440 t18_3 441-448 t18_4 449-456 t18_5 457-464 t18_6 465-472 t18_7 473-480 t18_8 481-488 t18_9 489-496 t18_10 497-504 t18_11 505-512 t18_12 513-520 t18_13 521-528 t18_14 529-536 t18_15 537-544 t18_16 545-552 t18_17 553-560 t18_18 561-568 t18_19 569-576 t18_20 577-584 t18_21 585-592 t18_22 593-600 t18_23 601-608 t18_24 609-616 t18_25 617-624 t18_26 625-632 t18_27 633-640 t18_28 641-648 t18_29 649-656 t18_30 657-664 t18_31 665-672 t18_32 673-680 t18_33 681-688 t18_34 689-696 t18_35 697-704 t18_36 705-712 t18_37 713-720 t18_38 721-728 t18_39 729-736 t18_40 737-744 t18_41 745-752 t18_42 753-760 t18_43 761-768 t18_44 769-776 t19_1 777-784 t19_2 785-792 t19_3 793-800 t19_4 801-808 t19_5 809-816 t19_6 817-824 t19_7 825-832 t19_8 833-840 t19_9 841-848 t19_10 849-856 t19_11 857-864 t19_12 865-872 t19_13 873-880 t19_14 881-888 t19_15 889-896 t19_16 897-904 t19_17 905-912 t19_18 913-920 t19_19 921-928 t19_20 929-936 t19_21 937-944 t19_22 945-952 t19_23 953-960 t19_24 961-968 t19_25 969-976 t19_26 977-984 t19_27 985-992 t19_28 993-1000 t19_29 1001-1008 t19_30 1009-1016 t19_31 1017-1024 t19_32 1025-1032 t20_1 1033-1040 t20_2 1041-1048 t20_3 1049-1056 t20_4 1057-1064 t20_5 1065-1072 t21_1 1073-1080 t21_2 1081-1088 t21_3 1089-1096 t21_4 1097-1104 t21_5 1105-1112 t21_6 1113-1120 t21_7 1121-1128 t21_8 1129-1136 t21_9 1137-1144 t21_10 1145-1152 t21_11 1153-1160 t21_12 1161-1168 t21_13 1169-1176 t21_14 1177-1184 t21_15 1185-1192 t21_16 1193-1200 t21_17 1201-1208 t21_18 1209-1216 t21_19 1217-1224 t21_20 1225-1232 t22_1 1233-1240 t22_2 1241-1248 t22_3 1249-1256 t22_4 1257-1264 t22_5 1265-1272 t22_6 1273-1280 t22_7 1281-1288 t22_8 1289-1296 t22_9 1297-1304 t22_10 1305-1312 t22_11 1313-1320 t22_12 1321-1328 t22_13 1329-1336 t22_14 1337-1344 t22_15 1345-1352 t22_16 1353-1360 t22_17 1361-1368 t22_18 1369-1376 t22_19 1377-1384 t22_20 1385-1392 t23_1 1393-1400 t23_2 1401-1408 t23_3 1409-1416 t23_4 1417-1424 t23_5 1425-1432 t23_6 1433-1440 t23_7 1441-1448 t23_8 1449-1456 t23_9 1457-1464 t23_10 1465-1472 t24_1 1473-1480 t24_2 1481-1488 t24_3 1489-1496 t24_4 1497-1504 t24_5 1505-1512 t24_6 1513-1520 t24_7 1521-1528 t24_8 1529-1536 t25_1 1537-1544 t25_2 1545-1552 t25_3 1553-1560 t25_4 1561-1568 t25_5 1569-1576 t25_6 1577-1584 t25_7 1585-1592 t25_8 1593-1600 t25_9 1601-1608 t25_10 1609-1616 t25_11 1617-1624 t25_12 1625-1632 t26a_1 1633-1640 t26a_2 1641-1648 t26a_3 1649-1656 t26a_4 1657-1664 t26a_5 1665-1672 t26a_6 1673-1680 t26a_7 1681-1688 t26a_8 1689-1696 t26a_9 1697-1704 t26b_10 1705-1712 t27_1 1713-1720 t27_2 1721-1728 t27_3 1729-1736 t28a_1 1737-1744 t28a_2 1745-1752 t28a_3 1753-1760 t28a_4 1761-1768 t28a_5 1769-1776 t28a_6 1777-1784 t28a_7 1785-1792 t28a_8 1793-1800 / t28b_9 1-8 t28b_10 9-16 t28b_11 17-24 t28b_12 25-32 t28b_13 33-40 t28b_14 41-48 t28b_15 49-56 t28b_16 57-64 t28b_17 65-72 t29a_1 73-80 t29a_2 81-88 t29a_3 89-96 t29a_4 97-104 t29a_5 105-112 t29a_6 113-120 t29a_7 121-128 t29a_8 129-136 t29b_9 137-144 t29b_10 145-152 t29b_11 153-160 t29b_12 161-168 t29b_13 169-176 t29b_14 177-184 t30_1 185-192 t30_2 193-200 t30_3 201-208 t30_4 209-216 t30_5 217-224 t30_6 225-232 t30_7 233-240 t30_8 241-248 t30_9 249-256 t30_10 257-264 t30_11 265-272 t30_12 273-280 t30_13 281-288 t30_14 289-296 t30_15 297-304 t30_16 305-312 t30_17 313-320 t30_18 321-328 t31_1 329-336 t31_2 337-344 t31_3 345-352 t32_1 353-360 t32_2 361-368 t33_1 369-376 t33_2 377-384 t33_3 385-392 t33_4 393-400 t34 401-408 t35a_1 409-416 t35a_2 417-424 t35a_3 425-432 t35a_4 433-440 t35a_5 441-448 t35a_6 449-456 t35a_7 457-464 t35a_8 465-472 t35b_9 473-480 t35b_10 481-488 t35b_11 489-496 t36a_1 497-504 t36a_2 505-512 t36a_3 513-520 t36a_4 521-528 t36a_5 529-536 t36a_6 537-544 t36a_7 545-552 t36a_8 553-560 t36a_9 561-568 t36a_10 569-576 t36b_11 577-584 t36b_12 585-592 t36b_13 593-600 t37 601-608 t38 609-616 t39 617-624 t40 625-632 t41_1 633-640 t41_2 641-648 t41_3 649-656 t41_4 657-664 t41_5 665-672 t41_6 673-680 t41_7 681-688 t41_8 689-696 t41_9 697-704 t41_10 705-712 t41_11 713-720 t41_12 721-728 t41_13 729-736 t41_14 737-744 t41_15 745-752 t41_16 753-760 t41_17 761-768 t41_18 769-776 t42_1 777-784 t42_2 785-792 t42_3 793-800 t42_4 801-808 t42_5 809-816 t42_6 817-824 t43a_1 825-832 t43a_2 833-840 t43a_3 841-848 t43a_4 849-856 t43a_5 857-864 t43a_6 865-872 t43a_7 873-880 t43a_8 881-888 t43b_9 889-896 t43b_10 897-904 t43b_11 905-912 t44a_1 913-920 t44a_2 921-928 t44a_3 929-936 t44a_4 937-944 t44a_5 945-952 t44a_6 953-960 t44a_7 961-968 t44a_8 969-976 t44a_9 977-984 t44a_10 985-992 t44b_11 993-1000 t44b_12 1001-1008 t44b_13 1009-1016 t45_1 1017-1024 t45_2 1025-1032 t45_3 1033-1040 t46_1 1041-1048 t46_2 1049-1056 t46_3 1057-1064 t46_4 1065-1072 t47_1 1073-1080 t47_2 1081-1088 t47_3 1089-1096 t47_4 1097-1104 t48_1 1105-1112 t48_2 1113-1120 t48_3 1121-1128 t49_1 1129-1136 t49_2 1137-1144 t49_3 1145-1152 t50_1 1153-1160 t50_2 1161-1168 t50_3 1169-1176 t50_4 1177-1184 t50_5 1185-1192 t50_6 1193-1200 t51_1 1201-1208 t51_2 1209-1216 t52_1 1217-1224 t52_2 1225-1232 t53_1 1233-1240 t53_2 1241-1248 t54_1 1249-1256 t54_2 1257-1264 t54_3 1265-1272 t54_4 1273-1280 t54_5 1281-1288 t54_6 1289-1296 t54_7 1297-1304 t54_8 1305-1312 t54_9 1313-1320 t54_10 1321-1328 t54_11 1329-1336 t54_12 1337-1344 t54_13 1345-1352 t54_14 1353-1360 t54_15 1361-1368 t54_16 1369-1376 t54_17 1377-1384 t54_18 1385-1392 t54_19 1393-1400 t54_20 1401-1408 t54_21 1409-1416 t54_22 1417-1424 t54_23 1425-1432 t54_24 1433-1440 t54_25 1441-1448 t54_26 1449-1456 t54_27 1457-1464 t54_28 1465-1472 t54_29 1473-1480 t54_30 1481-1488 t54_31 1489-1496 t54_32 1497-1504 t54_33 1505-1512 t54_34 1513-1520 t54_35 1521-1528 t54_36 1529-1536 t54_37 1537-1544 t54_38 1545-1552 t54_39 1553-1560 t54_40 1561-1568 t54_41 1569-1576 t54_42 1577-1584 t54_43 1585-1592 t54_44 1593-1600 t54_45 1601-1608 t54_46 1609-1616 t55_1 1617-1624 t55_2 1625-1632 t55_3 1633-1640 t55_4 1641-1648 t55_5 1649-1656 t55_6 1657-1664 t55_7 1665-1672 t55_8 1673-1680 t55_9 1681-1688 t55_10 1689-1696 . list. execute. save outfile = 'c:\sf1a70.sav'. *Copyright 2004 shared by the National Bureau of Economic Research and Jean Roth * *National Bureau of Economic Research. *1050 Massachusetts Avenue *Cambridge, MA 02138 *jroth@nber.org * *This program and all programs referenced in it are free software. You *can redistribute the program or modify it under the terms of the GNU *General Public License as published by the Free Software Foundation; *either version 2 of the License, or (at your option) any later version. * *This program is distributed in the hope that it will be useful, *but WITHOUT ANY WARRANTY; without even the implied warranty of *MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *GNU General Public License for more details. * *You should have received a copy of the GNU General Public License *along with this program; if not, write to the Free Software *Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 *USA.