infile dictionary { *This program reads the 1989 NCHS Multiple Cause of Death Data Data File *by Jean Roth Mon Jul 14 16:10:39 EDT 2014 *Please report errors to jroth@nber.org *See the .do file for directions and run with do mort1989 *NOTE: This program is distributed under the GNU GPL. *See end of this file and http://www.gnu.org/licenses/ for details. _column(1 ) byte datayear %2f _column(3 ) byte reparea %1f _column(10 ) str2 shipno %2s _column(19 ) byte rectype %1f _column(20 ) byte restatus %1f _column(21 ) str5 countyoc %5s _column(21 ) str2 stateoc %2s _column(26 ) byte region %1f _column(27 ) str2 divstoc %2s _column(29 ) str2 exstatoc %2s _column(31 ) str5 countyrs %5s _column(31 ) str2 staters %2s _column(36 ) str3 cityrs %3s _column(39 ) str1 popsize %1s _column(40 ) str1 metro %1s _column(41 ) byte regnres %1f _column(42 ) byte divstres %2f _column(44 ) str2 exstares %2s _column(46 ) str3 smsares %3s _column(49 ) byte popsizoc %1f _column(50 ) str1 popsizrs %1s _column(51 ) str1 popmsa %1s _column(52 ) byte educ %2f _column(54 ) byte educr %1f _column(55 ) byte monthdth %2f _column(59 ) byte sex %1f _column(60 ) byte race %2f _column(62 ) byte racer3 %1f _column(63 ) byte racer2 %1f _column(64 ) int age %3f _column(67 ) byte ager52 %2f _column(69 ) byte ager27 %2f _column(71 ) byte ager12 %2f _column(73 ) byte ager22 %2f _column(75 ) byte placdth %1f _column(77 ) byte marstat %1f _column(78 ) byte statebth %2f _column(80 ) byte hispanic %2f _column(82 ) byte hspanicr %1f _column(83 ) byte weekday %1f _column(84 ) byte autopsy %1f _column(85 ) int industry %3f _column(88 ) int occup %3f _column(91 ) int ucr52 %3f _column(94 ) byte indusr51 %2f _column(96 ) byte indusr15 %2f _column(98 ) byte occupr59 %2f _column(100 ) byte occupr9 %2f _column(110 ) int calcage %4f _column(114 ) byte ageflag %1f _column(119 ) str5 fipsctyo %5s _column(119 ) str2 fipssto %2s _column(124 ) str5 fipsctyr %5s _column(124 ) str2 fipsstr %2s _column(129 ) str4 fipssmsa %4s _column(134 ) str2 fipscmsa %2s _column(141 ) byte accident %1f _column(142 ) str4 ucod %4s _column(146 ) long ucr282 %5f _column(151 ) int ucr72 %3f _column(154 ) int ucr61 %3f _column(157 ) int ucr34 %3f _column(160 ) byte eanum %2f _column(162 ) str7 entity1 %7s _column(162 ) byte econdp_1 %1f _column(163 ) str1 econds_1 %1s _column(164 ) str4 enicon_1 %4s _column(168 ) byte eniflag1 %1f _column(169 ) str7 entity2 %7s _column(169 ) byte econdp_2 %1f _column(170 ) str1 econds_2 %1s _column(171 ) str4 enicon_2 %4s _column(175 ) byte eniflag2 %1f _column(176 ) str7 entity3 %7s _column(176 ) byte econdp_3 %1f _column(177 ) str1 econds_3 %1s _column(178 ) str4 enicon_3 %4s _column(182 ) byte eniflag3 %1f _column(183 ) str7 entity4 %7s _column(183 ) byte econdp_4 %1f _column(184 ) str1 econds_4 %1s _column(185 ) str4 enicon_4 %4s _column(189 ) byte eniflag4 %1f _column(190 ) str7 entity5 %7s _column(190 ) byte econdp_5 %1f _column(191 ) str1 econds_5 %1s _column(192 ) str4 enicon_5 %4s _column(196 ) byte eniflag5 %1f _column(197 ) str7 entity6 %7s _column(197 ) byte econdp_6 %1f _column(198 ) str1 econds_6 %1s _column(199 ) str4 enicon_6 %4s _column(203 ) byte eniflag6 %1f _column(204 ) str7 entity7 %7s _column(204 ) byte econdp_7 %1f _column(205 ) str1 econds_7 %1s _column(206 ) str4 enicon_7 %4s _column(210 ) byte eniflag7 %1f _column(211 ) str7 entity8 %7s _column(211 ) byte econdp_8 %1f _column(212 ) str1 econds_8 %1s _column(213 ) str4 enicon_8 %4s _column(217 ) byte eniflag8 %1f _column(218 ) str7 entity9 %7s _column(218 ) byte econdp_9 %1f _column(219 ) str1 econds_9 %1s _column(220 ) str4 enicon_9 %4s _column(224 ) byte eniflag9 %1f _column(225 ) str7 entity10 %7s _column(225 ) byte econdp_10 %1f _column(226 ) str1 econds_10 %1s _column(227 ) str4 enicon_10 %4s _column(231 ) byte eniflag10 %1f _column(232 ) str7 entity11 %7s _column(232 ) byte econdp_11 %1f _column(233 ) str1 econds_11 %1s _column(234 ) str4 enicon_11 %4s _column(238 ) byte eniflag11 %1f _column(239 ) str7 entity12 %7s _column(239 ) byte econdp_12 %1f _column(240 ) str1 econds_12 %1s _column(241 ) str4 enicon_12 %4s _column(245 ) byte eniflag12 %1f _column(246 ) str7 entity13 %7s _column(246 ) byte econdp_13 %1f _column(247 ) str1 econds_13 %1s _column(248 ) str4 enicon_13 %4s _column(252 ) byte eniflag13 %1f _column(253 ) str7 entity14 %7s _column(253 ) byte econdp_14 %1f _column(254 ) str1 econds_14 %1s _column(255 ) str4 enicon_14 %4s _column(259 ) byte eniflag14 %1f _column(260 ) str7 entity15 %7s _column(260 ) byte econdp_15 %1f _column(261 ) str1 econds_15 %1s _column(262 ) str4 enicon_15 %4s _column(266 ) byte eniflag15 %1f _column(267 ) str7 entity16 %7s _column(267 ) byte econdp_16 %1f _column(268 ) str1 econds_16 %1s _column(269 ) str4 enicon_16 %4s _column(273 ) byte eniflag16 %1f _column(274 ) str7 entity17 %7s _column(274 ) byte econdp_17 %1f _column(275 ) str1 econds_17 %1s _column(276 ) str4 enicon_17 %4s _column(280 ) byte eniflag17 %1f _column(281 ) str7 entity18 %7s _column(281 ) byte econdp_18 %1f _column(282 ) str1 econds_18 %1s _column(283 ) str4 enicon_18 %4s _column(287 ) byte eniflag18 %1f _column(288 ) str7 entity19 %7s _column(288 ) byte econdp_19 %1f _column(289 ) str1 econds_19 %1s _column(290 ) str4 enicon_19 %4s _column(294 ) byte eniflag19 %1f _column(295 ) str7 entity20 %7s _column(295 ) byte econdp_20 %1f _column(296 ) str1 econds_20 %1s _column(297 ) str4 enicon_20 %4s _column(301 ) byte eniflag20 %1f _column(338 ) byte ranum %2f _column(341 ) str5 record_1 %5s _column(345 ) byte rnifla_1 %1f _column(346 ) str5 record_2 %5s _column(350 ) byte rnifla_2 %1f _column(351 ) str5 record_3 %5s _column(355 ) byte rnifla_3 %1f _column(356 ) str5 record_4 %5s _column(360 ) byte rnifla_4 %1f _column(361 ) str5 record_5 %5s _column(365 ) byte rnifla_5 %1f _column(366 ) str5 record_6 %5s _column(370 ) byte rnifla_6 %1f _column(371 ) str5 record_7 %5s _column(375 ) byte rnifla_7 %1f _column(376 ) str5 record_8 %5s _column(380 ) byte rnifla_8 %1f _column(381 ) str5 record_9 %5s _column(385 ) byte rnifla_9 %1f _column(386 ) str5 record_10 %5s _column(390 ) byte rnifla_10 %1f _column(391 ) str5 record_11 %5s _column(395 ) byte rnifla_11 %1f _column(396 ) str5 record_12 %5s _column(400 ) byte rnifla_12 %1f _column(401 ) str5 record_13 %5s _column(405 ) byte rnifla_13 %1f _column(406 ) str5 record_14 %5s _column(410 ) byte rnifla_14 %1f _column(411 ) str5 record_15 %5s _column(415 ) byte rnifla_15 %1f _column(416 ) str5 record_16 %5s _column(420 ) byte rnifla_16 %1f _column(421 ) str5 record_17 %5s _column(425 ) byte rnifla_17 %1f _column(426 ) str5 record_18 %5s _column(430 ) byte rnifla_18 %1f _column(431 ) str5 record_19 %5s _column(435 ) byte rnifla_19 %1f _column(436 ) str5 record_20 %5s _column(440 ) byte rnifla_20 %1f } ** Copyright 2014 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. ;