1 The SAS System 22:11 Sunday, May 14, 2006 NOTE: Copyright (c) 2002-2003 by SAS Institute Inc., Cary, NC, USA. NOTE: SAS (r) 9.1 (TS1M3) Licensed to UNIV OF CA/BERKELEY, Site 0029107012. NOTE: This session is executing on the SunOS 5.8 platform. NOTE: SAS 9.1.3 Service Pack 3 You are running SAS 9. Some SAS 8 files will be automatically converted by the V9 engine; others are incompatible. Please see http://support.sas.com/rnd/migration/planning/platform/64bit.html PROC MIGRATE will preserve current SAS file attributes and is recommended for converting all your SAS libraries from any SAS 8 release to SAS 9. For details and examples, please see http://support.sas.com/rnd/migration/index.html Welcome to SAS 9.1.3 licensed to the UCB Demography Lab For a short time it will be possible to run the old version of sas by typing sas81. Soon, however, this will be the only version availalbe -- I sure hope you like it. NOTE: SAS initialization used: real time 0.40 seconds cpu time 0.18 seconds 1 libname zh '~/taiwan/fies/sasdata'; NOTE: Libref ZH was successfully assigned as follows: Engine: V9 Physical Name: /home/brass/hdir0/ebenstei/taiwan/fies/sasdata 1 ! 2 options ls=72; 3 4 %macro one(q); 5 DATA zh.new&q; 6 LENGTH DEFAULT=6; 7 SET zh.data&q; * import the SAS data; 8 9 DROP 10 _name_ i daiha1-daiha305 value1-value305 ; 11 12 ARRAY dai1{305} daiha1-daiha305; 13 ARRAY val1{305} value1-value305; 14 DO i=1 TO 305; 15 * income receipts & expenditures; 16 if dai1{i}=101 then id1=val1{i}; * personal id 16 ! number; 17 else if dai1{i}=102 then id2=val1{i}; 18 else if dai1{i}=103 then id3=val1{i}; 19 else if dai1{i}=104 then id4=val1{i}; 20 else if dai1{i}=105 then id5=val1{i}; 21 else if dai1{i}=106 then id6=val1{i}; 22 else if dai1{i}=107 then id7=val1{i}; 23 else if dai1{i}=108 then id8=val1{i}; 2 The SAS System 22:11 Sunday, May 14, 2006 24 else if dai1{i}=109 then id9=val1{i}; 25 else if dai1{i}=400 then totinc0=val1{i}; * total 25 ! income; 26 else if dai1{i}=401 then totinc1=val1{i}; 27 else if dai1{i}=402 then totinc2=val1{i}; 28 else if dai1{i}=403 then totinc3=val1{i}; 29 else if dai1{i}=404 then totinc4=val1{i}; 30 else if dai1{i}=405 then totinc5=val1{i}; 31 else if dai1{i}=406 then totinc6=val1{i}; 32 else if dai1{i}=407 then totinc7=val1{i}; 33 else if dai1{i}=408 then totinc8=val1{i}; 34 else if dai1{i}=409 then totinc9=val1{i}; 35 else if dai1{i}=190 then hirepay0=val1{i}; * pay as 35 ! hired worker; 36 else if dai1{i}=191 then hirepay1=val1{i}; 37 else if dai1{i}=192 then hirepay2=val1{i}; 38 else if dai1{i}=193 then hirepay3=val1{i}; 39 else if dai1{i}=194 then hirepay4=val1{i}; 40 else if dai1{i}=195 then hirepay5=val1{i}; 41 else if dai1{i}=196 then hirepay6=val1{i}; 42 else if dai1{i}=197 then hirepay7=val1{i}; 43 else if dai1{i}=198 then hirepay8=val1{i}; 44 else if dai1{i}=199 then hirepay9=val1{i}; 45 else if dai1{i}=210 then pay1_0=val1{i}; * pay at 45 ! first/main job; 46 else if dai1{i}=211 then pay1_1=val1{i}; 47 else if dai1{i}=212 then pay1_2=val1{i}; 48 else if dai1{i}=213 then pay1_3=val1{i}; 49 else if dai1{i}=214 then pay1_4=val1{i}; 50 else if dai1{i}=215 then pay1_5=val1{i}; 51 else if dai1{i}=216 then pay1_6=val1{i}; 52 else if dai1{i}=217 then pay1_7=val1{i}; 53 else if dai1{i}=218 then pay1_8=val1{i}; 54 else if dai1{i}=219 then pay1_9=val1{i}; 55 else if dai1{i}=220 then pay2_0=val1{i}; * pay at 55 ! second job; 56 else if dai1{i}=221 then pay2_1=val1{i}; 57 else if dai1{i}=222 then pay2_2=val1{i}; 58 else if dai1{i}=223 then pay2_3=val1{i}; 59 else if dai1{i}=224 then pay2_4=val1{i}; 60 else if dai1{i}=225 then pay2_5=val1{i}; 61 else if dai1{i}=226 then pay2_6=val1{i}; 62 else if dai1{i}=227 then pay2_7=val1{i}; 63 else if dai1{i}=228 then pay2_8=val1{i}; 64 else if dai1{i}=229 then pay2_9=val1{i}; 65 else if dai1{i}=150 then retpay0=val1{i}; * retirement 65 ! pay; 66 else if dai1{i}=151 then retpay1=val1{i}; 67 else if dai1{i}=152 then retpay2=val1{i}; 68 else if dai1{i}=153 then retpay3=val1{i}; 69 else if dai1{i}=154 then retpay4=val1{i}; 70 else if dai1{i}=155 then retpay5=val1{i}; 71 else if dai1{i}=156 then retpay6=val1{i}; 72 else if dai1{i}=157 then retpay7=val1{i}; 73 else if dai1{i}=158 then retpay8=val1{i}; 74 else if dai1{i}=159 then retpay9=val1{i}; 75 else if dai1{i}=160 then othpart0=val1{i}; * other part 75 ! time payroll; 3 The SAS System 22:11 Sunday, May 14, 2006 76 else if dai1{i}=161 then othpart1=val1{i}; 77 else if dai1{i}=162 then othpart2=val1{i}; 78 else if dai1{i}=163 then othpart3=val1{i}; 79 else if dai1{i}=164 then othpart4=val1{i}; 80 else if dai1{i}=165 then othpart5=val1{i}; 81 else if dai1{i}=166 then othpart6=val1{i}; 82 else if dai1{i}=167 then othpart7=val1{i}; 83 else if dai1{i}=168 then othpart8=val1{i}; 84 else if dai1{i}=169 then othpart9=val1{i}; 85 else if dai1{i}=230 then pay3_0=val1{i}; * other 85 ! income; 86 else if dai1{i}=231 then pay3_1=val1{i}; 87 else if dai1{i}=232 then pay3_2=val1{i}; 88 else if dai1{i}=233 then pay3_3=val1{i}; 89 else if dai1{i}=234 then pay3_4=val1{i}; 90 else if dai1{i}=235 then pay3_5=val1{i}; 91 else if dai1{i}=236 then pay3_6=val1{i}; 92 else if dai1{i}=237 then pay3_7=val1{i}; 93 else if dai1{i}=238 then pay3_8=val1{i}; 94 else if dai1{i}=239 then pay3_9=val1{i}; 95 else if dai1{i}=110 then overtim0=val1{i}; * overtime 95 ! pay; 96 else if dai1{i}=111 then overtim1=val1{i}; 97 else if dai1{i}=112 then overtim2=val1{i}; 98 else if dai1{i}=113 then overtim3=val1{i}; 99 else if dai1{i}=114 then overtim4=val1{i}; 100 else if dai1{i}=115 then overtim5=val1{i}; 101 else if dai1{i}=116 then overtim6=val1{i}; 102 else if dai1{i}=117 then overtim7=val1{i}; 103 else if dai1{i}=118 then overtim8=val1{i}; 104 else if dai1{i}=119 then overtim9=val1{i}; 105 else if dai1{i}=120 then awards0=val1{i}; * awards; 106 else if dai1{i}=121 then awards1=val1{i}; 107 else if dai1{i}=122 then awards2=val1{i}; 108 else if dai1{i}=123 then awards3=val1{i}; 109 else if dai1{i}=124 then awards4=val1{i}; 110 else if dai1{i}=125 then awards5=val1{i}; 111 else if dai1{i}=126 then awards6=val1{i}; 112 else if dai1{i}=127 then awards7=val1{i}; 113 else if dai1{i}=128 then awards8=val1{i}; 114 else if dai1{i}=129 then awards9=val1{i}; 115 else if dai1{i}=130 then empins0=val1{i}; * insurance 115 ! by employers; 116 else if dai1{i}=131 then empins1=val1{i}; 117 else if dai1{i}=132 then empins2=val1{i}; 118 else if dai1{i}=133 then empins3=val1{i}; 119 else if dai1{i}=134 then empins4=val1{i}; 120 else if dai1{i}=135 then empins5=val1{i}; 121 else if dai1{i}=136 then empins6=val1{i}; 122 else if dai1{i}=137 then empins7=val1{i}; 123 else if dai1{i}=138 then empins8=val1{i}; 124 else if dai1{i}=139 then empins9=val1{i}; 125 else if dai1{i}=700 then einsnhi0=val1{i}; * 125 ! Insurance of NHI by employers; 126 else if dai1{i}=701 then einsnhi1=val1{i}; 127 else if dai1{i}=702 then einsnhi2=val1{i}; 128 else if dai1{i}=703 then einsnhi3=val1{i}; 129 else if dai1{i}=704 then einsnhi4=val1{i}; 4 The SAS System 22:11 Sunday, May 14, 2006 130 else if dai1{i}=705 then einsnhi5=val1{i}; 131 else if dai1{i}=706 then einsnhi6=val1{i}; 132 else if dai1{i}=707 then einsnhi7=val1{i}; 133 else if dai1{i}=708 then einsnhi8=val1{i}; 134 else if dai1{i}=709 then einsnhi9=val1{i}; 135 else if dai1{i}=140 then fringe0=val1{i}; * fringe 135 ! and death benefits; 136 else if dai1{i}=141 then fringe1=val1{i}; 137 else if dai1{i}=142 then fringe2=val1{i}; 138 else if dai1{i}=143 then fringe3=val1{i}; 139 else if dai1{i}=144 then fringe4=val1{i}; 140 else if dai1{i}=145 then fringe5=val1{i}; 141 else if dai1{i}=146 then fringe6=val1{i}; 142 else if dai1{i}=147 then fringe7=val1{i}; 143 else if dai1{i}=148 then fringe8=val1{i}; 144 else if dai1{i}=149 then fringe9=val1{i}; 145 else if dai1{i}=240 then owninc0=val1{i}; * earnings 145 ! from owned; 146 else if dai1{i}=241 then owninc1=val1{i}; * owniness; 147 else if dai1{i}=242 then owninc2=val1{i}; 148 else if dai1{i}=243 then owninc3=val1{i}; 149 else if dai1{i}=244 then owninc4=val1{i}; 150 else if dai1{i}=245 then owninc5=val1{i}; 151 else if dai1{i}=246 then owninc6=val1{i}; 152 else if dai1{i}=247 then owninc7=val1{i}; 153 else if dai1{i}=248 then owninc8=val1{i}; 154 else if dai1{i}=249 then owninc9=val1{i}; 155 else if dai1{i}=260 then agrinc0=val1{i}; * agr. & 155 ! livestock income; 156 else if dai1{i}=261 then agrinc1=val1{i}; 157 else if dai1{i}=262 then agrinc2=val1{i}; 158 else if dai1{i}=263 then agrinc3=val1{i}; 159 else if dai1{i}=264 then agrinc4=val1{i}; 160 else if dai1{i}=265 then agrinc5=val1{i}; 161 else if dai1{i}=266 then agrinc6=val1{i}; 162 else if dai1{i}=267 then agrinc7=val1{i}; 163 else if dai1{i}=268 then agrinc8=val1{i}; 164 else if dai1{i}=269 then agrinc9=val1{i}; 165 else if dai1{i}=270 then treeinc0=val1{i}; * net 165 ! forestry income; 166 else if dai1{i}=271 then treeinc1=val1{i}; 167 else if dai1{i}=272 then treeinc2=val1{i}; 168 else if dai1{i}=273 then treeinc3=val1{i}; 169 else if dai1{i}=274 then treeinc4=val1{i}; 170 else if dai1{i}=275 then treeinc5=val1{i}; 171 else if dai1{i}=276 then treeinc6=val1{i}; 172 else if dai1{i}=277 then treeinc7=val1{i}; 173 else if dai1{i}=278 then treeinc8=val1{i}; 174 else if dai1{i}=279 then treeinc9=val1{i}; 175 else if dai1{i}=280 then fishinc0=val1{i}; * net 175 ! fishing income; 176 else if dai1{i}=281 then fishinc1=val1{i}; 177 else if dai1{i}=282 then fishinc2=val1{i}; 178 else if dai1{i}=283 then fishinc3=val1{i}; 179 else if dai1{i}=284 then fishinc4=val1{i}; 180 else if dai1{i}=285 then fishinc5=val1{i}; 181 else if dai1{i}=286 then fishinc6=val1{i}; 182 else if dai1{i}=287 then fishinc7=val1{i}; 5 The SAS System 22:11 Sunday, May 14, 2006 183 else if dai1{i}=288 then fishinc8=val1{i}; 184 else if dai1{i}=289 then fishinc9=val1{i}; 185 else if dai1{i}=290 then businc0=val1{i}; * net income 185 ! from bus.; 186 else if dai1{i}=291 then businc1=val1{i}; 187 else if dai1{i}=292 then businc2=val1{i}; 188 else if dai1{i}=293 then businc3=val1{i}; 189 else if dai1{i}=294 then businc4=val1{i}; 190 else if dai1{i}=295 then businc5=val1{i}; 191 else if dai1{i}=296 then businc6=val1{i}; 192 else if dai1{i}=297 then businc7=val1{i}; 193 else if dai1{i}=298 then businc8=val1{i}; 194 else if dai1{i}=299 then businc9=val1{i}; 195 else if dai1{i}=320 then execinc0=val1{i}; * net income 195 ! from execu- ; 196 else if dai1{i}=321 then execinc1=val1{i}; * tive bus. 196 ! activity; 197 else if dai1{i}=322 then execinc2=val1{i}; 198 else if dai1{i}=323 then execinc3=val1{i}; 199 else if dai1{i}=324 then execinc4=val1{i}; 200 else if dai1{i}=325 then execinc5=val1{i}; 201 else if dai1{i}=326 then execinc6=val1{i}; 202 else if dai1{i}=327 then execinc7=val1{i}; 203 else if dai1{i}=328 then execinc8=val1{i}; 204 else if dai1{i}=329 then execinc9=val1{i}; 205 else if dai1{i}=330 then propinc0=val1{i}; * income from 205 ! property or; 206 else if dai1{i}=331 then propinc1=val1{i}; * capital; 207 else if dai1{i}=332 then propinc2=val1{i}; 208 else if dai1{i}=333 then propinc3=val1{i}; 209 else if dai1{i}=334 then propinc4=val1{i}; 210 else if dai1{i}=335 then propinc5=val1{i}; 211 else if dai1{i}=336 then propinc6=val1{i}; 212 else if dai1{i}=337 then propinc7=val1{i}; 213 else if dai1{i}=338 then propinc8=val1{i}; 214 else if dai1{i}=339 then propinc9=val1{i}; 215 else if dai1{i}=340 then intinc0=val1{i}; * interest 215 ! income; 216 else if dai1{i}=341 then intinc1=val1{i}; 217 else if dai1{i}=342 then intinc2=val1{i}; 218 else if dai1{i}=343 then intinc3=val1{i}; 219 else if dai1{i}=344 then intinc4=val1{i}; 220 else if dai1{i}=345 then intinc5=val1{i}; 221 else if dai1{i}=346 then intinc6=val1{i}; 222 else if dai1{i}=347 then intinc7=val1{i}; 223 else if dai1{i}=348 then intinc8=val1{i}; 224 else if dai1{i}=349 then intinc9=val1{i}; 225 else if dai1{i}=350 then invinc0=val1{i}; * investment 225 ! income; 226 else if dai1{i}=351 then invinc1=val1{i}; 227 else if dai1{i}=352 then invinc2=val1{i}; 228 else if dai1{i}=353 then invinc3=val1{i}; 229 else if dai1{i}=354 then invinc4=val1{i}; 230 else if dai1{i}=355 then invinc5=val1{i}; 231 else if dai1{i}=356 then invinc6=val1{i}; 232 else if dai1{i}=357 then invinc7=val1{i}; 233 else if dai1{i}=358 then invinc8=val1{i}; 234 else if dai1{i}=359 then invinc9=val1{i}; 6 The SAS System 22:11 Sunday, May 14, 2006 235 else if dai1{i}=360 then othprop0=val1{i}; * other prop 235 ! rental inc; 236 else if dai1{i}=361 then othprop1=val1{i}; 237 else if dai1{i}=362 then othprop2=val1{i}; 238 else if dai1{i}=363 then othprop3=val1{i}; 239 else if dai1{i}=364 then othprop4=val1{i}; 240 else if dai1{i}=365 then othprop5=val1{i}; 241 else if dai1{i}=366 then othprop6=val1{i}; 242 else if dai1{i}=367 then othprop7=val1{i}; 243 else if dai1{i}=368 then othprop8=val1{i}; 244 else if dai1{i}=369 then othprop9=val1{i}; 245 else if dai1{i}=390 then estrent0=val1{i}; * estimated 245 ! rent; 246 else if dai1{i}=391 then estrent1=val1{i}; 247 else if dai1{i}=392 then estrent2=val1{i}; 248 else if dai1{i}=393 then estrent3=val1{i}; 249 else if dai1{i}=394 then estrent4=val1{i}; 250 else if dai1{i}=395 then estrent5=val1{i}; 251 else if dai1{i}=396 then estrent6=val1{i}; 252 else if dai1{i}=397 then estrent7=val1{i}; 253 else if dai1{i}=398 then estrent8=val1{i}; 254 else if dai1{i}=399 then estrent9=val1{i}; 255 else if dai1{i}=410 then regtran0=val1{i}; * regular 255 ! transfer income; 256 else if dai1{i}=411 then regtran1=val1{i}; 257 else if dai1{i}=412 then regtran2=val1{i}; 258 else if dai1{i}=413 then regtran3=val1{i}; 259 else if dai1{i}=414 then regtran4=val1{i}; 260 else if dai1{i}=415 then regtran5=val1{i}; 261 else if dai1{i}=416 then regtran6=val1{i}; 262 else if dai1{i}=417 then regtran7=val1{i}; 263 else if dai1{i}=418 then regtran8=val1{i}; 264 else if dai1{i}=419 then regtran9=val1{i}; 265 else if dai1{i}=420 then pritran0=val1{i}; * private 265 ! transfer inc; 266 else if dai1{i}=421 then pritran1=val1{i}; 267 else if dai1{i}=422 then pritran2=val1{i}; 268 else if dai1{i}=423 then pritran3=val1{i}; 269 else if dai1{i}=424 then pritran4=val1{i}; 270 else if dai1{i}=425 then pritran5=val1{i}; 271 else if dai1{i}=426 then pritran6=val1{i}; 272 else if dai1{i}=427 then pritran7=val1{i}; 273 else if dai1{i}=428 then pritran8=val1{i}; 274 else if dai1{i}=429 then pritran9=val1{i}; 275 else if dai1{i}=430 then govtran0=val1{i}; * govt transfer 275 ! income; 276 else if dai1{i}=431 then govtran1=val1{i}; 277 else if dai1{i}=432 then govtran2=val1{i}; 278 else if dai1{i}=433 then govtran3=val1{i}; 279 else if dai1{i}=434 then govtran4=val1{i}; 280 else if dai1{i}=435 then govtran5=val1{i}; 281 else if dai1{i}=436 then govtran6=val1{i}; 282 else if dai1{i}=437 then govtran7=val1{i}; 283 else if dai1{i}=438 then govtran8=val1{i}; 284 else if dai1{i}=439 then govtran9=val1{i}; 285 else if dai1{i}=300 then lowtran0=val1{i}; * trans from 285 ! gov - low inc hhold; 286 else if dai1{i}=301 then lowtran1=val1{i}; 7 The SAS System 22:11 Sunday, May 14, 2006 287 else if dai1{i}=302 then lowtran2=val1{i}; 288 else if dai1{i}=303 then lowtran3=val1{i}; 289 else if dai1{i}=304 then lowtran4=val1{i}; 290 else if dai1{i}=305 then lowtran5=val1{i}; 291 else if dai1{i}=306 then lowtran6=val1{i}; 292 else if dai1{i}=307 then lowtran7=val1{i}; 293 else if dai1{i}=308 then lowtran8=val1{i}; 294 else if dai1{i}=309 then lowtran9=val1{i}; 295 else if dai1{i}=310 then oldtran0=val1{i}; * trans from 295 ! gov - old-age allow; 296 else if dai1{i}=311 then oldtran1=val1{i}; 297 else if dai1{i}=312 then oldtran2=val1{i}; 298 else if dai1{i}=313 then oldtran3=val1{i}; 299 else if dai1{i}=314 then oldtran4=val1{i}; 300 else if dai1{i}=315 then oldtran5=val1{i}; 301 else if dai1{i}=316 then oldtran6=val1{i}; 302 else if dai1{i}=317 then oldtran7=val1{i}; 303 else if dai1{i}=318 then oldtran8=val1{i}; 304 else if dai1{i}=319 then oldtran9=val1{i}; 305 else if dai1{i}=370 then frmtran0=val1{i}; * trans from 305 ! gov - old farmer annuity; 306 else if dai1{i}=371 then frmtran1=val1{i}; 307 else if dai1{i}=372 then frmtran2=val1{i}; 308 else if dai1{i}=373 then frmtran3=val1{i}; 309 else if dai1{i}=374 then frmtran4=val1{i}; 310 else if dai1{i}=375 then frmtran5=val1{i}; 311 else if dai1{i}=376 then frmtran6=val1{i}; 312 else if dai1{i}=377 then frmtran7=val1{i}; 313 else if dai1{i}=378 then frmtran8=val1{i}; 314 else if dai1{i}=379 then frmtran9=val1{i}; 315 else if dai1{i}=200 then govgei0=val1{i}; * Insurance of 315 ! GEI, LI, FHI, & SI by gov; 316 else if dai1{i}=201 then govgei1=val1{i}; 317 else if dai1{i}=202 then govgei2=val1{i}; 318 else if dai1{i}=203 then govgei3=val1{i}; 319 else if dai1{i}=204 then govgei4=val1{i}; 320 else if dai1{i}=205 then govgei5=val1{i}; 321 else if dai1{i}=206 then govgei6=val1{i}; 322 else if dai1{i}=207 then govgei7=val1{i}; 323 else if dai1{i}=208 then govgei8=val1{i}; 324 else if dai1{i}=209 then govgei9=val1{i}; 325 else if dai1{i}=950 then govnhi0=val1{i}; * Insurance of 325 ! NHI by govt; 326 else if dai1{i}=951 then govnhi1=val1{i}; 327 else if dai1{i}=952 then govnhi2=val1{i}; 328 else if dai1{i}=953 then govnhi3=val1{i}; 329 else if dai1{i}=954 then govnhi4=val1{i}; 330 else if dai1{i}=955 then govnhi5=val1{i}; 331 else if dai1{i}=956 then govnhi6=val1{i}; 332 else if dai1{i}=957 then govnhi7=val1{i}; 333 else if dai1{i}=958 then govnhi8=val1{i}; 334 else if dai1{i}=959 then govnhi9=val1{i}; 335 else if dai1{i}=380 then othtrng0=val1{i}; * trans from 335 ! gov - others; 336 else if dai1{i}=381 then othtrng1=val1{i}; 337 else if dai1{i}=382 then othtrng2=val1{i}; 338 else if dai1{i}=383 then othtrng3=val1{i}; 339 else if dai1{i}=384 then othtrng4=val1{i}; 8 The SAS System 22:11 Sunday, May 14, 2006 340 else if dai1{i}=385 then othtrng5=val1{i}; 341 else if dai1{i}=386 then othtrng6=val1{i}; 342 else if dai1{i}=387 then othtrng7=val1{i}; 343 else if dai1{i}=388 then othtrng8=val1{i}; 344 else if dai1{i}=389 then othtrng9=val1{i}; 345 else if dai1{i}=450 then benins0=val1{i}; * Benefit of 345 ! social insurance; 346 else if dai1{i}=451 then benins1=val1{i}; 347 else if dai1{i}=452 then benins2=val1{i}; 348 else if dai1{i}=453 then benins3=val1{i}; 349 else if dai1{i}=454 then benins4=val1{i}; 350 else if dai1{i}=455 then benins5=val1{i}; 351 else if dai1{i}=456 then benins6=val1{i}; 352 else if dai1{i}=457 then benins7=val1{i}; 353 else if dai1{i}=458 then benins8=val1{i}; 354 else if dai1{i}=459 then benins9=val1{i}; 355 else if dai1{i}=980 then bengei0=val1{i}; * Benefit of 355 ! GEI, LI, FHI, and SI; 356 else if dai1{i}=981 then bengei1=val1{i}; 357 else if dai1{i}=982 then bengei2=val1{i}; 358 else if dai1{i}=983 then bengei3=val1{i}; 359 else if dai1{i}=984 then bengei4=val1{i}; 360 else if dai1{i}=985 then bengei5=val1{i}; 361 else if dai1{i}=986 then bengei6=val1{i}; 362 else if dai1{i}=987 then bengei7=val1{i}; 363 else if dai1{i}=988 then bengei8=val1{i}; 364 else if dai1{i}=989 then bengei9=val1{i}; 365 else if dai1{i}=940 then bennhi0=val1{i}; * Benefit of NHI 365 ! ; 366 else if dai1{i}=941 then bennhi1=val1{i}; 367 else if dai1{i}=942 then bennhi2=val1{i}; 368 else if dai1{i}=943 then bennhi3=val1{i}; 369 else if dai1{i}=944 then bennhi4=val1{i}; 370 else if dai1{i}=945 then bennhi5=val1{i}; 371 else if dai1{i}=946 then bennhi6=val1{i}; 372 else if dai1{i}=947 then bennhi7=val1{i}; 373 else if dai1{i}=948 then bennhi8=val1{i}; 374 else if dai1{i}=949 then bennhi9=val1{i}; 375 * For ROC 80 cells 440-9 have been dropped, so 375 ! bustran0-9 376 should be all missing values ; 377 else if dai1{i}=440 then bustran0=val1{i}; * business 377 ! transfer inc; 378 else if dai1{i}=441 then bustran1=val1{i}; 379 else if dai1{i}=442 then bustran2=val1{i}; 380 else if dai1{i}=443 then bustran3=val1{i}; 381 else if dai1{i}=444 then bustran4=val1{i}; 382 else if dai1{i}=445 then bustran5=val1{i}; 383 else if dai1{i}=446 then bustran6=val1{i}; 384 else if dai1{i}=447 then bustran7=val1{i}; 385 else if dai1{i}=448 then bustran8=val1{i}; 386 else if dai1{i}=449 then bustran9=val1{i}; 387 else if dai1{i}=460 then lifeben0=val1{i}; *life insurance 387 ! benefit; 388 else if dai1{i}=461 then lifeben1=val1{i}; 389 else if dai1{i}=462 then lifeben2=val1{i}; 390 else if dai1{i}=463 then lifeben3=val1{i}; 391 else if dai1{i}=464 then lifeben4=val1{i}; 9 The SAS System 22:11 Sunday, May 14, 2006 392 else if dai1{i}=465 then lifeben5=val1{i}; 393 else if dai1{i}=466 then lifeben6=val1{i}; 394 else if dai1{i}=467 then lifeben7=val1{i}; 395 else if dai1{i}=468 then lifeben8=val1{i}; 396 else if dai1{i}=469 then lifeben9=val1{i}; 397 else if dai1{i}=470 then othtran0=val1{i}; * other 397 ! transfer income; 398 else if dai1{i}=471 then othtran1=val1{i}; 399 else if dai1{i}=472 then othtran2=val1{i}; 400 else if dai1{i}=473 then othtran3=val1{i}; 401 else if dai1{i}=474 then othtran4=val1{i}; 402 else if dai1{i}=475 then othtran5=val1{i}; 403 else if dai1{i}=476 then othtran6=val1{i}; 404 else if dai1{i}=477 then othtran7=val1{i}; 405 else if dai1{i}=478 then othtran8=val1{i}; 406 else if dai1{i}=479 then othtran9=val1{i}; 407 else if dai1{i}=480 then abrtran0=val1{i}; * trans inc 407 ! from abroad; 408 else if dai1{i}=481 then abrtran1=val1{i}; 409 else if dai1{i}=482 then abrtran2=val1{i}; 410 else if dai1{i}=483 then abrtran3=val1{i}; 411 else if dai1{i}=484 then abrtran4=val1{i}; 412 else if dai1{i}=485 then abrtran5=val1{i}; 413 else if dai1{i}=486 then abrtran6=val1{i}; 414 else if dai1{i}=487 then abrtran7=val1{i}; 415 else if dai1{i}=488 then abrtran8=val1{i}; 416 else if dai1{i}=489 then abrtran9=val1{i}; 417 else if dai1{i}=490 then miscinc0=val1{i}; * misc 417 ! income; 418 else if dai1{i}=491 then miscinc1=val1{i}; 419 else if dai1{i}=492 then miscinc2=val1{i}; 420 else if dai1{i}=493 then miscinc3=val1{i}; 421 else if dai1{i}=494 then miscinc4=val1{i}; 422 else if dai1{i}=495 then miscinc5=val1{i}; 423 else if dai1{i}=496 then miscinc6=val1{i}; 424 else if dai1{i}=497 then miscinc7=val1{i}; 425 else if dai1{i}=498 then miscinc8=val1{i}; 426 else if dai1{i}=499 then miscinc9=val1{i}; 427 else if dai1{i}=600 then totexp0=val1{i}; * total 427 ! nonconsumption expenditure; 428 else if dai1{i}=601 then totexp1=val1{i}; 429 else if dai1{i}=602 then totexp2=val1{i}; 430 else if dai1{i}=603 then totexp3=val1{i}; 431 else if dai1{i}=604 then totexp4=val1{i}; 432 else if dai1{i}=605 then totexp5=val1{i}; 433 else if dai1{i}=606 then totexp6=val1{i}; 434 else if dai1{i}=607 then totexp7=val1{i}; 435 else if dai1{i}=608 then totexp8=val1{i}; 436 else if dai1{i}=609 then totexp9=val1{i}; 437 * For ROC 80 cells 530-9 have been dropped, so 437 ! propexp0-9 438 should be all missing values ; 439 else if dai1{i}=540 then intexp0=val1{i}; * interest 439 ! expenditure; 440 else if dai1{i}=541 then intexp1=val1{i}; 441 else if dai1{i}=542 then intexp2=val1{i}; 442 else if dai1{i}=543 then intexp3=val1{i}; 443 else if dai1{i}=544 then intexp4=val1{i}; 10 The SAS System 22:11 Sunday, May 14, 2006 444 else if dai1{i}=545 then intexp5=val1{i}; 445 else if dai1{i}=546 then intexp6=val1{i}; 446 else if dai1{i}=547 then intexp7=val1{i}; 447 else if dai1{i}=548 then intexp8=val1{i}; 448 else if dai1{i}=549 then intexp9=val1{i}; 449 else if dai1{i}=510 then hosloan0=val1{i}; * interest 449 ! exp - house loan; 450 else if dai1{i}=511 then hosloan1=val1{i}; 451 else if dai1{i}=512 then hosloan2=val1{i}; 452 else if dai1{i}=513 then hosloan3=val1{i}; 453 else if dai1{i}=514 then hosloan4=val1{i}; 454 else if dai1{i}=515 then hosloan5=val1{i}; 455 else if dai1{i}=516 then hosloan6=val1{i}; 456 else if dai1{i}=517 then hosloan7=val1{i}; 457 else if dai1{i}=518 then hosloan8=val1{i}; 458 else if dai1{i}=519 then hosloan9=val1{i}; 459 else if dai1{i}=520 then othloan0=val1{i}; * interest 459 ! exp - Others; 460 else if dai1{i}=521 then othloan1=val1{i}; 461 else if dai1{i}=522 then othloan2=val1{i}; 462 else if dai1{i}=523 then othloan3=val1{i}; 463 else if dai1{i}=524 then othloan4=val1{i}; 464 else if dai1{i}=525 then othloan5=val1{i}; 465 else if dai1{i}=526 then othloan6=val1{i}; 466 else if dai1{i}=527 then othloan7=val1{i}; 467 else if dai1{i}=528 then othloan8=val1{i}; 468 else if dai1{i}=529 then othloan9=val1{i}; 469 else if dai1{i}=560 then regtpay0=val1{i}; * regular 469 ! trans/payments; 470 else if dai1{i}=561 then regtpay1=val1{i}; 471 else if dai1{i}=562 then regtpay2=val1{i}; 472 else if dai1{i}=563 then regtpay3=val1{i}; 473 else if dai1{i}=564 then regtpay4=val1{i}; 474 else if dai1{i}=565 then regtpay5=val1{i}; 475 else if dai1{i}=566 then regtpay6=val1{i}; 476 else if dai1{i}=567 then regtpay7=val1{i}; 477 else if dai1{i}=568 then regtpay8=val1{i}; 478 else if dai1{i}=569 then regtpay9=val1{i}; 479 else if dai1{i}=570 then pritpay0=val1{i}; * trans to 479 ! individuals; 480 else if dai1{i}=571 then pritpay1=val1{i}; 481 else if dai1{i}=572 then pritpay2=val1{i}; 482 else if dai1{i}=573 then pritpay3=val1{i}; 483 else if dai1{i}=574 then pritpay4=val1{i}; 484 else if dai1{i}=575 then pritpay5=val1{i}; 485 else if dai1{i}=576 then pritpay6=val1{i}; 486 else if dai1{i}=577 then pritpay7=val1{i}; 487 else if dai1{i}=578 then pritpay8=val1{i}; 488 else if dai1{i}=579 then pritpay9=val1{i}; 489 else if dai1{i}=550 then pritmar0=val1{i}; * trans to 489 ! individuals - mar and fun; 490 else if dai1{i}=551 then pritmar1=val1{i}; 491 else if dai1{i}=552 then pritmar2=val1{i}; 492 else if dai1{i}=553 then pritmar3=val1{i}; 493 else if dai1{i}=554 then pritmar4=val1{i}; 494 else if dai1{i}=555 then pritmar5=val1{i}; 495 else if dai1{i}=556 then pritmar6=val1{i}; 496 else if dai1{i}=557 then pritmar7=val1{i}; 11 The SAS System 22:11 Sunday, May 14, 2006 497 else if dai1{i}=558 then pritmar8=val1{i}; 498 else if dai1{i}=559 then pritmar9=val1{i}; 499 else if dai1{i}=170 then pritchr0=val1{i}; * trans to 499 ! individuals - charities; 500 else if dai1{i}=171 then pritchr1=val1{i}; 501 else if dai1{i}=172 then pritchr2=val1{i}; 502 else if dai1{i}=173 then pritchr3=val1{i}; 503 else if dai1{i}=174 then pritchr4=val1{i}; 504 else if dai1{i}=175 then pritchr5=val1{i}; 505 else if dai1{i}=176 then pritchr6=val1{i}; 506 else if dai1{i}=177 then pritchr7=val1{i}; 507 else if dai1{i}=178 then pritchr8=val1{i}; 508 else if dai1{i}=179 then pritchr9=val1{i}; 509 else if dai1{i}=180 then pritoth0=val1{i}; * trans to 509 ! individuals - others; 510 else if dai1{i}=181 then pritoth1=val1{i}; 511 else if dai1{i}=182 then pritoth2=val1{i}; 512 else if dai1{i}=183 then pritoth3=val1{i}; 513 else if dai1{i}=184 then pritoth4=val1{i}; 514 else if dai1{i}=185 then pritoth5=val1{i}; 515 else if dai1{i}=186 then pritoth6=val1{i}; 516 else if dai1{i}=187 then pritoth7=val1{i}; 517 else if dai1{i}=188 then pritoth8=val1{i}; 518 else if dai1{i}=189 then pritoth9=val1{i}; 519 * For ROC 80 cells 580-9 have been dropped, so 519 ! govtpay0-9 520 should be all missing values ; 521 else if dai1{i}=580 then govtpay0=val1{i}; * payments 521 ! to govt; 522 else if dai1{i}=581 then govtpay1=val1{i}; 523 else if dai1{i}=582 then govtpay2=val1{i}; 524 else if dai1{i}=583 then govtpay3=val1{i}; 525 else if dai1{i}=584 then govtpay4=val1{i}; 526 else if dai1{i}=585 then govtpay5=val1{i}; 527 else if dai1{i}=586 then govtpay6=val1{i}; 528 else if dai1{i}=587 then govtpay7=val1{i}; 529 else if dai1{i}=588 then govtpay8=val1{i}; 530 else if dai1{i}=589 then govtpay9=val1{i}; 531 else if dai1{i}=590 then proptax0=val1{i}; * 531 ! building/land tax; 532 else if dai1{i}=591 then proptax1=val1{i}; 533 else if dai1{i}=592 then proptax2=val1{i}; 534 else if dai1{i}=593 then proptax3=val1{i}; 535 else if dai1{i}=594 then proptax4=val1{i}; 536 else if dai1{i}=595 then proptax5=val1{i}; 537 else if dai1{i}=596 then proptax6=val1{i}; 538 else if dai1{i}=597 then proptax7=val1{i}; 539 else if dai1{i}=598 then proptax8=val1{i}; 540 else if dai1{i}=599 then proptax9=val1{i}; 541 else if dai1{i}=610 then inctax0=val1{i}; * consolidated 541 ! income tax; 542 else if dai1{i}=611 then inctax1=val1{i}; 543 else if dai1{i}=612 then inctax2=val1{i}; 544 else if dai1{i}=613 then inctax3=val1{i}; 545 else if dai1{i}=614 then inctax4=val1{i}; 546 else if dai1{i}=615 then inctax5=val1{i}; 547 else if dai1{i}=616 then inctax6=val1{i}; 548 else if dai1{i}=617 then inctax7=val1{i}; 12 The SAS System 22:11 Sunday, May 14, 2006 549 else if dai1{i}=618 then inctax8=val1{i}; 550 else if dai1{i}=619 then inctax9=val1{i}; 551 else if dai1{i}=620 then othtax0=val1{i}; * other 551 ! direct taxes; 552 else if dai1{i}=621 then othtax1=val1{i}; 553 else if dai1{i}=622 then othtax2=val1{i}; 554 else if dai1{i}=623 then othtax3=val1{i}; 555 else if dai1{i}=624 then othtax4=val1{i}; 556 else if dai1{i}=625 then othtax5=val1{i}; 557 else if dai1{i}=626 then othtax6=val1{i}; 558 else if dai1{i}=627 then othtax7=val1{i}; 559 else if dai1{i}=628 then othtax8=val1{i}; 560 else if dai1{i}=629 then othtax9=val1{i}; 561 else if dai1{i}=630 then othpayg0=val1{i}; * other 561 ! payments to; 562 else if dai1{i}=631 then othpayg1=val1{i}; * the 562 ! government; 563 else if dai1{i}=632 then othpayg2=val1{i}; 564 else if dai1{i}=633 then othpayg3=val1{i}; 565 else if dai1{i}=634 then othpayg4=val1{i}; 566 else if dai1{i}=635 then othpayg5=val1{i}; 567 else if dai1{i}=636 then othpayg6=val1{i}; 568 else if dai1{i}=637 then othpayg7=val1{i}; 569 else if dai1{i}=638 then othpayg8=val1{i}; 570 else if dai1{i}=639 then othpayg9=val1{i}; 571 * For ROC 80 cells 640-9 have been dropped, so buspay0-9 571 ! should 572 be all missing values ; 573 else if dai1{i}=640 then buspay0=val1{i}; * payments to 573 ! enterprises; 574 else if dai1{i}=641 then buspay1=val1{i}; 575 else if dai1{i}=642 then buspay2=val1{i}; 576 else if dai1{i}=643 then buspay3=val1{i}; 577 else if dai1{i}=644 then buspay4=val1{i}; 578 else if dai1{i}=645 then buspay5=val1{i}; 579 else if dai1{i}=646 then buspay6=val1{i}; 580 else if dai1{i}=647 then buspay7=val1{i}; 581 else if dai1{i}=648 then buspay8=val1{i}; 582 else if dai1{i}=649 then buspay9=val1{i}; 583 else if dai1{i}=650 then pgeiins0=val1{i}; * 583 ! expenditure on GEI; 584 else if dai1{i}=651 then pgeiins1=val1{i}; 585 else if dai1{i}=652 then pgeiins2=val1{i}; 586 else if dai1{i}=653 then pgeiins3=val1{i}; 587 else if dai1{i}=654 then pgeiins4=val1{i}; 588 else if dai1{i}=655 then pgeiins5=val1{i}; 589 else if dai1{i}=656 then pgeiins6=val1{i}; 590 else if dai1{i}=657 then pgeiins7=val1{i}; 591 else if dai1{i}=658 then pgeiins8=val1{i}; 592 else if dai1{i}=659 then pgeiins9=val1{i}; 593 else if dai1{i}=660 then pliins0=val1{i}; * expenditure o 593 ! LI; 594 else if dai1{i}=661 then pliins1=val1{i}; 595 else if dai1{i}=662 then pliins2=val1{i}; 596 else if dai1{i}=663 then pliins3=val1{i}; 597 else if dai1{i}=664 then pliins4=val1{i}; 598 else if dai1{i}=665 then pliins5=val1{i}; 599 else if dai1{i}=666 then pliins6=val1{i}; 13 The SAS System 22:11 Sunday, May 14, 2006 600 else if dai1{i}=667 then pliins7=val1{i}; 601 else if dai1{i}=668 then pliins8=val1{i}; 602 else if dai1{i}=669 then pliins9=val1{i}; 603 else if dai1{i}=670 then farmins0=val1{i}; * expenditure 603 ! on farmer's health ins; 604 else if dai1{i}=671 then farmins1=val1{i}; 605 else if dai1{i}=672 then farmins2=val1{i}; 606 else if dai1{i}=673 then farmins3=val1{i}; 607 else if dai1{i}=674 then farmins4=val1{i}; 608 else if dai1{i}=675 then farmins5=val1{i}; 609 else if dai1{i}=676 then farmins6=val1{i}; WARNING: The quoted string currently being processed has become more than 262 characters long. You may have unbalanced quotation marks. 603 else if dai1{i}=670 then farmins0=val1{i}; * expenditure 603 ! on farmer's health ins; _______________ 49 NOTE 49-169: The meaning of an identifier after a quoted string may change in a future SAS release. Inserting white space between a quoted string and the succeeding identifier is recommended. 610 else if dai1{i}=677 then farmins7=val1{i}; 611 else if dai1{i}=678 then farmins8=val1{i}; 612 else if dai1{i}=679 then farmins9=val1{i}; 613 else if dai1{i}=850 then fishins0=val1{i}; * expenditure 613 ! on fisherman's health ins; 614 else if dai1{i}=851 then fishins1=val1{i}; 615 else if dai1{i}=852 then fishins2=val1{i}; 616 else if dai1{i}=853 then fishins3=val1{i}; 617 else if dai1{i}=854 then fishins4=val1{i}; 618 else if dai1{i}=855 then fishins5=val1{i}; 619 else if dai1{i}=856 then fishins6=val1{i}; 620 else if dai1{i}=857 then fishins7=val1{i}; 621 else if dai1{i}=858 then fishins8=val1{i}; 622 else if dai1{i}=859 then fishins9=val1{i}; 623 else if dai1{i}=860 then psiins0=val1{i}; * expenditure 623 ! on SI; 624 else if dai1{i}=861 then psiins1=val1{i}; 625 else if dai1{i}=862 then psiins2=val1{i}; 626 else if dai1{i}=863 then psiins3=val1{i}; 627 else if dai1{i}=864 then psiins4=val1{i}; 628 else if dai1{i}=865 then psiins5=val1{i}; 629 else if dai1{i}=866 then psiins6=val1{i}; 630 else if dai1{i}=867 then psiins7=val1{i}; 631 else if dai1{i}=868 then psiins8=val1{i}; 632 else if dai1{i}=869 then psiins9=val1{i}; 633 else if dai1{i}=680 then pnhiins0=val1{i}; * expenditure 633 ! on NHI; 634 else if dai1{i}=681 then pnhiins1=val1{i}; 635 else if dai1{i}=682 then pnhiins2=val1{i}; 636 else if dai1{i}=683 then pnhiins3=val1{i}; 637 else if dai1{i}=684 then pnhiins4=val1{i}; 638 else if dai1{i}=685 then pnhiins5=val1{i}; 639 else if dai1{i}=686 then pnhiins6=val1{i}; 640 else if dai1{i}=687 then pnhiins7=val1{i}; 641 else if dai1{i}=688 then pnhiins8=val1{i}; 14 The SAS System 22:11 Sunday, May 14, 2006 642 else if dai1{i}=689 then pnhiins9=val1{i}; 643 else if dai1{i}=690 then abrpay0=val1{i}; * payments 643 ! abroad; 644 else if dai1{i}=691 then abrpay1=val1{i}; 645 else if dai1{i}=692 then abrpay2=val1{i}; 646 else if dai1{i}=693 then abrpay3=val1{i}; 647 else if dai1{i}=694 then abrpay4=val1{i}; 648 else if dai1{i}=695 then abrpay5=val1{i}; 649 else if dai1{i}=696 then abrpay6=val1{i}; 650 else if dai1{i}=697 then abrpay7=val1{i}; 651 else if dai1{i}=698 then abrpay8=val1{i}; 652 else if dai1{i}=699 then abrpay9=val1{i}; 653 * consumption expenditure; 654 else if dai1{i}=800 then totcons=val1{i}; * total cons 654 ! expenditure; 655 else if dai1{i}=710 then foodstuf=val1{i}; * total 655 ! foodstuffs; 656 else if dai1{i}=711 then primary=val1{i}; * primary 656 ! foodstuffs; 657 else if dai1{i}=723 then milk=val1{i}; * milk; 658 else if dai1{i}=724 then fruits=val1{i}; * fruits; 659 else if dai1{i}=725 then othfood=val1{i}; * other 659 ! foodstuffs; 660 else if dai1{i}=726 then giftexp=val1{i}; * exp on gifts; 660 ! 661 else if dai1{i}=727 then boardexp=val1{i}; * exp on 661 ! board; 662 else if dai1{i}=730 then totdrink=val1{i}; * total drink 662 ! expenditure; 663 else if dai1{i}=731 then nonalcoh=val1{i}; * 663 ! nonalcoholic drinks; 664 else if dai1{i}=732 then alcohol=val1{i}; * alcoholoic 664 ! drinks; 665 else if dai1{i}=740 then tobacco=val1{i}; * tobacco; 666 else if dai1{i}=750 then clotfoot=val1{i}; * total exp on 666 ! clothing and footware; 667 else if dai1{i}=751 then clothing=val1{i}; * clothing; 668 else if dai1{i}=756 then shoes=val1{i}; * footware; 669 else if dai1{i}=760 then totrent=val1{i}; * total rent & 669 ! water exp; 670 else if dai1{i}=761 then actrent=val1{i}; * actual rent 670 ! payments; 671 else if dai1{i}=762 then estown=val1{i}; * imputed rent - 671 ! own home; 672 else if dai1{i}=763 then estalloc=val1{i}; * imputed: 672 ! allocated home; 673 else if dai1{i}=764 then upkeep=val1{i}; * bldg 673 ! upkeep/repair exp; 674 else if dai1{i}=765 then waterexp=val1{i}; * water exp 674 ! nonbusiness; 675 else if dai1{i}=766 then hholdprm=val1{i}; * Household 675 ! premiums; 676 else if dai1{i}=770 then totfuel=val1{i}; * total 676 ! fuel/lighting exp; 677 else if dai1{i}=771 then electric=val1{i}; * 677 ! electricity; 678 else if dai1{i}=775 then gasfuel=val1{i}; * gaseous 678 ! fuels; 15 The SAS System 22:11 Sunday, May 14, 2006 679 else if dai1{i}=777 then othfuel=val1{i}; * others 679 ! fuel; 680 else if dai1{i}=780 then totappl=val1{i}; * furniture & 680 ! appliances; 681 else if dai1{i}=781 then furnitur=val1{i}; * furniture; 681 ! 682 else if dai1{i}=782 then textile=val1{i}; * textile 682 ! furnishing; 683 else if dai1{i}=783 then durables=val1{i}; * durable 683 ! goods; 684 else if dai1{i}=784 then othappl=val1{i}; * other furn 684 ! & appl; 685 else if dai1{i}=790 then tothkeep=val1{i}; * total 685 ! housekeeping exp; 686 else if dai1{i}=791 then hhlabor=val1{i}; * hired hh 686 ! labor/help; 687 else if dai1{i}=792 then hhservic=val1{i}; * services 687 ! for the hh; 688 else if dai1{i}=793 then othhkeep=val1{i}; * other 688 ! housekeeping exp; 689 else if dai1{i}=810 then tothealt=val1{i}; * total 689 ! health exp; 690 else if dai1{i}=811 then medequip=val1{i}; * medical 690 ! equipment, etc; 691 else if dai1{i}=812 then inoutins=val1{i}; * 691 ! in-/outpatient 692 treatment & health 692 ! insurance; 693 else if dai1{i}=813 then medicine=val1{i}; * medical 693 ! article; 694 else if dai1{i}=814 then medprem=val1{i}; * pers 694 ! accident & med prem; 695 else if dai1{i}=816 then mednhi=val1{i}; * Medical 695 ! consumption of NHI; 696 else if dai1{i}=820 then totcomm=val1{i}; * total exp on 696 ! transpor- 697 tation, communication, & 697 ! correspondence; 698 else if dai1{i}=821 then equippur=val1{i}; * purchase of 698 ! trans. & 699 comm equipment for personal use; 700 else if dai1{i}=822 then equiprun=val1{i}; * 700 ! running/maintenance of 701 personal use transport equipment; 701 ! 702 else if dai1{i}=823 then transuse=val1{i}; * exp for using 702 ! transport; 703 else if dai1{i}=824 then othcomm=val1{i}; * other 703 ! communic. expend; 704 else if dai1{i}=825 then motprem=val1{i}; * motor vehicle 704 ! premiums; 705 else if dai1{i}=830 then totrecr=val1{i}; * total exp on 705 ! recreation 706 education 706 ! and culture; 707 else if dai1{i}=831 then travexp=val1{i}; * 707 ! travel/vacation exp; 708 else if dai1{i}=832 then recrexp=val1{i}; * 16 The SAS System 22:11 Sunday, May 14, 2006 708 ! entertainment/recr exp; 709 else if dai1{i}=833 then bookexp=val1{i}; * books, 709 ! newspapers, etc; 710 else if dai1{i}=834 then recequip=val1{i}; * recreation 710 ! equipment; 711 else if dai1{i}=835 then school=val1{i}; * educ, 711 ! culture, research; 712 else if dai1{i}=840 then miscexp=val1{i}; * total exp 712 ! misc. items; 713 else if dai1{i}=841 then othserv=val1{i}; * other 713 ! commod/services; 714 else if dai1{i}=842 then finserv=val1{i}; * financial 714 ! services; 715 else if dai1{i}=843 then hygiene=val1{i}; * personal 715 ! upkeep/hygiene; 716 else if dai1{i}=844 then hairexp=val1{i}; * 716 ! hairstyling/bathing exp; 717 else if dai1{i}=845 then foodhall=val1{i}; * food, 717 ! beverage & tobacco 718 in 718 ! restaurant, ballroom; 719 else if dai1{i}=846 then nonfmarr=val1{i}; * gifts (food 719 ! exclusive); 720 else if dai1{i}=847 then othmisc=val1{i}; * other misc 720 ! exp; 721 else if dai1{i}=848 then nonsprem=val1{i}; * other 721 ! non-saving premiums; 722 * capital loss/profit and fixed assets; 723 else if dai1{i}=806 then cap_gain=val1{i}; * capital 723 ! gain; 724 else if dai1{i}=807 then cap_loss=val1{i}; * capital 724 ! loss; 725 else if dai1{i}=808 then captrec=val1{i}; * capital 725 ! trasfers received; 726 else if dai1{i}=809 then captpaid=val1{i}; * capital 726 ! transfers paid; 727 END; 728 729 PROC CONTENTS; 730 731 PROC DATASETS library=zh; 732 DELETE data&q; 733 RUN; 734 %mend; 735 736 %one(99); NOTE: There were 13801 observations read from the data set ZH.DATA99. NOTE: The data set ZH.NEW99 has 13801 observations and 1227 variables. NOTE: DATA statement used (Total process time): real time 23:16.86 cpu time 14:00.71 NOTE: The PROCEDURE CONTENTS printed pages 1-25. NOTE: PROCEDURE CONTENTS used (Total process time): real time 0.31 seconds 17 The SAS System 22:11 Sunday, May 14, 2006 cpu time 0.19 seconds Directory Libref ZH Engine V9 Physical Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata File Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata Inode Number 786432 Access Permission rwxrwxr-x Owner Name ebenstei File Size (bytes) 1024 Member # Name Type File Size Last Modified 1 DATA00 DATA 90644480 14May06:22:02:56 2 DATA01 DATA 89333760 14May06:22:05:51 3 DATA02 DATA 89858048 14May06:22:08:56 4 DATA03 DATA 81666048 14May06:22:11:47 5 DATA99 DATA 100671488 14May06:21:59:56 6 NEW99 DATA 113254400 14May06:22:35:07 NOTE: Deleting ZH.DATA99 (memtype=DATA). 737 %one(00); NOTE: PROCEDURE DATASETS used (Total process time): real time 0.15 seconds cpu time 0.02 seconds NOTE: There were 13801 observations read from the data set ZH.DATA00. NOTE: The data set ZH.NEW00 has 13801 observations and 1103 variables. NOTE: DATA statement used (Total process time): real time 22:54.48 cpu time 14:03.95 NOTE: The PROCEDURE CONTENTS printed pages 26-48. NOTE: PROCEDURE CONTENTS used (Total process time): real time 0.12 seconds cpu time 0.07 seconds Directory Libref ZH Engine V9 Physical Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata File Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata Inode Number 786432 Access Permission rwxrwxr-x Owner Name ebenstei File Size (bytes) 1024 18 The SAS System 22:11 Sunday, May 14, 2006 Member # Name Type File Size Last Modified 1 DATA00 DATA 90644480 14May06:22:02:56 2 DATA01 DATA 89333760 14May06:22:05:51 3 DATA02 DATA 89858048 14May06:22:08:56 4 DATA03 DATA 81666048 14May06:22:11:47 5 NEW00 DATA 100671488 14May06:22:58:02 6 NEW99 DATA 113254400 14May06:22:35:07 NOTE: Deleting ZH.DATA00 (memtype=DATA). 738 %one(01); NOTE: PROCEDURE DATASETS used (Total process time): real time 0.18 seconds cpu time 0.02 seconds NOTE: There were 13601 observations read from the data set ZH.DATA01. NOTE: The data set ZH.NEW01 has 13601 observations and 1165 variables. NOTE: DATA statement used (Total process time): real time 22:22.52 cpu time 13:52.58 NOTE: The PROCEDURE CONTENTS printed pages 49-72. NOTE: PROCEDURE CONTENTS used (Total process time): real time 0.11 seconds cpu time 0.08 seconds Directory Libref ZH Engine V9 Physical Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata File Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata Inode Number 786432 Access Permission rwxrwxr-x Owner Name ebenstei File Size (bytes) 1024 Member # Name Type File Size Last Modified 1 DATA01 DATA 89333760 14May06:22:05:51 2 DATA02 DATA 89858048 14May06:22:08:56 3 DATA03 DATA 81666048 14May06:22:11:47 4 NEW00 DATA 100671488 14May06:22:58:02 5 NEW01 DATA 99229696 14May06:23:20:25 6 NEW99 DATA 113254400 14May06:22:35:07 NOTE: Deleting ZH.DATA01 (memtype=DATA). 739 %one(02); NOTE: PROCEDURE DATASETS used (Total process time): 19 The SAS System 22:11 Sunday, May 14, 2006 real time 0.15 seconds cpu time 0.04 seconds NOTE: There were 13681 observations read from the data set ZH.DATA02. NOTE: The data set ZH.NEW02 has 13681 observations and 1171 variables. NOTE: DATA statement used (Total process time): real time 14:54.94 cpu time 13:54.64 NOTE: The PROCEDURE CONTENTS printed pages 73-96. NOTE: PROCEDURE CONTENTS used (Total process time): real time 0.11 seconds cpu time 0.10 seconds Directory Libref ZH Engine V9 Physical Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata File Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata Inode Number 786432 Access Permission rwxrwxr-x Owner Name ebenstei File Size (bytes) 1024 Member # Name Type File Size Last Modified 1 DATA02 DATA 89858048 14May06:22:08:56 2 DATA03 DATA 81666048 14May06:22:11:47 3 NEW00 DATA 100671488 14May06:22:58:02 4 NEW01 DATA 99229696 14May06:23:20:25 5 NEW02 DATA 99819520 14May06:23:35:20 6 NEW99 DATA 113254400 14May06:22:35:07 NOTE: Deleting ZH.DATA02 (memtype=DATA). 740 %one(03); NOTE: PROCEDURE DATASETS used (Total process time): real time 0.16 seconds cpu time 0.01 seconds NOTE: There were 13681 observations read from the data set ZH.DATA03. NOTE: The data set ZH.NEW03 has 13681 observations and 1063 variables. NOTE: DATA statement used (Total process time): real time 15:26.90 cpu time 15:18.66 NOTE: The PROCEDURE CONTENTS printed pages 97-118. NOTE: PROCEDURE CONTENTS used (Total process time): 20 The SAS System 22:11 Sunday, May 14, 2006 real time 0.12 seconds cpu time 0.07 seconds Directory Libref ZH Engine V9 Physical Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata File Name /home/brass/hdir0/ebenstei/taiwan/fies/sasdata Inode Number 786432 Access Permission rwxrwxr-x Owner Name ebenstei File Size (bytes) 1024 Member # Name Type File Size Last Modified 1 DATA03 DATA 81666048 14May06:22:11:47 2 NEW00 DATA 100671488 14May06:22:58:02 3 NEW01 DATA 99229696 14May06:23:20:25 4 NEW02 DATA 99819520 14May06:23:35:20 5 NEW03 DATA 89858048 14May06:23:50:47 6 NEW99 DATA 113254400 14May06:22:35:07 NOTE: Deleting ZH.DATA03 (memtype=DATA). 741 742 743 744 NOTE: PROCEDURE DATASETS used (Total process time): real time 0.14 seconds cpu time 0.01 seconds NOTE: SAS Institute Inc., SAS Campus Drive, Cary, NC USA 27513-2414 NOTE: The SAS System used: real time 1:38:57.97 cpu time 1:11:11.41