*read_pps910.sas; /****************************************************************** READ_PPS910.SAS - file to read raw PPS9 (1992), PPS10 (1993), data files. Please report any problems or errors to jroth@nber.org NOTE: This program is distributed under the GNU GPL. See http://www.gnu.org/licenses/ for details. Copyright 2004 shared by the National Bureau of Economic Research and Jean Roth This is the third version of this file: V3. Jean Roth jroth@nber.org modified V2 8/23/01 to read in all the variables V2. Jean Roth jroth@nber.org modified V1 to read in numeric s370fzd variables V1. Julie Lee (?) read in many character ebcdic variables, but did not read numeric s370fzd variables correctly ********************************************************************/ *libname out '/homes/nber/jroth/pps/'; libname out '/disk/usr106/pps/data/sas'; *filename pps9 pipe 'zcat /disk/usr106/pps/data/raw/ppmin09.ebcdic.Z'; ** 9 is 1992 ; filename pps9 pipe 'zcat /disk/usr106/pps/data/raw/ppmin10.ebcdic.Z'; ** 10 is 1993 ; *option obs = 6; options ls=75; data out.pps93; infile pps9 blksize=20610 recfm=f lrecl=6870 missover; input @1 F1 $ebcdic6. @7 F2 $ebcdic6. @13 F3 $ebcdic6. @19 F4 $ebcdic6. @25 F5 $ebcdic6. @31 F6 $ebcdic6. @37 F7 $ebcdic6. @43 F8 $ebcdic6. @49 F9 $ebcdic6. @55 F10 $ebcdic6. @61 F11 $ebcdic6. @67 F12 $ebcdic6. @73 F13 $ebcdic6. @79 F14 $ebcdic6. @85 F15 $ebcdic6. @91 F16 $ebcdic36. @127 MAN $ebcdic1. @128 F17 $ebcdic1. @129 F18 $ebcdic1. @130 F19 $ebcdic1. @131 F20 $ebcdic1. @132 F21 $ebcdic1. @133 F22 $ebcdic1. @134 F23 $ebcdic5. @139 F24 $ebcdic5. @144 F25 $ebcdic2. @146 F26 $ebcdic2. @148 F27 $ebcdic1. @149 F27A $ebcdic1. @150 F27B $ebcdic1. @151 F27C $ebcdic1. @152 F27D $ebcdic1. @153 F27E $ebcdic1. @154 F27F $ebcdic1. @155 F27G $ebcdic10. @165 F28 $ebcdic1. @166 F29 s370fzd6. @172 F30 s370fzd6. @178 F31 $ebcdic5. @183 F31A $ebcdic5. @188 F32 $ebcdic2. @190 F33 $ebcdic4. @194 F34 $ebcdic5. @199 F35 $ebcdic1. @200 F36 $ebcdic1. @201 F37 $ebcdic1. @202 F38 $ebcdic1. @203 F39 $ebcdic2. @205 F40 s370fzd11. @216 F41 s370fzd11. @227 F42 s370fzd11. @238 F43 s370fzd11. @249 F44 s370fzd11. @260 F45 s370fzd11. @271 F46 s370fzd11. @282 F47 s370fzd11. @293 F48 s370fzd11. @304 F49 s370fzd11. @315 F50 s370fzd11. @326 F51 s370fzd11. @337 F52 s370fzd11. @348 F53 s370fzd11. @359 F54 s370fzd11. @370 F55 s370fzd11. @381 F56 s370fzd11. @392 F57 s370fzd11. @403 F58 s370fzd11. @414 F59 s370fzd11. @425 F60 s370fzd11. @436 F61 s370fzd11. @447 F62 s370fzd11. @458 F63 s370fzd11. @469 F64 s370fzd11. @480 F65 s370fzd11. @491 F66 s370fzd11. @502 F67 s370fzd11. @513 F68 s370fzd11. @524 F69 s370fzd11. @535 F70 s370fzd11. @546 F71 s370fzd11. @557 F72 s370fzd11. @568 F73 s370fzd11. @579 F74 s370fzd11. @590 F75 s370fzd11. @601 F76 s370fzd11. @612 F77 s370fzd11. @623 F78 s370fzd11. @634 F79 s370fzd11. @645 F80 s370fzd11. @656 F81 s370fzd11. @667 F82 s370fzd11. @678 F82A s370fzd11. @689 F82B s370fzd11. @700 F83 s370fzd11. @711 F84 s370fzd11. @722 F84A s370fzd11. @733 F84B s370fzd11. @744 F84C s370fzd11. @755 F85 s370fzd11. @766 F86 s370fzd11. @777 F86A s370fzd11. @788 F87 s370fzd11. @799 F88 s370fzd11. @810 F88A s370fzd11. @821 F88B s370fzd11. @832 F88C s370fzd11. @843 F89 s370fzd11. @854 F90 s370fzd11. @865 F91 s370fzd11. @876 F92 s370fzd11. @887 F93 s370fzd11. @898 F94 s370fzd11. @909 F95 s370fzd11. @920 F96 s370fzd11. @931 F97 s370fzd11. @942 F98 s370fzd11. @953 F99 s370fzd11. @964 F100 s370fzd11. @975 F101 s370fzd11. @986 F102 s370fzd11. @997 F103 s370fzd11. @1008 F104 s370fzd11. @1019 F105 s370fzd11. @1030 F106 s370fzd11. @1041 F107 s370fzd11. @1052 F108 s370fzd11. @1063 F109 s370fzd11. @1074 F110 s370fzd11. @1085 F111 s370fzd11. @1096 F112 s370fzd11. @1107 F113 s370fzd11. @1118 F114 s370fzd11. @1129 F115 s370fzd11. @1140 F116 s370fzd11. @1151 F117 s370fzd11. @1162 F118 s370fzd11. @1173 F119 s370fzd11. @1184 F120 s370fzd11. @1195 F121 s370fzd11. @1206 F122 s370fzd11. @1217 F123 s370fzd11. @1228 F124 s370fzd11. @1239 F125 s370fzd11. @1250 F126 s370fzd11. @1261 F127 s370fzd11. @1272 F128 s370fzd11. @1283 F129 s370fzd11. @1294 F130 s370fzd11. @1305 F131 s370fzd11. @1316 F132 s370fzd11. @1327 F133 s370fzd11. @1338 F134 s370fzd11. @1349 F135 s370fzd11. @1360 F136 s370fzd11. @1371 F137 s370fzd11. @1382 F138 s370fzd11. @1393 F139 s370fzd11. @1404 F140 s370fzd11. @1415 F141 s370fzd11. @1426 F142 s370fzd11. @1437 F143 s370fzd11. @1448 F144 s370fzd11. @1459 F145 s370fzd11. @1470 F146 s370fzd11. @1481 F147 s370fzd11. @1492 F148 s370fzd11. @1503 F149 s370fzd11. @1514 F150 s370fzd11. @1525 F151 s370fzd11. @1536 F152 s370fzd11. @1547 F153 s370fzd11. @1558 F154 s370fzd11. @1569 F155 s370fzd11. @1580 F156 s370fzd11. @1591 F157 s370fzd11. @1602 F158 s370fzd11. @1613 F159 s370fzd11. @1624 F160 s370fzd11. @1635 F161 s370fzd11. @1646 F162 s370fzd11. @1657 F163 s370fzd11. @1668 F164 s370fzd11. @1679 F165 s370fzd11. @1690 F166 s370fzd11. @1701 F167 s370fzd11. @1712 F168 s370fzd11. @1723 F169 s370fzd11. @1734 F170 s370fzd11. @1745 F171 s370fzd11. @1756 F172 s370fzd11. @1767 F173 s370fzd11. @1778 F174 s370fzd11. @1789 F175 s370fzd11. @1800 F176 s370fzd11. @1811 F177 s370fzd11. @1822 F178 s370fzd11. @1833 F179 s370fzd11. @1844 F180 s370fzd11. @1855 F181 s370fzd11. @1866 F182 s370fzd11. @1877 F183 s370fzd11. @1888 F184 s370fzd11. @1899 F185 s370fzd11. @1910 F186 s370fzd11. @1921 F187 s370fzd11. @1932 F188 s370fzd11. @1943 F189 s370fzd11. @1954 F190 s370fzd11. @1965 F191 s370fzd11. @1976 F192 s370fzd11. @1987 F193 s370fzd11. @1998 F194 s370fzd11. @2009 F195 s370fzd11. @2020 F196 s370fzd11. @2031 F197 s370fzd11. @2042 F198 s370fzd11. @2053 F199 s370fzd11. @2064 F200 s370fzd11. @2075 F201 s370fzd11. @2086 F202 s370fzd11. @2097 F203 s370fzd11. @2108 F204 s370fzd11. @2119 F205 s370fzd11. @2130 F206 s370fzd11. @2141 F207 s370fzd11. @2152 F208 s370fzd11. @2163 F209 s370fzd11. @2174 F210 s370fzd11. @2185 F211 s370fzd11. @2196 F212 s370fzd11. @2207 F213 s370fzd11. @2218 F214 s370fzd11. @2229 F215 s370fzd11. @2240 F216 s370fzd11. @2251 F217 s370fzd11. @2262 F218 s370fzd11. @2273 F219 s370fzd11. @2284 F220 s370fzd11. @2295 F221 s370fzd11. @2306 F222 s370fzd11. @2317 F223 s370fzd11. @2328 F224 s370fzd11. @2339 F225 s370fzd11. @2350 F226 s370fzd11. @2361 F227 s370fzd11. @2372 F228 s370fzd11. @2383 F229 s370fzd11. @2394 F230 s370fzd11. @2405 F231 s370fzd11. @2416 F232 s370fzd11. @2427 F233 s370fzd11. @2438 F234 s370fzd11. @2449 F235 s370fzd11. @2460 F236 s370fzd11. @2471 F237 s370fzd11. @2482 F238 s370fzd11. @2493 F239 s370fzd11. @2504 F240 s370fzd11. @2515 F241 s370fzd11. @2526 F242 s370fzd11. @2537 F243 s370fzd11. @2548 F244 s370fzd11. @2559 F245 s370fzd11. @2570 F246 s370fzd11. @2581 F247 s370fzd11. @2592 F248 s370fzd11. @2603 F249 s370fzd11. @2614 F250 s370fzd11. @2625 F251 s370fzd11. @2636 F252 s370fzd11. @2647 F253 s370fzd11. @2658 F254 s370fzd11. @2669 F255 s370fzd11. @2680 F256 s370fzd11. @2691 F257 s370fzd11. @2702 F258 s370fzd11. @2713 F259 s370fzd11. @2724 F260 s370fzd11. @2735 F261 s370fzd11. @2746 F262 s370fzd11. @2757 F263 s370fzd11. @2768 F263A s370fzd11. @2779 F263B s370fzd11. @2790 F263C s370fzd11. @2801 F263D s370fzd11. @2812 F263E s370fzd11. @2823 F263F s370fzd11. @2834 F263G s370fzd11. @2845 F263H s370fzd11. @2856 F263I s370fzd11. @2867 F264 s370fzd11. @2878 F265 s370fzd11. @2889 F266 s370fzd11. @2900 F267 s370fzd11. @2911 F268 s370fzd11. @2922 F269 s370fzd11. @2933 F270 s370fzd11. @2944 F271 s370fzd11. @2955 F272 s370fzd11. @2966 F273 s370fzd11. @2977 F274 s370fzd11. @2988 F275 s370fzd11. @2999 F276 s370fzd11. @3010 F277 s370fzd11. @3021 F278 s370fzd11. @3032 F279 s370fzd11. @3043 F280 s370fzd11. @3054 F281 s370fzd11. @3065 F282 s370fzd11. @3076 F283 s370fzd11. @3087 F284 s370fzd11. @3098 F285 s370fzd11. @3109 F286 s370fzd11. @3120 F287 s370fzd11. @3131 F288 s370fzd11. @3142 F289 s370fzd11. @3153 F290 s370fzd11. @3164 F291 s370fzd11. @3175 F292 s370fzd11. @3186 F293 s370fzd11. @3197 F294 s370fzd11. @3208 F295 s370fzd11. @3219 F296 s370fzd11. @3230 F297 s370fzd11. @3241 F298 s370fzd11. @3252 F299 s370fzd11. @3263 F300 s370fzd11. @3274 F301 s370fzd11. @3285 F302 s370fzd11. @3296 F303 s370fzd11. @3307 F304 s370fzd11. @3318 F305 s370fzd11. @3329 F306 s370fzd11. @3340 F307 s370fzd11. @3351 F308 s370fzd11. @3362 F309 s370fzd11. @3373 F310 s370fzd11. @3384 F311 s370fzd11. @3395 F312 s370fzd11. @3406 F313 s370fzd11. @3417 F314 s370fzd11. @3428 F315 s370fzd11. @3439 F316 s370fzd11. @3450 F317 s370fzd11. @3461 F318 s370fzd11. @3472 F319 s370fzd11. @3483 F320 s370fzd11. @3494 F321 s370fzd11. @3505 F322 s370fzd11. @3516 F323 s370fzd11. @3527 F324 s370fzd11. @3538 F325 s370fzd11. @3549 F326 s370fzd11. @3560 F327 s370fzd11. @3571 F328 s370fzd11. @3582 F329 s370fzd11. @3593 F330 s370fzd11. @3604 F331 s370fzd11. @3615 F332 s370fzd11. @3626 F333 s370fzd11. @3637 F334 s370fzd11. @3648 F335 s370fzd11. @3659 F336 s370fzd11. @3670 F337 s370fzd11. @3681 F338 s370fzd11. @3692 F339 s370fzd11. @3703 F340 s370fzd11. @3714 F341 s370fzd11. @3725 F342 s370fzd11. @3736 F343 s370fzd11. @3747 F344 s370fzd11. @3758 F345 s370fzd11. @3769 F346 s370fzd11. @3780 F347 s370fzd11. @3791 F348 s370fzd11. @3802 F349 s370fzd11. @3813 F350 s370fzd11. @3824 F351 s370fzd11. @3835 F352 s370fzd11. @3846 F353 s370fzd11. @3857 F354 s370fzd11. @3868 F355 s370fzd11. @3879 F356 s370fzd11. @3890 F357 s370fzd11. @3901 F358 s370fzd11. @3912 F359 s370fzd11. @3923 F360 s370fzd11. @3934 F361 s370fzd11. @3945 F362 s370fzd11. @3956 F363 s370fzd11. @3967 F364 s370fzd11. @3978 F365 s370fzd11. @3989 F366 s370fzd11. @4000 F367 s370fzd11. @4011 F368 s370fzd11. @4022 F369 s370fzd11. @4033 F370 s370fzd11. @4044 F371 s370fzd11. @4055 F372 s370fzd11. @4066 F373 s370fzd11. @4077 F374 s370fzd11. @4088 F375 s370fzd11. @4099 F376 s370fzd11. @4110 F377 s370fzd11. @4121 F378 s370fzd11. @4132 F379 s370fzd11. @4143 F380 s370fzd11. @4154 F381 s370fzd11. @4165 F382 s370fzd11. @4176 F383 s370fzd11. @4187 F384 s370fzd11. @4198 F385 s370fzd11. @4209 F386 s370fzd11. @4220 F387 s370fzd11. @4231 F388 s370fzd11. @4242 F389 s370fzd11. @4253 F390 s370fzd11. @4264 F391 s370fzd11. @4275 F392 s370fzd11. @4286 F393 s370fzd11. @4297 F394 s370fzd11. @4308 F395 s370fzd11. @4319 F396 s370fzd11. @4330 F397 s370fzd11. @4341 F398 s370fzd11. @4352 F399 s370fzd11. @4363 F400 s370fzd11. @4374 F401 s370fzd11. @4385 F402 s370fzd11. @4396 F403 s370fzd11. @4407 F404 s370fzd11. @4418 F405 s370fzd11. @4429 F406 s370fzd11. @4440 F407 s370fzd11. @4451 F408 s370fzd11. @4462 F409 s370fzd11. @4473 F410 s370fzd11. @4484 F411 s370fzd11. @4495 F412 s370fzd11. @4506 F413 s370fzd11. @4517 F414 s370fzd11. @4528 F415 s370fzd11. @4539 F416 s370fzd11. @4550 F417 s370fzd11. @4561 F418 s370fzd11. @4572 F419 s370fzd11. @4583 F420 s370fzd11. @4594 F421 s370fzd11. @4605 F422 s370fzd11. @4616 F423 s370fzd11. @4627 F424 s370fzd11. @4638 F425 s370fzd11. @4649 F426 s370fzd11. @4660 F427 s370fzd11. @4671 F428 s370fzd11. @4682 F429 s370fzd11. @4693 F430 s370fzd11. @4704 F431 s370fzd11. @4715 F432 s370fzd11. @4726 F433 s370fzd11. @4737 F434 s370fzd11. @4748 F435 s370fzd11. @4759 F436 s370fzd11. @4770 F437 s370fzd11. @4781 F438 s370fzd11. @4792 F439 s370fzd11. @4803 F440 s370fzd11. @4814 F441 s370fzd11. @4825 F442 s370fzd11. @4836 F443 s370fzd11. @4847 F444 s370fzd11. @4858 F445 s370fzd11. @4869 F445A s370fzd11. @4880 F445B s370fzd11. @4891 F446 s370fzd11. @4902 F446A s370fzd11. @4913 F446B s370fzd11. @4924 F447 s370fzd11. @4935 F447A s370fzd11. @4946 F447B s370fzd11. @4957 F448 s370fzd11. @4968 F448A s370fzd11. @4979 F448B s370fzd11. @4990 F449 s370fzd11. @5001 F450 s370fzd11. @5012 F451 s370fzd11. @5023 F452 s370fzd11. @5034 F453 s370fzd11. @5045 F454 s370fzd11. @5056 F455 s370fzd11. @5067 F456 s370fzd11. @5078 F457 s370fzd11. @5089 F458 s370fzd11. @5100 F459 s370fzd11. @5111 F460 s370fzd11. @5122 F461 s370fzd11. @5133 F462 s370fzd11. @5144 F463 s370fzd11. @5221 F470 s370fzd11. @5232 F471 s370fzd11. @5243 F472 s370fzd11. @5254 F473 s370fzd11. @5265 F473A s370fzd11. @5276 F473B s370fzd11. @5287 F473C s370fzd11. @5298 F474 s370fzd11. @5309 F474A s370fzd11. @5320 F474B s370fzd11. @5331 F474C s370fzd11. @5342 F475 s370fzd11. @5353 F476 s370fzd11. @5364 F477 s370fzd11. @5375 F478A s370fzd11. @5386 F478B s370fzd11. @5397 F478C s370fzd11. @5408 F478D s370fzd11. @5419 F478E s370fzd11. @5430 F479 s370fzd11. @5441 F480 s370fzd11. @5452 F481 s370fzd11. @5463 F482A s370fzd11. @5474 F482B s370fzd11. @5485 F483 s370fzd11. @5496 F484 s370fzd11. @5507 F485 s370fzd11. @5518 F486 s370fzd11. @5529 F487 s370fzd11. @5540 F487A s370fzd11. @5551 F488 s370fzd11. @5562 F489 s370fzd11. @5573 F490 s370fzd11. @5584 F491 s370fzd11. @5595 F492 s370fzd11. @5606 F493 s370fzd11. @5617 F494 s370fzd11. @5628 F495 s370fzd11. @5639 F496 s370fzd11. @5650 F497 s370fzd11. @5661 F498 s370fzd11. @5672 F499 s370fzd11. @5683 F499A s370fzd11. @5694 F499B s370fzd11. @5705 F499C s370fzd11. @5716 F499D s370fzd11. @5727 F500 s370fzd11. @5738 F501 s370fzd11. @5749 F501A s370fzd11. @5760 F501B s370fzd11. @5771 F502 s370fzd11. @5782 F503 s370fzd11. @5793 F503A s370fzd11. @5804 F504 s370fzd11. @5815 F505 s370fzd11. @5826 F506 s370fzd11. @5837 F507 s370fzd11. @5848 F508 s370fzd11. @5859 F509 s370fzd11. @5870 F510 s370fzd11. @5881 F511 s370fzd11. @5892 F512 s370fzd11. @5903 F513 s370fzd11. @5914 F514 s370fzd11. @5925 F515 s370fzd11. @5936 F516 s370fzd11. @5947 F517 s370fzd11. @5958 F518 s370fzd11. @5969 F519 s370fzd11. @5980 F520 s370fzd11. @5991 F521 s370fzd11. @6002 F522 s370fzd11. @6013 F523 s370fzd11. @6024 F524 s370fzd11. @6035 F525 s370fzd11. @6046 F526 s370fzd11. @6057 F527 s370fzd11. @6068 F528 s370fzd11. @6079 F529 s370fzd11. @6090 F530 s370fzd11. @6101 F530A s370fzd11. @6112 F531 s370fzd11. @6123 F532 s370fzd11. @6134 F533 s370fzd11. @6145 W1 s370fzd11. @6156 W2 s370fzd11. @6167 W3 s370fzd11. @6178 W4 s370fzd11. @6189 W5 s370fzd11. @6200 W6 s370fzd11. @6211 W7 s370fzd11. @6222 W8 s370fzd11. @6233 W9 s370fzd11. @6244 W10 s370fzd11. @6255 W11 s370fzd11. @6266 W12 s370fzd11. @6277 W13 s370fzd11. @6288 W14 s370fzd11. @6299 W15 s370fzd11. @6310 W16 s370fzd11. @6321 W17 s370fzd11. @6332 W18 s370fzd11. @6343 W19 s370fzd11. @6354 W20 s370fzd11. @6365 W21 s370fzd11. @6376 W22 s370fzd11. @6387 W23 s370fzd11. @6398 W24 s370fzd11. @6409 W25 s370fzd11. @6420 W26 s370fzd11. @6431 W27 s370fzd11. @6442 W28 s370fzd11. @6453 W29 s370fzd11. @6464 W30 s370fzd11. @6475 W31 $ebcdic11. @6486 L1 s370fzd11. @6497 L2 s370fzd11. @6508 L3 s370fzd11. @6519 L4 s370fzd11. @6530 L5 s370fzd11. @6541 L6 s370fzd11. @6552 L7 s370fzd11. @6563 L8 s370fzd11. @6574 L9 s370fzd11. @6585 L10 s370fzd11. @6596 L11 s370fzd11. @6607 L12 s370fzd11. @6618 L13 s370fzd11. @6629 L14 s370fzd11. @6640 L15 s370fzd11. @6651 L16 s370fzd11. @6662 L17 s370fzd11. @6673 L18 s370fzd11. @6684 L19 s370fzd11. @6695 L20 s370fzd11. @6706 L21 s370fzd11. @6717 L22 s370fzd11. @6728 L23 s370fzd11. @6739 L24 s370fzd11. @6750 L25 s370fzd11. @6761 L26 s370fzd11. @6772 L27 s370fzd11. @6783 L28 s370fzd11. @6794 L29 s370fzd11. @6805 L30 s370fzd11. @6816 L31 s370fzd11. @6827 L32 s370fzd11. @6838 L33 s370fzd11. @6849 L34 s370fzd11. @6860 L35 s370fzd11. ; provno = f1; provname = f16; paysys = f17; begdate = f23; enddate = f24; months = f25; control = f26; type = f27; ssa = f32; status = f35; cenreg = f38; totbeds = f45; mroudays = f54; msbdays = f55; micudays = f56; mccudays = f57; mocudays = f58; miphdays = f59; mipfdays = f60; troudays = f67; tsbdays = f68; ticudays = f69; tccudays = f70; tosudays = f71; hipdays = f72; fipdays = f73; bfcaps = f90; mecaps = f91; tdirsal = f101; otdirs = f111; physremu = f112; physadj = f119; aibfcaps = f120; atbfcaps = f121; aimecaps = f122; atmecaps = f123; treimbs = f138; tipcaps = f181; ttcaps = f182; trous = f183; ticus = f184; tccus = f185; totsus = f186; tsubprs = f187; tnursers = f188; tsnfs = f189; ticfs = f190; totcfs = f191; tors = f192; trecovrs = f193; tdelivrs = f194; tanesths = f195; tdiarads = f196; ttherads = f197; tradiois = f198; tlabs = f199; tbloods = f200; tbloodas = f201; tivs = f202; trespths = f203; tphysths = f204; toccuths = f205; tspeechs = f206; tecgs = f207; teegs = f208; tsupplys = f209; tdrugs = f210; tdialyss = f211; totancis = f212; tclinics = f213; temergs = f214; totouts = f215; totreims = f216; tspccs = f217; tnoreims = f218; cfadjust = f219; negcost = f220; tcaps = f221; rous = f222; icus = f223; ccus = f224; otsus = f225; subprs = f226; nursers = f227; snfs = f228; icfs = f229; otcfs = f230; ors = f231; recovrs = f232; delivrs = f233; anesths = f234; diarads = f235; therads = f236; radiois = f237; labs = f238; pbplabs = f239; bloods = f240; bloodas = f241; ivs = f242; respths = f243; respadjs = f244; physths = f245; physadjs = f246; occuths = f247; speechs = f248; ecgs = f249; eegs = f250; supplys = f251; drugs = f252; dialyss = f253; otancis = f254; clinics = f255; emergs = f256; otouts = f257; otreims = f258; totals = f259; spccs = f260; noreims = f261; negcost = f262; tfacils = f221; org = f264; recovrg = f265; delivrg = f266; anesthg = f267; diaradg = f268; theradg = f269; radioig = f270; labg = f271; pbplabg = f272; bloodg = f273; bloodag = f274; ivg = f275; respthg = f276; physthg = f277; occuthg = f278; speechg = f279; ecgg = f280; eegg = f281; supplyg = f282; drugg = f283; dialysg = f284; otancig = f285; clinicg = f286; emergg = f287; otoutg = f288; otreimg = f289; totalg = f290; morg = f291; mrecovrg = f292; mdelivrg = f293; manesthg = f294; mdiaradg = f295; mtheradg = f296; mradioig = f297; mlabg = f298; mpbplabg = f299; mbloodg = f300; mbloodag = f301; mivg = f302; mrespthg = f303; mphysthg = f304; moccuthg = f305; mspeechg = f306; mecgg = f307; meegg = f308; msupplyg = f309; mdrugg = f310; mdialysg = f311; motancig = f312; mclinicg = f313; memergg = f314; motoutg = f315; motreimg = f316; mtotalg = f317; mors = f318; mrecovrs = f319; mdelivrs = f320; manesths = f321; mdiarads = f322; mtherads = f323; mradiois = f324; mlabs = f325; mpbplabs = f326; mbloods = f327; mbloodas = f328; mivs = f329; mrespths = f330; mphysths = f331; moccuths = f332; mspeechs = f333; mecgs = f334; meegs = f335; msupplys = f336; mdrugs = f337; mdialyss = f338; motancis = f339; mclinics = f340; memergs = f341; motouts = f342; motreims = f343; mtotals = f344; krous = f345; kicus = f346; kccus = f347; kotsus = f348; ksubprs = f349; knursers = f350; kors = f351; krecovrs = f352; kdelivrs = f353; kanesths = f354; kdiarads = f355; ktherads = f356; kradiois = f357; klabs = f358; kbloods = f359; kbloodas = f360; kivs = f361; krespths = f362; kphysths = f363; koccuths = f364; kspeechs = f365; kecgs = f366; keegs = f367; ksupplys = f368; kdrugs = f369; kdialyss = f370; kotancis = f371; kclinics = f372; kemergs = f373; kotouts = f374; kotreims = f375; ktotals = f376; edsubprs = f413; ednurses = f414; edteducs= f440; outpatg = f444; mrous = f452; micus = f453; mccus = f454; mosus = f455; minpancs = f456; mmalprs = f457; opertots = f458; kidnacqs = f462; kidnerev = f463; drgpric = f470; drgoutl = f471; rousvcpt = f473; roumept = f473B; rouanept = f473C; ancsvcpt = f474; ancmept = f474B; ancanept = f474C; organacs = f475; teachmds = f476; educadj = f477; gradpaym = f478a; dsadjust = f479; highesrd = f480; amtdue= f488; seqadjus = f489; *drop f1 f15 f17 f23-f27 f32 f35 f38 f45 f54-f60 f67-f73 f90 f91 f101 f111 f112 f119-f123 f138 f181-f376 f413 f414 f440 f444 f452 f453 f454 f455 f456 f457 f458 f462-f463 f470 f471 f488 f489 f473 f473B f473C f474 f474B f474C f475 f476; run; proc print data=out.pps93 (obs=6); run; ** To convert character variables to numeric ; data out.pps93; set out.pps93; a1= totbeds+0; a0=mroudays+0; a2= msbdays+0; a3= micudays+0; a4= mccudays+0; a5= mocudays+0; a6= miphdays+0; a7= mipfdays+0; a8= troudays+0; a9= tsbdays+0; a10= ticudays+0; a11= tccudays+0; a12= tosudays+0; a13= hipdays+0; a14= fipdays+0; a15= bfcaps+0; a16= mecaps+0; a17= tdirsal+0; a18= otdirs+0; a19= physremu+0; a20= physadj+0; a21= aibfcaps+0; a22= atbfcaps+0; a23= aimecaps+0; a24= atmecaps+0; a25= treimbs+0; a26= tipcaps+0; a27= ttcaps+0; a28= trous +0; a29= ticus +0; a30= tccus +0; a31= totsus +0; a32= tsubprs +0; a33= tnursers +0; a34= tsnfs +0; a35= ticfs +0; a36= totcfs +0; a37= tors +0; a38= trecovrs +0; a39= tdelivrs +0; a40= tanesths +0; a41= tdiarads +0; a42= ttherads +0; a43= tradiois +0; a44= tlabs +0; a45= tbloods +0; a46= tbloodas +0; a47= tivs +0; a48= trespths +0; a49= tphysths +0; a50= toccuths +0; b1= tspeechs +0; b2= tecgs +0; b3= teegs +0; b4= tsupplys +0; b5= tdrugs +0; b6= tdialyss +0; b7= totancis +0; b8= tclinics +0; b9= temergs +0; b10= totouts +0; b11= totreims +0; b12= tspccs +0; b13= tnoreims +0; b14= cfadjust +0; b15= negcost +0; b16= tcaps +0; b17= rous +0; b18= icus +0; b19= ccus +0; b20= otsus +0; b21= subprs +0; b22= nursers +0; b23= snfs +0; b24= icfs +0; b25= otcfs +0; b26= ors +0; b27= recovrs +0; b28= delivrs +0; b29= anesths +0; b30= diarads +0; b31= therads +0; b32= radiois +0; b33= labs +0; b34= pbplabs +0; b35= bloods +0; b36= bloodas +0; b37= ivs +0; b38= respths +0; b39= respadjs +0; b40= physths +0; b41= physadjs +0; b42= occuths +0; b43= speechs +0; b44= ecgs +0; b45= eegs +0; b46= supplys +0; b47= drugs +0; b48= dialyss +0; b49= otancis +0; b50= clinics +0; c1= emergs +0; c2= otouts +0; c3= otreims +0; c4= totals +0; c5= spccs +0; c6= noreims +0; c7= negcost +0; c8= tfacils +0; c9= org +0; c10= recovrg +0; c11= delivrg +0; c12= anesthg +0; c13= diaradg +0; c14= theradg +0; c15= radioig +0; c16= labg +0; c17= pbplabg +0; c18= bloodg +0; c19= bloodag +0; c20= ivg +0; c21= respthg +0; c22= physthg +0; c23= occuthg +0; c24= speechg +0; c25= ecgg +0; c26= eegg +0; c27= supplyg +0; c28= drugg +0; c29= dialysg +0; c30= otancig +0; c31= clinicg +0; c32= emergg +0; c33= otoutg +0; c34= otreimg +0; c35= totalg +0; c36= morg +0; c37= mrecovrg +0; c38= mdelivrg +0; c39= manesthg +0; c40= mdiaradg +0; c41= mtheradg +0; c42= mradioig +0; c43= mlabg +0; c44= mpbplabg +0; c45= mbloodg +0; c46= mbloodag +0; c47= mivg +0; c48= mrespthg +0; c49= mphysthg +0; c50= moccuthg +0; d1= mspeechg +0; d2= mecgg +0; d3= meegg +0; d4= msupplyg +0; d5= mdrugg +0; d6= mdialysg +0; d7= motancig +0; d8= mclinicg +0; d9= memergg +0; d10= motoutg +0; d11= motreimg +0; d12= mtotalg +0; d13= mors +0; d14= mrecovrs +0; d15= mdelivrs +0; d16= manesths +0; d17= mdiarads +0; d18= mtherads +0; d19= mradiois +0; d20= mlabs +0; d21= mpbplabs +0; d22= mbloods +0; d23= mbloodas +0; d24= mivs +0; d25= mrespths +0; d26= mphysths +0; d27= moccuths +0; d28= mspeechs +0; d29= mecgs +0; d30= meegs +0; d31= msupplys +0; d32= mdrugs +0; d33= mdialyss +0; d34= motancis +0; d35= mclinics +0; d36= memergs +0; d37= motouts +0; d38= motreims +0; d39= mtotals +0; d40= krous +0; d41= kicus +0; d42= kccus +0; d43= kotsus +0; d44= ksubprs +0; d45= knursers +0; d46= kors +0; d47= krecovrs +0; d48= kdelivrs +0; d49= kanesths +0; d50= kdiarads +0; e1= ktherads +0; e2= kradiois +0; e3= klabs +0; e4= kbloods +0; e5= kbloodas +0; e6= kivs +0; e7= krespths +0; e8= kphysths +0; e9= koccuths +0; e10= kspeechs +0; e11= kecgs +0; e12= keegs +0; e13= ksupplys +0; e14= kdrugs +0; e15= kdialyss +0; e16= kotancis +0; e17= kclinics +0; e18= kemergs +0; e19= kotouts +0; e20= kotreims +0; e21= ktotals +0; e22= edsubprs +0; e23= ednurses +0; e24= edteducs+0; e25= outpatg +0; e26= mrous +0; e27= micus +0; e28= mccus +0; e29= mosus +0; e30= minpancs +0; e31= mmalprs +0; e32= opertots +0; e33= kidnacqs +0; e34= kidnerev +0; e35= drgpric +0; e36= drgoutl +0; e37= rousvcpt +0; e38= roumept +0; e39= rouanept +0; e40= ancsvcpt +0; e41= ancmept +0; e42= ancanept +0; e43= organacs +0; e44= teachmds +0; e45= educadj +0; e46= gradpaym +0; e47= dsadjust +0; e48= highesrd +0; e49= amtdue+0; e50= seqadjus +0; Drop totbeds mroudays msbdays micudays mccudays mocudays miphdays mipfdays troudays tsbdays ticudays tccudays tosudays hipdays fipdays bfcaps mecaps tdirsal otdirs physremu physadj aibfcaps atbfcaps aimecaps atmecaps treimbs tipcaps ttcaps trous ticus tccus totsus tsubprs tnursers tsnfs ticfs totcfs tors trecovrs tdelivrs tanesths tdiarads ttherads tradiois tlabs tbloods tbloodas tivs trespths tphysths toccuths tspeechs tecgs teegs tsupplys tdrugs tdialyss totancis tclinics temergs totouts totreims tspccs tnoreims cfadjust negcost tcaps rous icus ccus otsus subprs nursers snfs icfs otcfs ors recovrs delivrs anesths diarads therads radiois labs pbplabs bloods bloodas ivs respths respadjs physths physadjs occuths speechs ecgs eegs supplys drugs dialyss otancis clinics emergs otouts otreims totals spccs noreims negcost tfacils org recovrg delivrg anesthg diaradg theradg radioig labg pbplabg bloodg bloodag ivg respthg physthg occuthg speechg ecgg eegg supplyg drugg dialysg otancig clinicg emergg otoutg otreimg totalg morg mrecovrg mdelivrg manesthg mdiaradg mtheradg mradioig mlabg mpbplabg mbloodg mbloodag mivg mrespthg mphysthg moccuthg mspeechg mecgg meegg msupplyg mdrugg mdialysg motancig mclinicg memergg motoutg motreimg mtotalg mors mrecovrs mdelivrs manesths mdiarads mtherads mradiois mlabs mpbplabs mbloods mbloodas mivs mrespths mphysths moccuths mspeechs mecgs meegs msupplys mdrugs mdialyss motancis mclinics memergs motouts motreims mtotals krous kicus kccus kotsus ksubprs knursers kors krecovrs kdelivrs kanesths kdiarads ktherads kradiois klabs kbloods kbloodas kivs krespths kphysths koccuths kspeechs kecgs keegs ksupplys kdrugs kdialyss kotancis kclinics kemergs kotouts kotreims ktotals edsubprs ednurses edteducs outpatg mrous micus mccus mosus minpancs mmalprs opertots kidnacqs kidnerev drgpric drgoutl rousvcpt roumept rouanept ancsvcpt ancmept ancanept organacs teachmds educadj gradpaym dsadjust highesrd amtdue seqadjus ; rename a1= totbeds a0=mroudays a2= msbdays a3= micudays a4= mccudays a5= mocudays a6= miphdays a7= mipfdays a8= troudays a9= tsbdays a10= ticudays a11= tccudays a12= tosudays a13= hipdays a14= fipdays a15= bfcaps a16= mecaps a17= tdirsal a18= otdirs a19= physremu a20= physadj a21= aibfcaps a22= atbfcaps a23= aimecaps a24= atmecaps a25= treimbs a26= tipcaps a27= ttcaps a28= trous a29= ticus a30= tccus a31= totsus a32= tsubprs a33= tnursers a34= tsnfs a35= ticfs a36= totcfs a37= tors a38= trecovrs a39= tdelivrs a40= tanesths a41= tdiarads a42= ttherads a43= tradiois a44= tlabs a45= tbloods a46= tbloodas a47= tivs a48= trespths a49= tphysths a50= toccuths b1= tspeechs b2= tecgs b3= teegs b4= tsupplys b5= tdrugs b6= tdialyss b7= totancis b8= tclinics b9= temergs b10= totouts b11= totreims b12= tspccs b13= tnoreims b14= cfadjust b15= negcost b16= tcaps b17= rous b18= icus b19= ccus b20= otsus b21= subprs b22= nursers b23= snfs b24= icfs b25= otcfs b26= ors b27= recovrs b28= delivrs b29= anesths b30= diarads b31= therads b32= radiois b33= labs b34= pbplabs b35= bloods b36= bloodas b37= ivs b38= respths b39= respadjs b40= physths b41= physadjs b42= occuths b43= speechs b44= ecgs b45= eegs b46= supplys b47= drugs b48= dialyss b49= otancis b50= clinics c1= emergs c2= otouts c3= otreims c4= totals c5= spccs c6= noreims c7= negcost c8= tfacils c9= org c10= recovrg c11= delivrg c12= anesthg c13= diaradg c14= theradg c15= radioig c16= labg c17= pbplabg c18= bloodg c19= bloodag c20= ivg c21= respthg c22= physthg c23= occuthg c24= speechg c25= ecgg c26= eegg c27= supplyg c28= drugg c29= dialysg c30= otancig c31= clinicg c32= emergg c33= otoutg c34= otreimg c35= totalg c36= morg c37= mrecovrg c38= mdelivrg c39= manesthg c40= mdiaradg c41= mtheradg c42= mradioig c43= mlabg c44= mpbplabg c45= mbloodg c46= mbloodag c47= mivg c48= mrespthg c49= mphysthg c50= moccuthg d1= mspeechg d2= mecgg d3= meegg d4= msupplyg d5= mdrugg d6= mdialysg d7= motancig d8= mclinicg d9= memergg d10= motoutg d11= motreimg d12= mtotalg d13= mors d14= mrecovrs d15= mdelivrs d16= manesths d17= mdiarads d18= mtherads d19= mradiois d20= mlabs d21= mpbplabs d22= mbloods d23= mbloodas d24= mivs d25= mrespths d26= mphysths d27= moccuths d28= mspeechs d29= mecgs d30= meegs d31= msupplys d32= mdrugs d33= mdialyss d34= motancis d35= mclinics d36= memergs d37= motouts d38= motreims d39= mtotals d40= krous d41= kicus d42= kccus d43= kotsus d44= ksubprs d45= knursers d46= kors d47= krecovrs d48= kdelivrs d49= kanesths d50= kdiarads e1= ktherads e2= kradiois e3= klabs e4= kbloods e5= kbloodas e6= kivs e7= krespths e8= kphysths e9= koccuths e10= kspeechs e11= kecgs e12= keegs e13= ksupplys e14= kdrugs e15= kdialyss e16= kotancis e17= kclinics e18= kemergs e19= kotouts e20= kotreims e21= ktotals e22= edsubprs e23= ednurses e24= edteducs e25= outpatg e26= mrous e27= micus e28= mccus e29= mosus e30= minpancs e31= mmalprs e32= opertots e33= kidnacqs e34= kidnerev e35= drgpric e36= drgoutl e37= rousvcpt e38= roumept e39= rouanept e40= ancsvcpt e41= ancmept e42= ancanept e43= organacs e44= teachmds e45= educadj e46= gradpaym e47= dsadjust e48= highesrd e49= amtdue e50= seqadjus ; run; data out.pps93; set out.pps93; label cenreg = "Census Region" begdate = "Beg. of Cost Reporting Period" enddate = "End of Cost Reporting Period" totbeds = "Total # of beds in the hospital" mroudays = "Medicare Routine Care Days (excl. s-bed)" msbdays = "Medicare Swing Bed Days" micudays = "Medicare ICU Days" mccudays = "Medicare CCU Days" mocudays = "Other Medicare Special Unit Days" miphdays = "Medicare Inpat Days: Hospital" mipfdays = "Medicare Inpat Days: Facility" troudays = "Total routine care days (excl. s-bed)" tsbdays = "Total swing bed days" ticudays = "Total ICU days" tccudays = "Total CCU days" tosudays = "Total Other Special Care Unit Days" hipdays = "Hosp. inpat days: all-patient total" fipdays = "Facility inpat days: all-patient total" bfcaps = "Cap-related costs: bldg & fixtures" mecaps = "Cap-related costs: moveable equipt" tdirsal = "direct salaries- Total" otdirs = "other direct costs - total" physremu = "Physicians' Remuneration: total" physadj = "Adjustment for Physicians' prof. svcs" aibfcaps = "Adj'd inpat bldg & fix K-related costs" atbfcaps = "Adj'd total bldg & fix K-related costs" aimecaps = "Adj'd inpat mvbl equipt K-rel'd costs" atmecaps = "Adj'd total mvbl equipt K-rel'd costs" treimbs = "Total Reimbursable Costs" tipcaps ="TCRPTCost inpat directly assgnd K costs" ttcaps = "TCRPTCost total directly assgnd K costs" trous = "TCRPTCost Routine Care" ticus = "TCRPTCost ICU Care" tccus = "TCRPTCost CCU Care" totsus = "TCRPTCost Other Special Care Units" tsubprs = "TCRPTCost Sub-provider total" tnursers = "TCRPTCost Nursery" tsnfs = "TCRPTCost Skilled Nursing Facility" ticfs = "TCRPTCost intermediate care facility" totcfs = "TCRPTCost Other Care Facility" tors = "TCRPTCost Operating Room" trecovrs = "TCRPTCost Recovery Room" tdelivrs = "TCRPTCost Delivery and Labor Room" tanesths = "TCRPTCost Anesthesiology" tlabs = "TCRPTCost Laboratory" tbloods = "TCRPTCost whole blood & packed RBCs" tbloodas = "TCRPTCost blood admin (stor proc transf)" tivs = "TCRPTCost intravenous therapy" trespths = "TCRPTCost respiratory therapy" tphysths = "TCRPTCost physical therapy" toccuths = "TCRPTCost occupational therapy" tspeechs = "TCRPTCost speech pathology" tecgs = "TCRPTCost electrocardiology" teegs = "TCRPTCost electroencephalography" tsupplys = "TCRPTCost medical supplies chgd to pat" tdrugs = "TCRPTCost drugs chgd to patient" tdialyss = "TCRPTCost renal dialysis" totancis = "TCRPTCost other inpat ancillary" tclinics = "TCRPTCost outpatient clinic" temergs = "TCRPTCost emergency" totouts = "TCRPTCost other outpatient services" totreims = "TCRPTCost other reimbursable" tspccs = "TCRPTCost all special purpose cost ctrs" tnoreims = "TCRPTCost nonreimbursable " cfadjust = "TCRPTCost crossfoot adjustment" negcost = "TCRPTCost negative cost ctrs" tcaps = "TCRPTCost total K-related" rous = "TCostAA Routine Care" icus = "TCostAA ICU Care" ccus = "TCostAA CCU Care" otsus = "TCostAA Other Special Care Units" tsubprs = "TCostAA Sub-provider total" nursers = "TCostAA Nursery" snfs = "TCostAA Skilled Nursing Facility" icfs = "TCostAA intermediate care facility" otcfs = "TCostAA Other Care Facility" ors = "TCostAA Operating Room" recovrs = "TCostAA Recovery Room" delivrs = "TCostAA Delivery and Labor Room" anesths = "TCostAA Anesthesiology" labs = "TCostAA Laboratory" pbplabs = "TCostAA PBP Clinic lab svcs- prgm only" bloods = "TCostAA whole blood & packed RBCs" bloodas = "TCostAA blood admin (stor proc transf)" ivs = "TCostAA intravenous therapy" respths = "TCostAA respiratory therapy" respadjs = "TCostAA respiratory therapy adjustment" physths = "TCostAA physical therapy" physadjs = "TCostAA physical therapy adjustment" occuths = "TCostAA occupational therapy" speechs = "TCostAA speech pathology" ecgs = "TCostAA electrocardiology" eegs = "TCostAA electroencephalography" supplys = "TCostAA medical supplies chgd to pat" drugs = "TCostAA drugs chgd to patient" dialyss = "TCostAA renal dialysis" otancis = "TCostAA other inpat ancillary" clinics = "TCostAA outpatient clinic" emergs = "TCostAA emergency" otouts = "TCostAA other outpatient services" otreims = "TCostAA other reimbursable" totals = "TCostAA total facility after step-down" spccs = "TCostAA all special purpose cost ctrs" noreims = "TCostAA nonreimbursable " negcost = "TCostAA negative cost ctrs" tfacils = "TCostAA total facility costs" org = "TFAChg Operating Room" recovrg = "TFAChg Recovery Room" delivrg = "TFAChg Delivery and Labor Room" anesthg = " TFAChg Anesthesiology" labg = "TFAChg Laboratory" pbplabg = "TFAChg PBP Clinic lab svcs- prgm only" bloodg = "TFAChg whole blood & packed RBCs" bloodag = "TFAChg blood admin (stor proc transf)" ivg = "TFAChg intravenous therapy" respthg = "TFAChg respiratory therapy" physthg = "TFAChg physical therapy" occuthg = "TFAChg occupational therapy" speechg = "TFAChg speech pathology" ecgg = "TFAChg electrocardiology" eegg = "TFAChg electroencephalography" supplyg = "TFAChg medical supplies chgd to pat" drugg = "TFAChg drugs chgd to patient" dialysg = "TFAChg renal dialysis" otancig = "TFAChg other inpat ancillary" clinicg = "TFAChg outpatient clinic" emergg = "TFAChg emergency" otoutg = "TFAChg other outpatient services" otreimg = "TFAChg other reimbursable" totalg = "TFAChg total Charges- all cost centers" morg = "MCAIHACh Operating Room" mrecovrg = "MCAIHACh Recovery Room" mdelivrg = "MCAIHACh Delivery and Labor Room" manesthg = "MCAIHACh Anesthesiology" mlabg = "MCAIHACh Laboratory" mpbplabg = "MCAIHACh PBP Clinic lab svcs- prgm only" mbloodg = "MCAIHACh whole blood & packed RBCs" mbloodag = "MCAIHACh blood admin (stor proc transf)" mivg = "MCAIHACh intravenous therapy" mrespthg = "MCAIHACh respiratory therapy" mphysthg = "MCAIHACh physical therapy" moccuthg = "MCAIHACh occupational therapy" mspeechg = "MCAIHACh speech pathology" mecgg = "MCAIHACh electrocardiology" meegg = "MCAIHACh electroencephalography" msupplyg = "MCAIHACh medical supplies chgd to pat" mdrugg = "MCAIHACh drugs chgd to patient" mdialysg = "MCAIHACh renal dialysis" motancig = "MCAIHACh other inpat ancillary" mclinicg = "MCAIHACh outpatient clinic" memergg = "MCAIHACh emergency" motoutg = "MCAIHACh other outpatient services" motreimg = "MCAIHACh other reimbursable" mtotalg = "MCAIHACh total inpat hospital chgs" mors = "MCAIHACo Operating Room" mrecovrs = "MCAIHACo Recovery Room" mdelivrs = "MCAIHACo Delivery and Labor Room" manesths = "MCAIHACo Anesthesiology" mlabs = "MCAIHACo Laboratory" mpbplabs = "MCAIHACo PBP Clinic lab svcs- prgm only" mbloods = "MCAIHACo whole blood & packed RBCs" mbloodas = "MCAIHACo blood admin (stor proc transf)" mivs = "MCAIHACo intravenous therapy" mrespths = "MCAIHACo respiratory therapy" mphysths = "MCAIHACo physical therapy" moccuths = "MCAIHACo occupational therapy" mspeechs = "MCAIHACo speech pathology" mecgs = "MCAIHACo electrocardiology" meegs = "MCAIHACo electroencephalography" msupplys = "MCAIHACo medical supplies chgd to pat" mdrugs = "MCAIHACo drugs chgd to patient" mdialyss = "MCAIHACo renal dialysis" motancis = "MCAIHACo other inpat ancillary" mclinics = "MCAIHACo outpatient clinic" memergs = "MCAIHACo emergency" motouts = "MCAIHACo other outpatient services" motreims = "MCAIHACo other reimbursable" mtotals = "MCAIHACo total inpat ancillary costs" krous = "MCIHKRPT Routine Care" kicus = "MCIHKRPT ICU Care" kccus = "MCIHKRPT CCU Care" kotsus = "MCIHKRPT Other Special Care Units" ksubprs = "MCIHKRPT Sub-provider total" knursers = "MCIHKRPT Nursery" kors = "MCIHKRPT Operating Room" krecovrs = "MCIHKRPT Recovery Room" kdelivrs = "MCIHKRPT Delivery and Labor Room" kanesths = "MCIHKRPT Anesthesiology" klabs = "MCIHKRPT Laboratory" kbloods = "MCIHKRPT whole blood & packed RBCs" kbloodas = "MCIHKRPT blood admin (stor proc transf)" kivs = "MCIHKRPT intravenous therapy" krespths = "MCIHKRPT respiratory therapy" kphysths = "MCIHKRPT physical therapy" koccuths = "MCIHKRPT occupational therapy" kspeechs = "MCIHKRPT speech pathology" kecgs = "MCIHKRPT electrocardiology" keegs = "MCIHKRPT electroencephalography" ksupplys = "MCIHKRPT medical supplies chgd to pat" kdrugs = "MCIHKRPT drugs chgd to patient" kdialyss = "MCIHKRPT renal dialysis" kotancis = "MCIHKRPT other inpat ancillary" kclinics = "MCIHKRPT outpatient clinic" kemergs = "MCIHKRPT emergency" kotouts = "MCIHKRPT other outpatient services" kotreims = "MCIHKRPT other reimbursable" ktotals = "MCIHKRPT total facility after step-down" edsubprs = "Med. educ. subprovider pass-thru" ednurses = "Med. educ. Nursery pass-thru" edteducs= "Total hospital Med. educ. pass-thru" opertots = "Total Medicare inpat Operating Costs" kidnacqs = "Direct Kidney Acquisition Costs" kidnerev = "Revenues for kidneys sold" drgpric = "DRG payments-- other than outliers" drgoutl = "DRG outlier payments" educadj = "Indirect Medical Educ. Adjust." gradpaym ="Direct Graduate Medical Payment" dsadjust = "Disproportionate Share Adjustment" highesrd = "Addt'l payments for high ESRD use" amtdue = "Amt. due provider, before sequestration" seqadjus = "Sequestration adjustment" outpatg = "Total Outpatient Charges" rousvcpt = "(Summary) Routine Svc Pass Thru Costs" roumept = "(Summary) Routine med ed pass thru costs" rouanept = "(Summary) Routine non-MD anesth. pt cst" ancsvcpt = "(Summary) Anclry. svc. pass-thru costs" ancmept = "(Summary) Anclry. med ed pass-thru costs" ancanept = "(Summary) Anclry. non-MD anesth. pt cst" organacs = "(Summary) organ acquisition costs" teachmds = "(Summary) cost of teaching physicians" mrous = "(Summary) Medicare Routine Service Cost" micus = "(Summary) Medicare ICU total cost" mccus = "(Summary) Medicare CCU total cost" mosus = "(Summary) Medicare other SU total cost" minpancs = "(Summary) Medicare inpat anclry cost" *mmalprs = "(Summary) Medicare malpractice cost" end; run; proc print data=out.pps93 (obs=6); proc contents data=out.pps93; run;