/*********************************************/ /* geographic coding: 1990 5 percent pums */ /* */ /* jaeger, loeb, turner, and bound */ /* nber technical working paper, 9/98 */ /* */ /* see cmsafmt.sas for names of cmsa's */ if state eq 1 then do; if puma eq 700 then cmsa = 5160 ; else if puma eq 800 then cmsa = 5160 ; else if puma eq 1300 then cmsa = 5240 ; else if puma eq 1500 then cmsa = 5240 ; else if puma eq 1700 then cmsa = 1000 ; else if puma eq 1801 then cmsa = 1000 ; else if puma eq 1802 then cmsa = 1000 ; else if puma eq 1803 then cmsa = 1000 ; else if puma eq 1804 then cmsa = 1000 ; else if puma eq 1805 then cmsa = 1000 ; else if puma eq 1806 then cmsa = 1000 ; else cmsa = 9999 ; end; else if state eq 4 then do; if puma eq 101 then cmsa = 6200 ; else if puma eq 102 then cmsa = 6200 ; else if puma eq 103 then cmsa = 6200 ; else if puma eq 104 then cmsa = 6200 ; else if puma eq 105 then cmsa = 6200 ; else if puma eq 106 then cmsa = 6200 ; else if puma eq 107 then cmsa = 6200 ; else if puma eq 108 then cmsa = 6200 ; else if puma eq 109 then cmsa = 6200 ; else if puma eq 110 then cmsa = 6200 ; else if puma eq 111 then cmsa = 6200 ; else if puma eq 112 then cmsa = 6200 ; else if puma eq 113 then cmsa = 6200 ; else if puma eq 114 then cmsa = 6200 ; else if puma eq 115 then cmsa = 6200 ; else if puma eq 116 then cmsa = 6200 ; else if puma eq 201 then cmsa = 8520 ; else if puma eq 202 then cmsa = 8520 ; else if puma eq 203 then cmsa = 8520 ; else if puma eq 204 then cmsa = 8520 ; else if puma eq 205 then cmsa = 8520 ; else cmsa = 9999 ; end; else if state eq 5 then do; if puma eq 600 then cmsa = 4920 ; else if puma eq 1500 then cmsa = 4400 ; else if puma eq 1600 then cmsa = 4400 ; else cmsa = 9999 ; end; else if state eq 6 then do; if puma eq 700 then cmsa = 6920 ; else if puma eq 900 then cmsa = 7362 ; else if puma eq 1000 then cmsa = 6920 ; else if puma eq 1100 then cmsa = 6920 ; else if puma eq 1200 then cmsa = 6920 ; else if puma eq 1300 then cmsa = 7362 ; else if puma eq 1401 then cmsa = 7362 ; else if puma eq 1402 then cmsa = 7362 ; else if puma eq 1501 then cmsa = 7362 ; else if puma eq 1502 then cmsa = 7362 ; else if puma eq 1601 then cmsa = 7362 ; else if puma eq 1602 then cmsa = 7362 ; else if puma eq 1603 then cmsa = 7362 ; else if puma eq 1700 then cmsa = 7362 ; else if puma eq 1801 then cmsa = 7362 ; else if puma eq 1802 then cmsa = 7362 ; else if puma eq 1803 then cmsa = 7362 ; else if puma eq 1804 then cmsa = 7362 ; else if puma eq 1805 then cmsa = 7362 ; else if puma eq 1901 then cmsa = 7362 ; else if puma eq 1902 then cmsa = 7362 ; else if puma eq 1903 then cmsa = 7362 ; else if puma eq 1904 then cmsa = 7362 ; else if puma eq 1905 then cmsa = 7362 ; else if puma eq 1906 then cmsa = 7362 ; else if puma eq 2000 then cmsa = 7362 ; else if puma eq 2101 then cmsa = 7362 ; else if puma eq 2102 then cmsa = 7362 ; else if puma eq 2103 then cmsa = 7362 ; else if puma eq 2104 then cmsa = 7362 ; else if puma eq 2105 then cmsa = 7362 ; else if puma eq 2106 then cmsa = 7362 ; else if puma eq 2107 then cmsa = 7362 ; else if puma eq 2108 then cmsa = 7362 ; else if puma eq 2109 then cmsa = 7362 ; else if puma eq 2201 then cmsa = 7362 ; else if puma eq 2202 then cmsa = 7362 ; else if puma eq 2203 then cmsa = 7362 ; else if puma eq 2204 then cmsa = 7362 ; else if puma eq 2205 then cmsa = 7362 ; else if puma eq 2206 then cmsa = 7362 ; else if puma eq 2301 then cmsa = 8120 ; else if puma eq 2302 then cmsa = 8120 ; else if puma eq 2303 then cmsa = 8120 ; else if puma eq 2304 then cmsa = 8120 ; else if puma eq 2400 then cmsa = 5170 ; else if puma eq 2500 then cmsa = 5170 ; else if puma eq 2801 then cmsa = 6920 ; else if puma eq 2802 then cmsa = 6920 ; else if puma eq 2803 then cmsa = 6920 ; else if puma eq 2901 then cmsa = 6920 ; else if puma eq 2902 then cmsa = 6920 ; else if puma eq 2903 then cmsa = 6920 ; else if puma eq 2904 then cmsa = 6920 ; else if puma eq 2905 then cmsa = 6920 ; else if puma eq 2906 then cmsa = 6920 ; else if puma eq 3201 then cmsa = 7480 ; else if puma eq 3202 then cmsa = 7480 ; else if puma eq 3301 then cmsa = 7320 ; else if puma eq 3302 then cmsa = 7320 ; else if puma eq 3303 then cmsa = 7320 ; else if puma eq 3304 then cmsa = 7320 ; else if puma eq 3305 then cmsa = 7320 ; else if puma eq 3306 then cmsa = 7320 ; else if puma eq 3307 then cmsa = 7320 ; else if puma eq 3308 then cmsa = 7320 ; else if puma eq 3309 then cmsa = 7320 ; else if puma eq 3310 then cmsa = 7320 ; else if puma eq 3311 then cmsa = 7320 ; else if puma eq 3312 then cmsa = 7320 ; else if puma eq 3313 then cmsa = 7320 ; else if puma eq 3401 then cmsa = 7362 ; else if puma eq 3402 then cmsa = 7362 ; else if puma eq 3403 then cmsa = 7362 ; else if puma eq 3404 then cmsa = 7362 ; else if puma eq 3405 then cmsa = 7362 ; else if puma eq 3406 then cmsa = 7362 ; else if puma eq 3407 then cmsa = 7362 ; else if puma eq 3408 then cmsa = 7362 ; else if puma eq 3409 then cmsa = 7362 ; else if puma eq 3410 then cmsa = 7362 ; else if puma eq 3411 then cmsa = 7362 ; else if puma eq 3500 then cmsa = 8780 ; else if puma eq 3600 then cmsa = 7362 ; else if puma eq 3700 then cmsa = 4472 ; else if puma eq 3800 then cmsa = 7120 ; else if puma eq 3901 then cmsa = 7120 ; else if puma eq 3902 then cmsa = 7120 ; else if puma eq 4000 then cmsa = 2840 ; else if puma eq 4100 then cmsa = 2840 ; else if puma eq 4200 then cmsa = 4472 ; else if puma eq 4300 then cmsa = 4472 ; else if puma eq 4400 then cmsa = 4472 ; else if puma eq 4500 then cmsa = 4472 ; else if puma eq 4600 then cmsa = 4472 ; else if puma eq 4700 then cmsa = 4472 ; else if puma eq 4801 then cmsa = 4472 ; else if puma eq 4802 then cmsa = 4472 ; else if puma eq 4803 then cmsa = 4472 ; else if puma eq 4804 then cmsa = 4472 ; else if puma eq 4805 then cmsa = 4472 ; else if puma eq 4806 then cmsa = 4472 ; else if puma eq 4807 then cmsa = 4472 ; else if puma eq 4808 then cmsa = 4472 ; else if puma eq 4900 then cmsa = 680 ; else if puma eq 5001 then cmsa = 680 ; else if puma eq 5002 then cmsa = 680 ; else if puma eq 5200 then cmsa = 4472 ; else if puma eq 5300 then cmsa = 4472 ; else if puma eq 5400 then cmsa = 4472 ; else if puma eq 5500 then cmsa = 4472 ; else if puma eq 5600 then cmsa = 4472 ; else if puma eq 5700 then cmsa = 4472 ; else if puma eq 5800 then cmsa = 4472 ; else if puma eq 5900 then cmsa = 4472 ; else if puma eq 6000 then cmsa = 4472 ; else if puma eq 6100 then cmsa = 4472 ; else if puma eq 6200 then cmsa = 4472 ; else if puma eq 6300 then cmsa = 4472 ; else if puma eq 6401 then cmsa = 4472 ; else if puma eq 6402 then cmsa = 4472 ; else if puma eq 6403 then cmsa = 4472 ; else if puma eq 6404 then cmsa = 4472 ; else if puma eq 6405 then cmsa = 4472 ; else if puma eq 6406 then cmsa = 4472 ; else if puma eq 6407 then cmsa = 4472 ; else if puma eq 6408 then cmsa = 4472 ; else if puma eq 6409 then cmsa = 4472 ; else if puma eq 6410 then cmsa = 4472 ; else if puma eq 6411 then cmsa = 4472 ; else if puma eq 6412 then cmsa = 4472 ; else if puma eq 6413 then cmsa = 4472 ; else if puma eq 6414 then cmsa = 4472 ; else if puma eq 6415 then cmsa = 4472 ; else if puma eq 6416 then cmsa = 4472 ; else if puma eq 6417 then cmsa = 4472 ; else if puma eq 6418 then cmsa = 4472 ; else if puma eq 6419 then cmsa = 4472 ; else if puma eq 6420 then cmsa = 4472 ; else if puma eq 6421 then cmsa = 4472 ; else if puma eq 6422 then cmsa = 4472 ; else if puma eq 6423 then cmsa = 4472 ; else if puma eq 6424 then cmsa = 4472 ; else if puma eq 6501 then cmsa = 4472 ; else if puma eq 6502 then cmsa = 4472 ; else if puma eq 6503 then cmsa = 4472 ; else if puma eq 6504 then cmsa = 4472 ; else if puma eq 6505 then cmsa = 4472 ; else if puma eq 6506 then cmsa = 4472 ; else if puma eq 6507 then cmsa = 4472 ; else if puma eq 6508 then cmsa = 4472 ; else if puma eq 6509 then cmsa = 4472 ; else if puma eq 6510 then cmsa = 4472 ; else if puma eq 6511 then cmsa = 4472 ; else if puma eq 6512 then cmsa = 4472 ; else if puma eq 6513 then cmsa = 4472 ; else if puma eq 6514 then cmsa = 4472 ; else if puma eq 6515 then cmsa = 4472 ; else if puma eq 6516 then cmsa = 4472 ; else if puma eq 6517 then cmsa = 4472 ; else if puma eq 6518 then cmsa = 4472 ; else if puma eq 6519 then cmsa = 4472 ; else if puma eq 6520 then cmsa = 4472 ; else if puma eq 6521 then cmsa = 4472 ; else if puma eq 6600 then cmsa = 4472 ; else if puma eq 6701 then cmsa = 4472 ; else if puma eq 6702 then cmsa = 4472 ; else if puma eq 6703 then cmsa = 4472 ; else if puma eq 6704 then cmsa = 4472 ; else if puma eq 6705 then cmsa = 4472 ; else if puma eq 6800 then cmsa = 4472 ; else if puma eq 6901 then cmsa = 4472 ; else if puma eq 6902 then cmsa = 4472 ; else if puma eq 6903 then cmsa = 4472 ; else if puma eq 6904 then cmsa = 4472 ; else if puma eq 6905 then cmsa = 4472 ; else if puma eq 7000 then cmsa = 4472 ; else if puma eq 7100 then cmsa = 4472 ; else if puma eq 7201 then cmsa = 4472 ; else if puma eq 7202 then cmsa = 4472 ; else if puma eq 7203 then cmsa = 4472 ; else if puma eq 7204 then cmsa = 4472 ; else if puma eq 7205 then cmsa = 4472 ; else if puma eq 7206 then cmsa = 4472 ; else if puma eq 7207 then cmsa = 4472 ; else cmsa = 9999 ; end; else if state eq 8 then do; if puma eq 101 then cmsa = 2082 ; else if puma eq 102 then cmsa = 2082 ; else if puma eq 103 then cmsa = 2082 ; else if puma eq 104 then cmsa = 2082 ; else if puma eq 201 then cmsa = 2082 ; else if puma eq 202 then cmsa = 2082 ; else if puma eq 301 then cmsa = 2082 ; else if puma eq 302 then cmsa = 2082 ; else if puma eq 400 then cmsa = 2082 ; else if puma eq 500 then cmsa = 2082 ; else if puma eq 601 then cmsa = 2082 ; else if puma eq 602 then cmsa = 2082 ; else if puma eq 701 then cmsa = 2082 ; else if puma eq 702 then cmsa = 2082 ; else if puma eq 1000 then cmsa = 1720 ; else if puma eq 1100 then cmsa = 1720 ; else cmsa = 9999 ; end; else if state eq 9 then do; if puma eq 200 then cmsa = 3283 ; else if puma eq 300 then cmsa = 3283 ; else if puma eq 400 then cmsa = 3283 ; else if puma eq 500 then cmsa = 3283 ; else if puma eq 600 then cmsa = 3283 ; else if puma eq 700 then cmsa = 3283 ; else if puma eq 800 then cmsa = 3283 ; else if puma eq 900 then cmsa = 3283 ; else if puma eq 1000 then cmsa = 3283 ; else if puma eq 1100 then cmsa = 5602 ; else if puma eq 1200 then cmsa = 5602 ; else if puma eq 1300 then cmsa = 5602 ; else if puma eq 1400 then cmsa = 5602 ; else if puma eq 1500 then cmsa = 5602 ; else if puma eq 1600 then cmsa = 5602 ; else if puma eq 1700 then cmsa = 5602 ; else if puma eq 2000 then cmsa = 5480 ; else if puma eq 2100 then cmsa = 5480 ; else if puma eq 2200 then cmsa = 5480 ; else if puma eq 2300 then cmsa = 5602 ; else if puma eq 2400 then cmsa = 5480 ; else if puma eq 2500 then cmsa = 3283 ; else if puma eq 2600 then cmsa = 5520 ; else if puma eq 2700 then cmsa = 5520 ; else cmsa = 9999 ; end; else if state eq 10 then do; if puma eq 301 then cmsa = 6162 ; else if puma eq 302 then cmsa = 6162 ; else if puma eq 303 then cmsa = 6162 ; else if puma eq 304 then cmsa = 6162 ; else cmsa = 9999 ; end; else if state eq 11 then do; if puma eq 101 then cmsa = 8840 ; else if puma eq 102 then cmsa = 8840 ; else if puma eq 103 then cmsa = 8840 ; else if puma eq 104 then cmsa = 8840 ; else if puma eq 105 then cmsa = 8840 ; else cmsa = 9999 ; end; else if state eq 12 then do; if puma eq 100 then cmsa = 6080 ; else if puma eq 200 then cmsa = 3600 ; else if puma eq 900 then cmsa = 2020 ; else if puma eq 1000 then cmsa = 3600 ; else if puma eq 1100 then cmsa = 3600 ; else if puma eq 1200 then cmsa = 4900 ; else if puma eq 1300 then cmsa = 4900 ; else if puma eq 1400 then cmsa = 4900 ; else if puma eq 1600 then cmsa = 5960 ; else if puma eq 1700 then cmsa = 5960 ; else if puma eq 1800 then cmsa = 5960 ; else if puma eq 1900 then cmsa = 5960 ; else if puma eq 2000 then cmsa = 5960 ; else if puma eq 2100 then cmsa = 5960 ; else if puma eq 2200 then cmsa = 5960 ; else if puma eq 2300 then cmsa = 5960 ; else if puma eq 2700 then cmsa = 2710 ; else if puma eq 2800 then cmsa = 2710 ; else if puma eq 2901 then cmsa = 8960 ; else if puma eq 2902 then cmsa = 8960 ; else if puma eq 2903 then cmsa = 8960 ; else if puma eq 2904 then cmsa = 8960 ; else if puma eq 2905 then cmsa = 8960 ; else if puma eq 2906 then cmsa = 8960 ; else if puma eq 3001 then cmsa = 2700 ; else if puma eq 3002 then cmsa = 2700 ; else if puma eq 3003 then cmsa = 2700 ; else if puma eq 3101 then cmsa = 7510 ; else if puma eq 3102 then cmsa = 7510 ; else if puma eq 3200 then cmsa = 4992 ; else if puma eq 3300 then cmsa = 4992 ; else if puma eq 3400 then cmsa = 4992 ; else if puma eq 3501 then cmsa = 4992 ; else if puma eq 3502 then cmsa = 4992 ; else if puma eq 3503 then cmsa = 4992 ; else if puma eq 3504 then cmsa = 4992 ; else if puma eq 3505 then cmsa = 4992 ; else if puma eq 3506 then cmsa = 4992 ; else if puma eq 3601 then cmsa = 4992 ; else if puma eq 3602 then cmsa = 4992 ; else if puma eq 3700 then cmsa = 4992 ; else if puma eq 3800 then cmsa = 4992 ; else if puma eq 3901 then cmsa = 4992 ; else if puma eq 3902 then cmsa = 4992 ; else if puma eq 3903 then cmsa = 4992 ; else if puma eq 3904 then cmsa = 4992 ; else if puma eq 3905 then cmsa = 4992 ; else if puma eq 3906 then cmsa = 4992 ; else if puma eq 3907 then cmsa = 4992 ; else if puma eq 3908 then cmsa = 4992 ; else if puma eq 3909 then cmsa = 4992 ; else if puma eq 4000 then cmsa = 8280 ; else if puma eq 4200 then cmsa = 8280 ; else if puma eq 4300 then cmsa = 8280 ; else if puma eq 4400 then cmsa = 8280 ; else if puma eq 4500 then cmsa = 8280 ; else if puma eq 4600 then cmsa = 3980 ; else cmsa = 9999 ; end; else if state eq 13 then do; if puma eq 300 then cmsa = 1560 ; else if puma eq 400 then cmsa = 4680 ; else if puma eq 500 then cmsa = 600 ; else if puma eq 800 then cmsa = 520 ; else if puma eq 1500 then cmsa = 520 ; else if puma eq 1600 then cmsa = 520 ; else if puma eq 1700 then cmsa = 520 ; else if puma eq 1801 then cmsa = 520 ; else if puma eq 1802 then cmsa = 520 ; else if puma eq 1803 then cmsa = 520 ; else if puma eq 1901 then cmsa = 520 ; else if puma eq 1902 then cmsa = 520 ; else if puma eq 1903 then cmsa = 520 ; else if puma eq 1904 then cmsa = 520 ; else if puma eq 2001 then cmsa = 520 ; else if puma eq 2002 then cmsa = 520 ; else if puma eq 2003 then cmsa = 520 ; else if puma eq 2004 then cmsa = 520 ; else if puma eq 2005 then cmsa = 520 ; else if puma eq 2101 then cmsa = 520 ; else if puma eq 2102 then cmsa = 520 ; else if puma eq 2103 then cmsa = 520 ; else if puma eq 2200 then cmsa = 600 ; else if puma eq 2300 then cmsa = 520 ; else if puma eq 3000 then cmsa = 520 ; else if puma eq 3100 then cmsa = 4680 ; else cmsa = 9999 ; end; else if state eq 15 then do; if puma eq 301 then cmsa = 3320 ; else if puma eq 302 then cmsa = 3320 ; else if puma eq 303 then cmsa = 3320 ; else if puma eq 304 then cmsa = 3320 ; else if puma eq 305 then cmsa = 3320 ; else if puma eq 306 then cmsa = 3320 ; else if puma eq 307 then cmsa = 3320 ; else cmsa = 9999 ; end; else if state eq 17 then do; if puma eq 300 then cmsa = 6880 ; else if puma eq 400 then cmsa = 6880 ; else if puma eq 600 then cmsa = 1960 ; else if puma eq 700 then cmsa = 6120 ; else if puma eq 800 then cmsa = 6120 ; else if puma eq 900 then cmsa = 6120 ; else if puma eq 1000 then cmsa = 1960 ; else if puma eq 1700 then cmsa = 7040 ; else if puma eq 1800 then cmsa = 7040 ; else if puma eq 1900 then cmsa = 7040 ; else if puma eq 2000 then cmsa = 7040 ; else if puma eq 2100 then cmsa = 7040 ; else if puma eq 3001 then cmsa = 1602 ; else if puma eq 3002 then cmsa = 1602 ; else if puma eq 3003 then cmsa = 1602 ; else if puma eq 3004 then cmsa = 1602 ; else if puma eq 3005 then cmsa = 1602 ; else if puma eq 3006 then cmsa = 1602 ; else if puma eq 3007 then cmsa = 1602 ; else if puma eq 3008 then cmsa = 1602 ; else if puma eq 3009 then cmsa = 1602 ; else if puma eq 3010 then cmsa = 1602 ; else if puma eq 3011 then cmsa = 1602 ; else if puma eq 3012 then cmsa = 1602 ; else if puma eq 3013 then cmsa = 1602 ; else if puma eq 3014 then cmsa = 1602 ; else if puma eq 3015 then cmsa = 1602 ; else if puma eq 3016 then cmsa = 1602 ; else if puma eq 3017 then cmsa = 1602 ; else if puma eq 3018 then cmsa = 1602 ; else if puma eq 3019 then cmsa = 1602 ; else if puma eq 3101 then cmsa = 1602 ; else if puma eq 3102 then cmsa = 1602 ; else if puma eq 3103 then cmsa = 1602 ; else if puma eq 3104 then cmsa = 1602 ; else if puma eq 3105 then cmsa = 1602 ; else if puma eq 3106 then cmsa = 1602 ; else if puma eq 3107 then cmsa = 1602 ; else if puma eq 3108 then cmsa = 1602 ; else if puma eq 3109 then cmsa = 1602 ; else if puma eq 3110 then cmsa = 1602 ; else if puma eq 3111 then cmsa = 1602 ; else if puma eq 3112 then cmsa = 1602 ; else if puma eq 3113 then cmsa = 1602 ; else if puma eq 3114 then cmsa = 1602 ; else if puma eq 3201 then cmsa = 1602 ; else if puma eq 3202 then cmsa = 1602 ; else if puma eq 3203 then cmsa = 1602 ; else if puma eq 3204 then cmsa = 1602 ; else if puma eq 3205 then cmsa = 1602 ; else if puma eq 3206 then cmsa = 1602 ; else if puma eq 3300 then cmsa = 1602 ; else if puma eq 3401 then cmsa = 1602 ; else if puma eq 3402 then cmsa = 1602 ; else if puma eq 3403 then cmsa = 1602 ; else if puma eq 3404 then cmsa = 1602 ; else if puma eq 3501 then cmsa = 1602 ; else if puma eq 3502 then cmsa = 1602 ; else if puma eq 3700 then cmsa = 1602 ; else if puma eq 3800 then cmsa = 1602 ; else if puma eq 3900 then cmsa = 1602 ; else cmsa = 9999 ; end; else if state eq 18 then do; if puma eq 101 then cmsa = 3480 ; else if puma eq 102 then cmsa = 3480 ; else if puma eq 103 then cmsa = 3480 ; else if puma eq 104 then cmsa = 3480 ; else if puma eq 105 then cmsa = 3480 ; else if puma eq 106 then cmsa = 3480 ; else if puma eq 107 then cmsa = 3480 ; else if puma eq 200 then cmsa = 4520 ; else if puma eq 300 then cmsa = 4520 ; else if puma eq 400 then cmsa = 1642 ; else if puma eq 500 then cmsa = 2440 ; else if puma eq 800 then cmsa = 1602 ; else if puma eq 900 then cmsa = 1602 ; else if puma eq 1000 then cmsa = 1602 ; else if puma eq 1200 then cmsa = 1602 ; else if puma eq 1700 then cmsa = 2760 ; else if puma eq 1800 then cmsa = 2760 ; else if puma eq 2400 then cmsa = 2440 ; else if puma eq 2600 then cmsa = 2760 ; else if puma eq 2700 then cmsa = 2760 ; else if puma eq 3300 then cmsa = 3480 ; else if puma eq 3400 then cmsa = 3480 ; else if puma eq 3500 then cmsa = 3480 ; else cmsa = 9999 ; end; else if state eq 19 then do; if puma eq 700 then cmsa = 2120 ; else if puma eq 800 then cmsa = 2120 ; else if puma eq 900 then cmsa = 2120 ; else if puma eq 1000 then cmsa = 2120 ; else if puma eq 1400 then cmsa = 1960 ; else if puma eq 1700 then cmsa = 5920 ; else cmsa = 9999 ; end; else if state eq 20 then do; if puma eq 400 then cmsa = 9040 ; else if puma eq 500 then cmsa = 9040 ; else if puma eq 600 then cmsa = 9040 ; else if puma eq 901 then cmsa = 3760 ; else if puma eq 902 then cmsa = 3760 ; else if puma eq 903 then cmsa = 3760 ; else if puma eq 1000 then cmsa = 3760 ; else if puma eq 1100 then cmsa = 3760 ; else cmsa = 9999 ; end; else if state eq 21 then do; if puma eq 1100 then cmsa = 3400 ; else if puma eq 1300 then cmsa = 1642 ; else if puma eq 1400 then cmsa = 1642 ; else if puma eq 1600 then cmsa = 4280 ; else if puma eq 1700 then cmsa = 4280 ; else if puma eq 1801 then cmsa = 4280 ; else if puma eq 1802 then cmsa = 4280 ; else if puma eq 1900 then cmsa = 4520 ; else if puma eq 2001 then cmsa = 4520 ; else if puma eq 2002 then cmsa = 4520 ; else if puma eq 2101 then cmsa = 4520 ; else if puma eq 2102 then cmsa = 4520 ; else if puma eq 2103 then cmsa = 4520 ; else cmsa = 9999 ; end; else if state eq 22 then do; if puma eq 100 then cmsa = 7680 ; else if puma eq 1200 then cmsa = 760 ; else if puma eq 1301 then cmsa = 760 ; else if puma eq 1302 then cmsa = 760 ; else if puma eq 1400 then cmsa = 760 ; else if puma eq 1500 then cmsa = 760 ; else if puma eq 1700 then cmsa = 5560 ; else if puma eq 1901 then cmsa = 5560 ; else if puma eq 1902 then cmsa = 5560 ; else if puma eq 1903 then cmsa = 5560 ; else if puma eq 1904 then cmsa = 5560 ; else if puma eq 2000 then cmsa = 5560 ; else if puma eq 2100 then cmsa = 5560 ; else if puma eq 2200 then cmsa = 5560 ; else if puma eq 2300 then cmsa = 5560 ; else cmsa = 9999 ; end; else if state eq 24 then do; if puma eq 201 then cmsa = 720 ; else if puma eq 202 then cmsa = 720 ; else if puma eq 203 then cmsa = 720 ; else if puma eq 204 then cmsa = 720 ; else if puma eq 301 then cmsa = 720 ; else if puma eq 302 then cmsa = 720 ; else if puma eq 303 then cmsa = 720 ; else if puma eq 304 then cmsa = 720 ; else if puma eq 305 then cmsa = 720 ; else if puma eq 306 then cmsa = 720 ; else if puma eq 400 then cmsa = 8840 ; else if puma eq 500 then cmsa = 720 ; else if puma eq 600 then cmsa = 720 ; else if puma eq 700 then cmsa = 8840 ; else if puma eq 900 then cmsa = 8840 ; else if puma eq 1000 then cmsa = 720 ; else if puma eq 1100 then cmsa = 720 ; else if puma eq 1201 then cmsa = 8840 ; else if puma eq 1202 then cmsa = 8840 ; else if puma eq 1203 then cmsa = 8840 ; else if puma eq 1204 then cmsa = 8840 ; else if puma eq 1205 then cmsa = 8840 ; else if puma eq 1206 then cmsa = 8840 ; else if puma eq 1301 then cmsa = 8840 ; else if puma eq 1302 then cmsa = 8840 ; else if puma eq 1303 then cmsa = 8840 ; else if puma eq 1304 then cmsa = 8840 ; else if puma eq 1305 then cmsa = 8840 ; else if puma eq 1306 then cmsa = 8840 ; else if puma eq 1307 then cmsa = 8840 ; else if puma eq 1501 then cmsa = 720 ; else if puma eq 1502 then cmsa = 720 ; else if puma eq 1503 then cmsa = 720 ; else if puma eq 1504 then cmsa = 720 ; else cmsa = 9999 ; end; else if state eq 25 then do; if puma eq 200 then cmsa = 8000 ; else if puma eq 300 then cmsa = 8000 ; else if puma eq 400 then cmsa = 8000 ; else if puma eq 500 then cmsa = 8000 ; else if puma eq 600 then cmsa = 8000 ; else if puma eq 700 then cmsa = 8000 ; else if puma eq 800 then cmsa = 9240 ; else if puma eq 900 then cmsa = 9240 ; else if puma eq 1000 then cmsa = 9240 ; else if puma eq 1100 then cmsa = 9240 ; else if puma eq 1400 then cmsa = 1123 ; else if puma eq 1500 then cmsa = 1123 ; else if puma eq 1600 then cmsa = 1123 ; else if puma eq 1700 then cmsa = 1123 ; else if puma eq 1800 then cmsa = 1123 ; else if puma eq 1900 then cmsa = 1123 ; else if puma eq 2001 then cmsa = 1123 ; else if puma eq 2002 then cmsa = 1123 ; else if puma eq 2003 then cmsa = 1123 ; else if puma eq 2004 then cmsa = 1123 ; else if puma eq 2005 then cmsa = 1123 ; else if puma eq 2100 then cmsa = 1123 ; else if puma eq 2200 then cmsa = 1123 ; else if puma eq 2300 then cmsa = 1123 ; else if puma eq 2400 then cmsa = 1123 ; else if puma eq 2500 then cmsa = 1123 ; else if puma eq 2600 then cmsa = 1123 ; else if puma eq 2700 then cmsa = 1123 ; else if puma eq 2800 then cmsa = 1123 ; else if puma eq 2900 then cmsa = 1123 ; else if puma eq 3000 then cmsa = 1123 ; else if puma eq 3100 then cmsa = 1123 ; else if puma eq 3200 then cmsa = 1123 ; else if puma eq 3300 then cmsa = 1123 ; else if puma eq 3400 then cmsa = 1123 ; else if puma eq 3500 then cmsa = 1123 ; else if puma eq 3600 then cmsa = 1123 ; else if puma eq 3700 then cmsa = 1123 ; else if puma eq 3800 then cmsa = 1123 ; else if puma eq 4000 then cmsa = 6483 ; else if puma eq 4200 then cmsa = 6483 ; else cmsa = 9999 ; end; else if state eq 26 then do; if puma eq 800 then cmsa = 6960 ; else if puma eq 900 then cmsa = 6960 ; else if puma eq 1100 then cmsa = 6960 ; else if puma eq 1300 then cmsa = 3000 ; else if puma eq 1401 then cmsa = 3000 ; else if puma eq 1402 then cmsa = 3000 ; else if puma eq 1500 then cmsa = 3000 ; else if puma eq 1700 then cmsa = 4040 ; else if puma eq 1800 then cmsa = 4040 ; else if puma eq 1900 then cmsa = 4040 ; else if puma eq 2000 then cmsa = 2640 ; else if puma eq 2101 then cmsa = 2640 ; else if puma eq 2102 then cmsa = 2640 ; else if puma eq 2200 then cmsa = 2162 ; else if puma eq 3000 then cmsa = 2162 ; else if puma eq 3100 then cmsa = 2162 ; else if puma eq 3200 then cmsa = 2162 ; else if puma eq 3301 then cmsa = 2162 ; else if puma eq 3302 then cmsa = 2162 ; else if puma eq 3303 then cmsa = 2162 ; else if puma eq 3304 then cmsa = 2162 ; else if puma eq 3305 then cmsa = 2162 ; else if puma eq 3306 then cmsa = 2162 ; else if puma eq 3307 then cmsa = 2162 ; else if puma eq 3308 then cmsa = 2162 ; else if puma eq 3401 then cmsa = 2162 ; else if puma eq 3402 then cmsa = 2162 ; else if puma eq 3403 then cmsa = 2162 ; else if puma eq 3404 then cmsa = 2162 ; else if puma eq 3405 then cmsa = 2162 ; else if puma eq 3500 then cmsa = 2162 ; else if puma eq 3600 then cmsa = 2162 ; else if puma eq 3700 then cmsa = 2162 ; else if puma eq 3800 then cmsa = 2162 ; else if puma eq 3901 then cmsa = 2162 ; else if puma eq 3902 then cmsa = 2162 ; else if puma eq 3903 then cmsa = 2162 ; else if puma eq 4000 then cmsa = 2162 ; else if puma eq 4101 then cmsa = 2162 ; else if puma eq 4102 then cmsa = 2162 ; else if puma eq 4103 then cmsa = 2162 ; else if puma eq 4104 then cmsa = 2162 ; else if puma eq 4105 then cmsa = 2162 ; else if puma eq 4106 then cmsa = 2162 ; else if puma eq 4107 then cmsa = 2162 ; else if puma eq 4200 then cmsa = 2162 ; else if puma eq 4300 then cmsa = 2162 ; else if puma eq 4400 then cmsa = 2162 ; else cmsa = 9999 ; end; else if state eq 27 then do; if puma eq 900 then cmsa = 5122 ; else if puma eq 1100 then cmsa = 5122 ; else if puma eq 1200 then cmsa = 5122 ; else if puma eq 1300 then cmsa = 5122 ; else if puma eq 1400 then cmsa = 5122 ; else if puma eq 1500 then cmsa = 5122 ; else if puma eq 1600 then cmsa = 5122 ; else if puma eq 1700 then cmsa = 5122 ; else if puma eq 1800 then cmsa = 5122 ; else if puma eq 1900 then cmsa = 5122 ; else if puma eq 2000 then cmsa = 5122 ; else if puma eq 2100 then cmsa = 5122 ; else if puma eq 2200 then cmsa = 5122 ; else if puma eq 2300 then cmsa = 5122 ; else if puma eq 2400 then cmsa = 5122 ; else cmsa = 9999 ; end; else if state eq 28 then do; if puma eq 100 then cmsa = 4920 ; else if puma eq 800 then cmsa = 3560 ; else if puma eq 900 then cmsa = 3560 ; else if puma eq 1000 then cmsa = 3560 ; else cmsa = 9999 ; end; else if state eq 29 then do; if puma eq 700 then cmsa = 3760 ; else if puma eq 800 then cmsa = 3760 ; else if puma eq 900 then cmsa = 3760 ; else if puma eq 1001 then cmsa = 3760 ; else if puma eq 1002 then cmsa = 3760 ; else if puma eq 1003 then cmsa = 3760 ; else if puma eq 1004 then cmsa = 3760 ; else if puma eq 1005 then cmsa = 3760 ; else if puma eq 1101 then cmsa = 7040 ; else if puma eq 1102 then cmsa = 7040 ; else if puma eq 1103 then cmsa = 7040 ; else if puma eq 1104 then cmsa = 7040 ; else if puma eq 1201 then cmsa = 7040 ; else if puma eq 1202 then cmsa = 7040 ; else if puma eq 1203 then cmsa = 7040 ; else if puma eq 1300 then cmsa = 7040 ; else if puma eq 1400 then cmsa = 7040 ; else if puma eq 1500 then cmsa = 7040 ; else cmsa = 9999 ; end; else if state eq 31 then do; if puma eq 900 then cmsa = 5920 ; else if puma eq 1001 then cmsa = 5920 ; else if puma eq 1002 then cmsa = 5920 ; else if puma eq 1003 then cmsa = 5920 ; else if puma eq 1004 then cmsa = 5920 ; else cmsa = 9999 ; end; else if state eq 32 then do; if puma eq 100 then cmsa = 6720 ; else if puma eq 201 then cmsa = 4120 ; else if puma eq 202 then cmsa = 4120 ; else if puma eq 203 then cmsa = 4120 ; else if puma eq 204 then cmsa = 4120 ; else if puma eq 205 then cmsa = 4120 ; else if puma eq 300 then cmsa = 6720 ; else if puma eq 400 then cmsa = 6720 ; else cmsa = 9999 ; end; else if state eq 33 then do; if puma eq 501 then cmsa = 1123 ; else if puma eq 503 then cmsa = 1123 ; else cmsa = 9999 ; end; else if state eq 34 then do; if puma eq 100 then cmsa = 560 ; else if puma eq 200 then cmsa = 560 ; else if puma eq 300 then cmsa = 6162 ; else if puma eq 400 then cmsa = 5602 ; else if puma eq 500 then cmsa = 5602 ; else if puma eq 600 then cmsa = 5602 ; else if puma eq 700 then cmsa = 5602 ; else if puma eq 800 then cmsa = 5602 ; else if puma eq 900 then cmsa = 5602 ; else if puma eq 1000 then cmsa = 5602 ; else if puma eq 1100 then cmsa = 5602 ; else if puma eq 1200 then cmsa = 5602 ; else if puma eq 1301 then cmsa = 5602 ; else if puma eq 1302 then cmsa = 5602 ; else if puma eq 1400 then cmsa = 5602 ; else if puma eq 1500 then cmsa = 5602 ; else if puma eq 1600 then cmsa = 5602 ; else if puma eq 1700 then cmsa = 5602 ; else if puma eq 1800 then cmsa = 5602 ; else if puma eq 1900 then cmsa = 5602 ; else if puma eq 2000 then cmsa = 5602 ; else if puma eq 2100 then cmsa = 5602 ; else if puma eq 2200 then cmsa = 5602 ; else if puma eq 2300 then cmsa = 5602 ; else if puma eq 2400 then cmsa = 5602 ; else if puma eq 2500 then cmsa = 5602 ; else if puma eq 2600 then cmsa = 5602 ; else if puma eq 2700 then cmsa = 5602 ; else if puma eq 2800 then cmsa = 5602 ; else if puma eq 2900 then cmsa = 5602 ; else if puma eq 3000 then cmsa = 5602 ; else if puma eq 3100 then cmsa = 5602 ; else if puma eq 3200 then cmsa = 5602 ; else if puma eq 3300 then cmsa = 5602 ; else if puma eq 3400 then cmsa = 5602 ; else if puma eq 3500 then cmsa = 5602 ; else if puma eq 3601 then cmsa = 5602 ; else if puma eq 3602 then cmsa = 5602 ; else if puma eq 3700 then cmsa = 5602 ; else if puma eq 3800 then cmsa = 5602 ; else if puma eq 3900 then cmsa = 5602 ; else if puma eq 4000 then cmsa = 5602 ; else if puma eq 4100 then cmsa = 5602 ; else if puma eq 4200 then cmsa = 5602 ; else if puma eq 4300 then cmsa = 5602 ; else if puma eq 4400 then cmsa = 5602 ; else if puma eq 4500 then cmsa = 6162 ; else if puma eq 4600 then cmsa = 6162 ; else if puma eq 4700 then cmsa = 6162 ; else if puma eq 4800 then cmsa = 6162 ; else if puma eq 4900 then cmsa = 6162 ; else if puma eq 5000 then cmsa = 6162 ; else if puma eq 5100 then cmsa = 6162 ; else if puma eq 5200 then cmsa = 6162 ; else if puma eq 5300 then cmsa = 6162 ; else if puma eq 5400 then cmsa = 6162 ; else if puma eq 5500 then cmsa = 6162 ; else if puma eq 5600 then cmsa = 6162 ; else cmsa = 9999 ; end; else if state eq 35 then do; if puma eq 201 then cmsa = 200 ; else if puma eq 202 then cmsa = 200 ; else if puma eq 203 then cmsa = 200 ; else if puma eq 204 then cmsa = 200 ; else cmsa = 9999 ; end; else if state eq 36 then do; if puma eq 400 then cmsa = 8160 ; else if puma eq 501 then cmsa = 8680 ; else if puma eq 502 then cmsa = 8680 ; else if puma eq 600 then cmsa = 8680 ; else if puma eq 800 then cmsa = 160 ; else if puma eq 900 then cmsa = 160 ; else if puma eq 1000 then cmsa = 160 ; else if puma eq 1100 then cmsa = 160 ; else if puma eq 1200 then cmsa = 160 ; else if puma eq 1400 then cmsa = 8160 ; else if puma eq 1500 then cmsa = 8160 ; else if puma eq 1600 then cmsa = 8160 ; else if puma eq 1700 then cmsa = 8160 ; else if puma eq 1900 then cmsa = 6840 ; else if puma eq 2000 then cmsa = 6840 ; else if puma eq 2100 then cmsa = 6840 ; else if puma eq 2200 then cmsa = 6840 ; else if puma eq 2301 then cmsa = 1282 ; else if puma eq 2302 then cmsa = 1282 ; else if puma eq 2401 then cmsa = 5602 ; else if puma eq 2402 then cmsa = 5602 ; else if puma eq 2403 then cmsa = 5602 ; else if puma eq 2404 then cmsa = 5602 ; else if puma eq 2405 then cmsa = 5602 ; else if puma eq 2406 then cmsa = 5602 ; else if puma eq 2407 then cmsa = 5602 ; else if puma eq 2408 then cmsa = 5602 ; else if puma eq 2409 then cmsa = 5602 ; else if puma eq 2410 then cmsa = 5602 ; else if puma eq 2411 then cmsa = 5602 ; else if puma eq 2412 then cmsa = 5602 ; else if puma eq 2500 then cmsa = 1282 ; else if puma eq 2600 then cmsa = 1282 ; else if puma eq 2700 then cmsa = 1282 ; else if puma eq 2800 then cmsa = 1282 ; else if puma eq 2900 then cmsa = 1282 ; else if puma eq 3001 then cmsa = 1282 ; else if puma eq 3002 then cmsa = 1282 ; else if puma eq 3003 then cmsa = 1282 ; else if puma eq 3500 then cmsa = 960 ; else if puma eq 3601 then cmsa = 960 ; else if puma eq 3602 then cmsa = 960 ; else if puma eq 3800 then cmsa = 160 ; else if puma eq 4000 then cmsa = 5602 ; else if puma eq 4100 then cmsa = 5602 ; else if puma eq 4200 then cmsa = 5602 ; else if puma eq 4301 then cmsa = 5602 ; else if puma eq 4302 then cmsa = 5602 ; else if puma eq 4401 then cmsa = 5602 ; else if puma eq 4402 then cmsa = 5602 ; else if puma eq 4403 then cmsa = 5602 ; else if puma eq 4404 then cmsa = 5602 ; else if puma eq 4405 then cmsa = 5602 ; else if puma eq 4500 then cmsa = 5602 ; else if puma eq 4601 then cmsa = 5602 ; else if puma eq 4602 then cmsa = 5602 ; else if puma eq 4603 then cmsa = 5602 ; else if puma eq 4604 then cmsa = 5602 ; else if puma eq 4605 then cmsa = 5602 ; else if puma eq 4606 then cmsa = 5602 ; else if puma eq 4607 then cmsa = 5602 ; else if puma eq 4608 then cmsa = 5602 ; else if puma eq 4609 then cmsa = 5602 ; else if puma eq 4700 then cmsa = 5602 ; else if puma eq 4800 then cmsa = 5602 ; else if puma eq 4900 then cmsa = 5602 ; else if puma eq 5001 then cmsa = 5602 ; else if puma eq 5002 then cmsa = 5602 ; else if puma eq 5003 then cmsa = 5602 ; else if puma eq 5004 then cmsa = 5602 ; else if puma eq 5005 then cmsa = 5602 ; else if puma eq 5006 then cmsa = 5602 ; else if puma eq 5007 then cmsa = 5602 ; else if puma eq 5008 then cmsa = 5602 ; else if puma eq 5009 then cmsa = 5602 ; else if puma eq 5010 then cmsa = 5602 ; else if puma eq 5101 then cmsa = 5602 ; else if puma eq 5102 then cmsa = 5602 ; else if puma eq 5103 then cmsa = 5602 ; else if puma eq 5104 then cmsa = 5602 ; else if puma eq 5105 then cmsa = 5602 ; else if puma eq 5106 then cmsa = 5602 ; else if puma eq 5107 then cmsa = 5602 ; else if puma eq 5108 then cmsa = 5602 ; else if puma eq 5109 then cmsa = 5602 ; else if puma eq 5110 then cmsa = 5602 ; else if puma eq 5201 then cmsa = 5602 ; else if puma eq 5202 then cmsa = 5602 ; else if puma eq 5203 then cmsa = 5602 ; else if puma eq 5301 then cmsa = 5602 ; else if puma eq 5302 then cmsa = 5602 ; else if puma eq 5303 then cmsa = 5602 ; else if puma eq 5304 then cmsa = 5602 ; else if puma eq 5305 then cmsa = 5602 ; else if puma eq 5306 then cmsa = 5602 ; else if puma eq 5307 then cmsa = 5602 ; else if puma eq 5308 then cmsa = 5602 ; else if puma eq 5309 then cmsa = 5602 ; else if puma eq 5310 then cmsa = 5602 ; else if puma eq 5311 then cmsa = 5602 ; else if puma eq 5312 then cmsa = 5602 ; else if puma eq 5313 then cmsa = 5602 ; else if puma eq 5314 then cmsa = 5602 ; else if puma eq 5315 then cmsa = 5602 ; else if puma eq 5316 then cmsa = 5602 ; else if puma eq 5317 then cmsa = 5602 ; else if puma eq 5318 then cmsa = 5602 ; else if puma eq 5401 then cmsa = 5602 ; else if puma eq 5402 then cmsa = 5602 ; else if puma eq 5403 then cmsa = 5602 ; else if puma eq 5404 then cmsa = 5602 ; else if puma eq 5405 then cmsa = 5602 ; else if puma eq 5406 then cmsa = 5602 ; else if puma eq 5407 then cmsa = 5602 ; else if puma eq 5408 then cmsa = 5602 ; else if puma eq 5409 then cmsa = 5602 ; else if puma eq 5410 then cmsa = 5602 ; else if puma eq 5411 then cmsa = 5602 ; else if puma eq 5412 then cmsa = 5602 ; else if puma eq 5413 then cmsa = 5602 ; else if puma eq 5414 then cmsa = 5602 ; else cmsa = 9999 ; end; else if state eq 37 then do; if puma eq 801 then cmsa = 1520 ; else if puma eq 802 then cmsa = 1520 ; else if puma eq 803 then cmsa = 1520 ; else if puma eq 804 then cmsa = 1520 ; else if puma eq 900 then cmsa = 1520 ; else if puma eq 1000 then cmsa = 1520 ; else if puma eq 1100 then cmsa = 1520 ; else if puma eq 1200 then cmsa = 1520 ; else if puma eq 1300 then cmsa = 3120 ; else if puma eq 1400 then cmsa = 3120 ; else if puma eq 1500 then cmsa = 3120 ; else if puma eq 1600 then cmsa = 3120 ; else if puma eq 1700 then cmsa = 3120 ; else if puma eq 2000 then cmsa = 3120 ; else if puma eq 2100 then cmsa = 3120 ; else if puma eq 2200 then cmsa = 3120 ; else if puma eq 2301 then cmsa = 6640 ; else if puma eq 2302 then cmsa = 6640 ; else if puma eq 2303 then cmsa = 6640 ; else if puma eq 2400 then cmsa = 6640 ; else if puma eq 2500 then cmsa = 6640 ; else if puma eq 2700 then cmsa = 6640 ; else if puma eq 3000 then cmsa = 2560 ; else if puma eq 3100 then cmsa = 2560 ; else cmsa = 9999 ; end; else if state eq 39 then do; if puma eq 100 then cmsa = 8400 ; else if puma eq 200 then cmsa = 8400 ; else if puma eq 400 then cmsa = 1692 ; else if puma eq 800 then cmsa = 1692 ; else if puma eq 900 then cmsa = 1692 ; else if puma eq 1700 then cmsa = 1840 ; else if puma eq 2100 then cmsa = 2000 ; else if puma eq 2200 then cmsa = 2000 ; else if puma eq 2300 then cmsa = 1840 ; else if puma eq 2600 then cmsa = 2000 ; else if puma eq 2700 then cmsa = 1840 ; else if puma eq 2800 then cmsa = 1840 ; else if puma eq 3000 then cmsa = 1642 ; else if puma eq 3300 then cmsa = 1642 ; else if puma eq 3500 then cmsa = 3400 ; else if puma eq 3601 then cmsa = 8400 ; else if puma eq 3602 then cmsa = 8400 ; else if puma eq 3603 then cmsa = 8400 ; else if puma eq 3604 then cmsa = 8400 ; else if puma eq 3700 then cmsa = 1692 ; else if puma eq 3800 then cmsa = 1692 ; else if puma eq 3901 then cmsa = 1692 ; else if puma eq 3902 then cmsa = 1692 ; else if puma eq 3903 then cmsa = 1692 ; else if puma eq 3904 then cmsa = 1692 ; else if puma eq 3905 then cmsa = 1692 ; else if puma eq 4000 then cmsa = 1692 ; else if puma eq 4100 then cmsa = 1692 ; else if puma eq 4200 then cmsa = 1692 ; else if puma eq 4300 then cmsa = 1692 ; else if puma eq 4400 then cmsa = 1692 ; else if puma eq 4500 then cmsa = 1692 ; else if puma eq 4600 then cmsa = 1692 ; else if puma eq 4701 then cmsa = 1692 ; else if puma eq 4702 then cmsa = 1692 ; else if puma eq 4703 then cmsa = 1692 ; else if puma eq 4704 then cmsa = 1692 ; else if puma eq 4801 then cmsa = 9320 ; else if puma eq 4802 then cmsa = 9320 ; else if puma eq 4901 then cmsa = 9320 ; else if puma eq 4902 then cmsa = 9320 ; else if puma eq 5001 then cmsa = 1320 ; else if puma eq 5002 then cmsa = 1320 ; else if puma eq 5003 then cmsa = 1320 ; else if puma eq 5101 then cmsa = 1840 ; else if puma eq 5102 then cmsa = 1840 ; else if puma eq 5103 then cmsa = 1840 ; else if puma eq 5104 then cmsa = 1840 ; else if puma eq 5105 then cmsa = 1840 ; else if puma eq 5106 then cmsa = 1840 ; else if puma eq 5107 then cmsa = 1840 ; else if puma eq 5201 then cmsa = 2000 ; else if puma eq 5202 then cmsa = 2000 ; else if puma eq 5203 then cmsa = 2000 ; else if puma eq 5204 then cmsa = 2000 ; else if puma eq 5205 then cmsa = 2000 ; else if puma eq 5301 then cmsa = 1642 ; else if puma eq 5302 then cmsa = 1642 ; else if puma eq 5401 then cmsa = 1642 ; else if puma eq 5402 then cmsa = 1642 ; else if puma eq 5403 then cmsa = 1642 ; else if puma eq 5404 then cmsa = 1642 ; else if puma eq 5405 then cmsa = 1642 ; else if puma eq 5406 then cmsa = 1642 ; else cmsa = 9999 ; end; else if state eq 40 then do; if puma eq 100 then cmsa = 8560 ; else if puma eq 600 then cmsa = 8560 ; else if puma eq 700 then cmsa = 8560 ; else if puma eq 900 then cmsa = 5880 ; else if puma eq 1000 then cmsa = 5880 ; else if puma eq 1100 then cmsa = 5880 ; else cmsa = 9999 ; end; else if state eq 41 then do; if puma eq 700 then cmsa = 2400 ; else if puma eq 800 then cmsa = 2400 ; else if puma eq 1000 then cmsa = 6442 ; else if puma eq 1100 then cmsa = 6442 ; else if puma eq 1200 then cmsa = 6442 ; else if puma eq 1300 then cmsa = 6442 ; else if puma eq 1400 then cmsa = 6442 ; else if puma eq 1500 then cmsa = 6442 ; else cmsa = 9999 ; end; else if state eq 42 then do; if puma eq 101 then cmsa = 2360 ; else if puma eq 102 then cmsa = 2360 ; else if puma eq 500 then cmsa = 7560 ; else if puma eq 600 then cmsa = 7560 ; else if puma eq 700 then cmsa = 7560 ; else if puma eq 1301 then cmsa = 6282 ; else if puma eq 1302 then cmsa = 6282 ; else if puma eq 1303 then cmsa = 6282 ; else if puma eq 1304 then cmsa = 6282 ; else if puma eq 1305 then cmsa = 6282 ; else if puma eq 1306 then cmsa = 6282 ; else if puma eq 1307 then cmsa = 6282 ; else if puma eq 1308 then cmsa = 6282 ; else if puma eq 1309 then cmsa = 6282 ; else if puma eq 1310 then cmsa = 6282 ; else if puma eq 1311 then cmsa = 6282 ; else if puma eq 1312 then cmsa = 6282 ; else if puma eq 1400 then cmsa = 6282 ; else if puma eq 1800 then cmsa = 7560 ; else if puma eq 2001 then cmsa = 240 ; else if puma eq 2002 then cmsa = 240 ; else if puma eq 2101 then cmsa = 240 ; else if puma eq 2102 then cmsa = 240 ; else if puma eq 2200 then cmsa = 3240 ; else if puma eq 2300 then cmsa = 9280 ; else if puma eq 2501 then cmsa = 9280 ; else if puma eq 2502 then cmsa = 9280 ; else if puma eq 2503 then cmsa = 9280 ; else if puma eq 2601 then cmsa = 6162 ; else if puma eq 2602 then cmsa = 6162 ; else if puma eq 2603 then cmsa = 6162 ; else if puma eq 2604 then cmsa = 6162 ; else if puma eq 2605 then cmsa = 6162 ; else if puma eq 2606 then cmsa = 6162 ; else if puma eq 2607 then cmsa = 6162 ; else if puma eq 2608 then cmsa = 6162 ; else if puma eq 2609 then cmsa = 6162 ; else if puma eq 2610 then cmsa = 6162 ; else if puma eq 2611 then cmsa = 6162 ; else if puma eq 2701 then cmsa = 6162 ; else if puma eq 2702 then cmsa = 6162 ; else if puma eq 2703 then cmsa = 6162 ; else if puma eq 2801 then cmsa = 6162 ; else if puma eq 2802 then cmsa = 6162 ; else if puma eq 2803 then cmsa = 6162 ; else if puma eq 2804 then cmsa = 6162 ; else if puma eq 2805 then cmsa = 6162 ; else if puma eq 2901 then cmsa = 6162 ; else if puma eq 2902 then cmsa = 6162 ; else if puma eq 2903 then cmsa = 6162 ; else if puma eq 3001 then cmsa = 6162 ; else if puma eq 3002 then cmsa = 6162 ; else if puma eq 3003 then cmsa = 6162 ; else if puma eq 3101 then cmsa = 6680 ; else if puma eq 3102 then cmsa = 6680 ; else if puma eq 3200 then cmsa = 7560 ; else if puma eq 3301 then cmsa = 6282 ; else if puma eq 3302 then cmsa = 6282 ; else if puma eq 3303 then cmsa = 6282 ; else if puma eq 3501 then cmsa = 4000 ; else if puma eq 3502 then cmsa = 4000 ; else if puma eq 3503 then cmsa = 4000 ; else if puma eq 3601 then cmsa = 3240 ; else if puma eq 3602 then cmsa = 3240 ; else if puma eq 3700 then cmsa = 3240 ; else if puma eq 3800 then cmsa = 6282 ; else if puma eq 3901 then cmsa = 6282 ; else if puma eq 3902 then cmsa = 6282 ; else cmsa = 9999 ; end; else if state eq 44 then do; if puma eq 100 then cmsa = 6483 ; else if puma eq 200 then cmsa = 6483 ; else if puma eq 300 then cmsa = 6483 ; else if puma eq 400 then cmsa = 6483 ; else if puma eq 500 then cmsa = 6483 ; else if puma eq 600 then cmsa = 6483 ; else if puma eq 700 then cmsa = 6483 ; else if puma eq 800 then cmsa = 6483 ; else cmsa = 9999 ; end; else if state eq 45 then do; if puma eq 100 then cmsa = 3160 ; else if puma eq 201 then cmsa = 3160 ; else if puma eq 202 then cmsa = 3160 ; else if puma eq 301 then cmsa = 3160 ; else if puma eq 302 then cmsa = 3160 ; else if puma eq 500 then cmsa = 1520 ; else if puma eq 1100 then cmsa = 1440 ; else if puma eq 1201 then cmsa = 1440 ; else if puma eq 1202 then cmsa = 1440 ; else if puma eq 1601 then cmsa = 1760 ; else if puma eq 1602 then cmsa = 1760 ; else if puma eq 1700 then cmsa = 1760 ; else if puma eq 1800 then cmsa = 600 ; else cmsa = 9999 ; end; else if state eq 47 then do; if puma eq 100 then cmsa = 3660 ; else if puma eq 200 then cmsa = 3660 ; else if puma eq 300 then cmsa = 3660 ; else if puma eq 501 then cmsa = 5360 ; else if puma eq 502 then cmsa = 5360 ; else if puma eq 503 then cmsa = 5360 ; else if puma eq 504 then cmsa = 5360 ; else if puma eq 505 then cmsa = 5360 ; else if puma eq 600 then cmsa = 3840 ; else if puma eq 700 then cmsa = 3840 ; else if puma eq 800 then cmsa = 3840 ; else if puma eq 900 then cmsa = 3840 ; else if puma eq 1000 then cmsa = 1560 ; else if puma eq 1200 then cmsa = 1560 ; else if puma eq 1300 then cmsa = 1560 ; else if puma eq 1800 then cmsa = 4920 ; else if puma eq 1900 then cmsa = 4920 ; else if puma eq 2000 then cmsa = 4920 ; else if puma eq 2300 then cmsa = 5360 ; else if puma eq 2400 then cmsa = 5360 ; else if puma eq 2500 then cmsa = 5360 ; else cmsa = 9999 ; end; else if state eq 48 then do; if puma eq 1500 then cmsa = 1922 ; else if puma eq 1800 then cmsa = 1922 ; else if puma eq 1901 then cmsa = 1922 ; else if puma eq 1902 then cmsa = 1922 ; else if puma eq 1903 then cmsa = 1922 ; else if puma eq 1904 then cmsa = 1922 ; else if puma eq 2001 then cmsa = 1922 ; else if puma eq 2002 then cmsa = 1922 ; else if puma eq 2101 then cmsa = 1922 ; else if puma eq 2102 then cmsa = 1922 ; else if puma eq 2103 then cmsa = 1922 ; else if puma eq 2104 then cmsa = 1922 ; else if puma eq 2201 then cmsa = 1922 ; else if puma eq 2202 then cmsa = 1922 ; else if puma eq 2300 then cmsa = 1922 ; else if puma eq 2400 then cmsa = 1922 ; else if puma eq 2501 then cmsa = 1922 ; else if puma eq 2502 then cmsa = 1922 ; else if puma eq 2503 then cmsa = 1922 ; else if puma eq 2504 then cmsa = 1922 ; else if puma eq 2505 then cmsa = 1922 ; else if puma eq 2506 then cmsa = 1922 ; else if puma eq 2507 then cmsa = 1922 ; else if puma eq 2508 then cmsa = 1922 ; else if puma eq 2509 then cmsa = 1922 ; else if puma eq 2600 then cmsa = 1922 ; else if puma eq 2700 then cmsa = 1922 ; else if puma eq 2800 then cmsa = 1922 ; else if puma eq 2901 then cmsa = 1922 ; else if puma eq 2902 then cmsa = 1922 ; else if puma eq 2903 then cmsa = 1922 ; else if puma eq 2904 then cmsa = 1922 ; else if puma eq 3701 then cmsa = 2320 ; else if puma eq 3702 then cmsa = 2320 ; else if puma eq 3703 then cmsa = 2320 ; else if puma eq 3704 then cmsa = 2320 ; else if puma eq 3705 then cmsa = 2320 ; else if puma eq 4000 then cmsa = 1880 ; else if puma eq 4101 then cmsa = 4880 ; else if puma eq 4102 then cmsa = 4880 ; else if puma eq 4103 then cmsa = 4880 ; else if puma eq 4201 then cmsa = 1240 ; else if puma eq 4202 then cmsa = 1240 ; else if puma eq 4301 then cmsa = 1880 ; else if puma eq 4302 then cmsa = 1880 ; else if puma eq 4401 then cmsa = 7240 ; else if puma eq 4402 then cmsa = 7240 ; else if puma eq 4403 then cmsa = 7240 ; else if puma eq 4404 then cmsa = 7240 ; else if puma eq 4405 then cmsa = 7240 ; else if puma eq 4406 then cmsa = 7240 ; else if puma eq 4407 then cmsa = 7240 ; else if puma eq 4408 then cmsa = 7240 ; else if puma eq 4501 then cmsa = 7240 ; else if puma eq 4502 then cmsa = 7240 ; else if puma eq 4600 then cmsa = 7240 ; else if puma eq 4800 then cmsa = 1880 ; else if puma eq 4901 then cmsa = 640 ; else if puma eq 4902 then cmsa = 640 ; else if puma eq 4903 then cmsa = 640 ; else if puma eq 4904 then cmsa = 640 ; else if puma eq 5000 then cmsa = 640 ; else if puma eq 5100 then cmsa = 640 ; else if puma eq 5200 then cmsa = 640 ; else if puma eq 5300 then cmsa = 3810 ; else if puma eq 5400 then cmsa = 3810 ; else if puma eq 5500 then cmsa = 3362 ; else if puma eq 5600 then cmsa = 3362 ; else if puma eq 5900 then cmsa = 840 ; else if puma eq 6000 then cmsa = 840 ; else if puma eq 6100 then cmsa = 840 ; else if puma eq 6200 then cmsa = 3362 ; else if puma eq 6301 then cmsa = 3362 ; else if puma eq 6302 then cmsa = 3362 ; else if puma eq 6400 then cmsa = 3362 ; else if puma eq 6501 then cmsa = 3362 ; else if puma eq 6502 then cmsa = 3362 ; else if puma eq 6601 then cmsa = 3362 ; else if puma eq 6602 then cmsa = 3362 ; else if puma eq 6603 then cmsa = 3362 ; else if puma eq 6604 then cmsa = 3362 ; else if puma eq 6605 then cmsa = 3362 ; else if puma eq 6606 then cmsa = 3362 ; else if puma eq 6607 then cmsa = 3362 ; else if puma eq 6608 then cmsa = 3362 ; else if puma eq 6609 then cmsa = 3362 ; else if puma eq 6610 then cmsa = 3362 ; else if puma eq 6611 then cmsa = 3362 ; else if puma eq 6612 then cmsa = 3362 ; else if puma eq 6613 then cmsa = 3362 ; else if puma eq 6614 then cmsa = 3362 ; else if puma eq 6615 then cmsa = 3362 ; else if puma eq 6700 then cmsa = 3362 ; else if puma eq 6800 then cmsa = 3362 ; else if puma eq 6901 then cmsa = 3362 ; else if puma eq 6902 then cmsa = 3362 ; else if puma eq 6903 then cmsa = 3362 ; else if puma eq 6904 then cmsa = 3362 ; else if puma eq 6905 then cmsa = 3362 ; else if puma eq 6906 then cmsa = 3362 ; else if puma eq 6907 then cmsa = 3362 ; else if puma eq 6908 then cmsa = 3362 ; else if puma eq 7200 then cmsa = 3362 ; else cmsa = 9999 ; end; else if state eq 49 then do; if puma eq 100 then cmsa = 7160 ; else if puma eq 200 then cmsa = 7160 ; else if puma eq 300 then cmsa = 7160 ; else if puma eq 400 then cmsa = 7160 ; else if puma eq 500 then cmsa = 6520 ; else cmsa = 9999 ; end; else if state eq 51 then do; if puma eq 200 then cmsa = 3660 ; else if puma eq 800 then cmsa = 8840 ; else if puma eq 900 then cmsa = 8840 ; else if puma eq 1000 then cmsa = 8840 ; else if puma eq 1100 then cmsa = 8840 ; else if puma eq 1800 then cmsa = 6760 ; else if puma eq 1900 then cmsa = 6760 ; else if puma eq 2000 then cmsa = 6760 ; else if puma eq 2100 then cmsa = 6760 ; else if puma eq 2200 then cmsa = 8840 ; else if puma eq 2300 then cmsa = 5720 ; else if puma eq 2400 then cmsa = 6760 ; else if puma eq 2500 then cmsa = 5720 ; else if puma eq 2600 then cmsa = 5720 ; else if puma eq 2700 then cmsa = 5720 ; else if puma eq 2800 then cmsa = 5720 ; else if puma eq 2900 then cmsa = 5720 ; else if puma eq 3000 then cmsa = 5720 ; else if puma eq 3100 then cmsa = 5720 ; else if puma eq 3200 then cmsa = 3660 ; else if puma eq 3300 then cmsa = 5720 ; else cmsa = 9999 ; end; else if state eq 53 then do; if puma eq 500 then cmsa = 7840 ; else if puma eq 600 then cmsa = 7840 ; else if puma eq 1001 then cmsa = 7602 ; else if puma eq 1002 then cmsa = 7602 ; else if puma eq 1003 then cmsa = 7602 ; else if puma eq 1004 then cmsa = 7602 ; else if puma eq 1301 then cmsa = 7602 ; else if puma eq 1302 then cmsa = 7602 ; else if puma eq 1303 then cmsa = 7602 ; else if puma eq 1304 then cmsa = 7602 ; else if puma eq 1701 then cmsa = 7602 ; else if puma eq 1702 then cmsa = 7602 ; else if puma eq 1703 then cmsa = 7602 ; else if puma eq 1801 then cmsa = 7602 ; else if puma eq 1802 then cmsa = 7602 ; else if puma eq 1803 then cmsa = 7602 ; else if puma eq 1804 then cmsa = 7602 ; else if puma eq 1805 then cmsa = 7602 ; else if puma eq 1806 then cmsa = 7602 ; else if puma eq 1807 then cmsa = 7602 ; else if puma eq 1808 then cmsa = 7602 ; else if puma eq 1901 then cmsa = 6442 ; else if puma eq 1902 then cmsa = 6442 ; else cmsa = 9999 ; end; else if state eq 54 then do; if puma eq 700 then cmsa = 1480 ; else if puma eq 800 then cmsa = 3400 ; else cmsa = 9999 ; end; else if state eq 55 then do; if puma eq 400 then cmsa = 460 ; else if puma eq 500 then cmsa = 460 ; else if puma eq 1100 then cmsa = 5122 ; else if puma eq 1600 then cmsa = 4720 ; else if puma eq 1700 then cmsa = 4720 ; else if puma eq 2000 then cmsa = 1602 ; else if puma eq 2100 then cmsa = 5082 ; else if puma eq 2201 then cmsa = 5082 ; else if puma eq 2202 then cmsa = 5082 ; else if puma eq 2203 then cmsa = 5082 ; else if puma eq 2204 then cmsa = 5082 ; else if puma eq 2205 then cmsa = 5082 ; else if puma eq 2206 then cmsa = 5082 ; else if puma eq 2300 then cmsa = 5082 ; else if puma eq 2400 then cmsa = 5082 ; else cmsa = 9999 ; end; else cmsa = 9999 ; --=====================_909099533==_ Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 8bit ______________________________________________________________ David A. Jaeger, Associate Professor Department of Economics Hunter College/CUNY Grad School          phone: (212) 772-5435 695 Park Avenue fax: (212) 772-5398 New York, NY  10021-5085          David.Jaeger@hunter.cuny.edu --------------------------------------------------------------    http://maxweber.hunter.cuny.edu/econ/faculty/jaeger --=====================_909099533==_--