/***************************************************************************** * SPSSload_NIS_2009_Core.SPS * This program will load the 2009 NIS ASCII Core File into SPSS. *****************************************************************************/ *** Read data elements from the ASCII file ***. DATA LIST FILE = 'NIS_2009_Core.ASC' FIXED / AGE 1- 3 AGEDAY 4- 6 AMONTH 7- 8 ASOURCE 9- 10 ASOURCEUB92 11 (A) ASOURCE_X 12- 14 (A) ATYPE 15- 16 AWEEKEND 17- 18 DIED 19- 20 DISCWT 21- 31 DISPUB04 32- 33 DISPUNIFORM 34- 35 DQTR 36- 37 DQTR_X 38- 39 DRG 40- 42 DRG24 43- 45 DRGVER 46- 47 DRG_NoPOA 48- 50 DSHOSPID 51- 67 (A) DX1 68- 72 (A) DX2 73- 77 (A) DX3 78- 82 (A) DX4 83- 87 (A) DX5 88- 92 (A) DX6 93- 97 (A) DX7 98-102 (A) DX8 103-107 (A) DX9 108-112 (A) DX10 113-117 (A) DX11 118-122 (A) DX12 123-127 (A) DX13 128-132 (A) DX14 133-137 (A) DX15 138-142 (A) DX16 143-147 (A) DX17 148-152 (A) DX18 153-157 (A) DX19 158-162 (A) DX20 163-167 (A) DX21 168-172 (A) DX22 173-177 (A) DX23 178-182 (A) DX24 183-187 (A) DX25 188-192 (A) DXCCS1 193-195 DXCCS2 196-198 DXCCS3 199-201 DXCCS4 202-204 DXCCS5 205-207 DXCCS6 208-210 DXCCS7 211-213 DXCCS8 214-216 DXCCS9 217-219 DXCCS10 220-222 DXCCS11 223-225 DXCCS12 226-228 DXCCS13 229-231 DXCCS14 232-234 DXCCS15 235-237 DXCCS16 238-240 DXCCS17 241-243 DXCCS18 244-246 DXCCS19 247-249 DXCCS20 250-252 DXCCS21 253-255 DXCCS22 256-258 DXCCS23 259-261 DXCCS24 262-264 DXCCS25 265-267 ECODE1 268-272 (A) ECODE2 273-277 (A) ECODE3 278-282 (A) ECODE4 283-287 (A) ELECTIVE 288-289 E_CCS1 290-293 E_CCS2 294-297 E_CCS3 298-301 E_CCS4 302-305 FEMALE 306-307 HCUP_ED 308-310 HOSPBRTH 311-312 HOSPID 313-317 HOSPST 318-319 (A) KEY 320-333 LOS 334-338 LOS_X 339-344 MDC 345-346 MDC24 347-348 MDC_NoPOA 349-350 MDNUM1_R 351-355 MDNUM2_R 356-360 NCHRONIC 361-362 NDX 363-364 NECODE 365-367 NEOMAT 368-369 NIS_STRATUM 370-373 NPR 374-375 ORPROC 376-377 PAY1 378-379 PAY1_X 380-389 (A) PAY2 390-391 PAY2_X 392-401 (A) PL_NCHS2006 402-404 PR1 405-408 (A) PR2 409-412 (A) PR3 413-416 (A) PR4 417-420 (A) PR5 421-424 (A) PR6 425-428 (A) PR7 429-432 (A) PR8 433-436 (A) PR9 437-440 (A) PR10 441-444 (A) PR11 445-448 (A) PR12 449-452 (A) PR13 453-456 (A) PR14 457-460 (A) PR15 461-464 (A) PRCCS1 465-467 PRCCS2 468-470 PRCCS3 471-473 PRCCS4 474-476 PRCCS5 477-479 PRCCS6 480-482 PRCCS7 483-485 PRCCS8 486-488 PRCCS9 489-491 PRCCS10 492-494 PRCCS11 495-497 PRCCS12 498-500 PRCCS13 501-503 PRCCS14 504-506 PRCCS15 507-509 PRDAY1 510-512 PRDAY2 513-515 PRDAY3 516-518 PRDAY4 519-521 PRDAY5 522-524 PRDAY6 525-527 PRDAY7 528-530 PRDAY8 531-533 PRDAY9 534-536 PRDAY10 537-539 PRDAY11 540-542 PRDAY12 543-545 PRDAY13 546-548 PRDAY14 549-551 PRDAY15 552-554 PointOfOriginUB04 555 (A) PointOfOrigin_X 556-563 (A) RACE 564-565 TOTCHG 566-575 TOTCHG_X 576-590 TRAN_IN 591-592 YEAR 593-596 ZIPINC_QRTL 597-598. *** Specify write formats ***. FORMATS AGE (F3.0) / AGEDAY (F3.0) / AMONTH (F2.0) / ASOURCE (F2.0) / ATYPE (F2.0) / AWEEKEND (F2.0) / DIED (F2.0) / DISCWT (F11.7) / DISPUB04 (F2.0) / DISPUNIFORM (F2.0) / DQTR (F2.0) / DQTR_X (F2.0) / DRG (F3.0) / DRG24 (F3.0) / DRGVER (F2.0) / DRG_NoPOA (F3.0) / DXCCS1 (F3.0) / DXCCS2 (F3.0) / DXCCS3 (F3.0) / DXCCS4 (F3.0) / DXCCS5 (F3.0) / DXCCS6 (F3.0) / DXCCS7 (F3.0) / DXCCS8 (F3.0) / DXCCS9 (F3.0) / DXCCS10 (F3.0) / DXCCS11 (F3.0) / DXCCS12 (F3.0) / DXCCS13 (F3.0) / DXCCS14 (F3.0) / DXCCS15 (F3.0) / DXCCS16 (F3.0) / DXCCS17 (F3.0) / DXCCS18 (F3.0) / DXCCS19 (F3.0) / DXCCS20 (F3.0) / DXCCS21 (F3.0) / DXCCS22 (F3.0) / DXCCS23 (F3.0) / DXCCS24 (F3.0) / DXCCS25 (F3.0) / ELECTIVE (F2.0) / E_CCS1 (F4.0) / E_CCS2 (F4.0) / E_CCS3 (F4.0) / E_CCS4 (F4.0) / FEMALE (F2.0) / HCUP_ED (F3.0) / HOSPBRTH (F2.0) / HOSPID (F5.0) / KEY (F14.0) / LOS (F5.0) / LOS_X (F6.0) / MDC (F2.0) / MDC24 (F2.0) / MDC_NoPOA (F2.0) / MDNUM1_R (F5.0) / MDNUM2_R (F5.0) / NCHRONIC (F2.0) / NDX (F2.0) / NECODE (F3.0) / NEOMAT (F2.0) / NIS_STRATUM (F4.0) / NPR (F2.0) / ORPROC (F2.0) / PAY1 (F2.0) / PAY2 (F2.0) / PL_NCHS2006 (F3.0) / PRCCS1 (F3.0) / PRCCS2 (F3.0) / PRCCS3 (F3.0) / PRCCS4 (F3.0) / PRCCS5 (F3.0) / PRCCS6 (F3.0) / PRCCS7 (F3.0) / PRCCS8 (F3.0) / PRCCS9 (F3.0) / PRCCS10 (F3.0) / PRCCS11 (F3.0) / PRCCS12 (F3.0) / PRCCS13 (F3.0) / PRCCS14 (F3.0) / PRCCS15 (F3.0) / PRDAY1 (F3.0) / PRDAY2 (F3.0) / PRDAY3 (F3.0) / PRDAY4 (F3.0) / PRDAY5 (F3.0) / PRDAY6 (F3.0) / PRDAY7 (F3.0) / PRDAY8 (F3.0) / PRDAY9 (F3.0) / PRDAY10 (F3.0) / PRDAY11 (F3.0) / PRDAY12 (F3.0) / PRDAY13 (F3.0) / PRDAY14 (F3.0) / PRDAY15 (F3.0) / RACE (F2.0) / TOTCHG (F10.0) / TOTCHG_X (F15.2) / TRAN_IN (F2.0) / YEAR (F4.0) / ZIPINC_QRTL (F2.0) . *** Assign labels to the data elements ***. VARIABLE LABELS AGE "Age in years at admission" AGEDAY "Age in days (when age < 1 year)" AMONTH "Admission month" ASOURCE "Admission source (uniform)" ASOURCEUB92 "Admission source (UB-92 standard coding)" ASOURCE_X "Admission source (as received from source)" ATYPE "Admission type" AWEEKEND "Admission day is a weekend" DIED "Died during hospitalization" DISCWT "Weight to discharges in AHA universe" DISPUB04 "Disposition of patient (UB-04 standard coding)" DISPUNIFORM "Disposition of patient (uniform)" DQTR "Discharge quarter" DQTR_X "Discharge quarter (as received from source)" DRG "DRG in effect on discharge date" DRG24 "DRG, version 24" DRGVER "DRG grouper version used on discharge date" DRG_NoPOA "DRG in use on discharge date, calculated without POA" DSHOSPID "Data source hospital identifier" DX1 "Diagnosis 1" DX2 "Diagnosis 2" DX3 "Diagnosis 3" DX4 "Diagnosis 4" DX5 "Diagnosis 5" DX6 "Diagnosis 6" DX7 "Diagnosis 7" DX8 "Diagnosis 8" DX9 "Diagnosis 9" DX10 "Diagnosis 10" DX11 "Diagnosis 11" DX12 "Diagnosis 12" DX13 "Diagnosis 13" DX14 "Diagnosis 14" DX15 "Diagnosis 15" DX16 "Diagnosis 16" DX17 "Diagnosis 17" DX18 "Diagnosis 18" DX19 "Diagnosis 19" DX20 "Diagnosis 20" DX21 "Diagnosis 21" DX22 "Diagnosis 22" DX23 "Diagnosis 23" DX24 "Diagnosis 24" DX25 "Diagnosis 25" DXCCS1 "CCS: diagnosis 1" DXCCS2 "CCS: diagnosis 2" DXCCS3 "CCS: diagnosis 3" DXCCS4 "CCS: diagnosis 4" DXCCS5 "CCS: diagnosis 5" DXCCS6 "CCS: diagnosis 6" DXCCS7 "CCS: diagnosis 7" DXCCS8 "CCS: diagnosis 8" DXCCS9 "CCS: diagnosis 9" DXCCS10 "CCS: diagnosis 10" DXCCS11 "CCS: diagnosis 11" DXCCS12 "CCS: diagnosis 12" DXCCS13 "CCS: diagnosis 13" DXCCS14 "CCS: diagnosis 14" DXCCS15 "CCS: diagnosis 15" DXCCS16 "CCS: diagnosis 16" DXCCS17 "CCS: diagnosis 17" DXCCS18 "CCS: diagnosis 18" DXCCS19 "CCS: diagnosis 19" DXCCS20 "CCS: diagnosis 20" DXCCS21 "CCS: diagnosis 21" DXCCS22 "CCS: diagnosis 22" DXCCS23 "CCS: diagnosis 23" DXCCS24 "CCS: diagnosis 24" DXCCS25 "CCS: diagnosis 25" ECODE1 "E code 1" ECODE2 "E code 2" ECODE3 "E code 3" ECODE4 "E code 4" ELECTIVE "Elective versus non-elective admission" E_CCS1 "CCS: E Code 1" E_CCS2 "CCS: E Code 2" E_CCS3 "CCS: E Code 3" E_CCS4 "CCS: E Code 4" FEMALE "Indicator of sex" HCUP_ED "HCUP Emergency Department service indicator" HOSPBRTH "Indicator of birth in this hospital" HOSPID "HCUP hospital identification number" HOSPST "Hospital state postal code" KEY "HCUP record identifier" LOS "Length of stay (cleaned)" LOS_X "Length of stay (as received from source)" MDC "MDC in effect on discharge date" MDC24 "MDC, version 24" MDC_NoPOA "MDC in use on discharge date, calculated without POA" MDNUM1_R "Physician 1 number (re-identified)" MDNUM2_R "Physician 2 number (re-identified)" NCHRONIC "Number of chronic conditions" NDX "Number of diagnoses on this record" NECODE "Number of E codes on this record" NEOMAT "Neonatal and/or maternal DX and/or PR" NIS_STRATUM "Stratum used to sample hospital" NPR "Number of procedures on this record" ORPROC "Major operating room procedure indicator" PAY1 "Primary expected payer (uniform)" PAY1_X "Primary expected payer (as received from source)" PAY2 "Secondary expected payer (uniform)" PAY2_X "Secondary expected payer (as received from source)" PL_NCHS2006 "Patient Location: NCHS Urban-Rural Code (V2006)" PR1 "Procedure 1" PR2 "Procedure 2" PR3 "Procedure 3" PR4 "Procedure 4" PR5 "Procedure 5" PR6 "Procedure 6" PR7 "Procedure 7" PR8 "Procedure 8" PR9 "Procedure 9" PR10 "Procedure 10" PR11 "Procedure 11" PR12 "Procedure 12" PR13 "Procedure 13" PR14 "Procedure 14" PR15 "Procedure 15" PRCCS1 "CCS: procedure 1" PRCCS2 "CCS: procedure 2" PRCCS3 "CCS: procedure 3" PRCCS4 "CCS: procedure 4" PRCCS5 "CCS: procedure 5" PRCCS6 "CCS: procedure 6" PRCCS7 "CCS: procedure 7" PRCCS8 "CCS: procedure 8" PRCCS9 "CCS: procedure 9" PRCCS10 "CCS: procedure 10" PRCCS11 "CCS: procedure 11" PRCCS12 "CCS: procedure 12" PRCCS13 "CCS: procedure 13" PRCCS14 "CCS: procedure 14" PRCCS15 "CCS: procedure 15" PRDAY1 "Number of days from admission to PR1" PRDAY2 "Number of days from admission to PR2" PRDAY3 "Number of days from admission to PR3" PRDAY4 "Number of days from admission to PR4" PRDAY5 "Number of days from admission to PR5" PRDAY6 "Number of days from admission to PR6" PRDAY7 "Number of days from admission to PR7" PRDAY8 "Number of days from admission to PR8" PRDAY9 "Number of days from admission to PR9" PRDAY10 "Number of days from admission to PR10" PRDAY11 "Number of days from admission to PR11" PRDAY12 "Number of days from admission to PR12" PRDAY13 "Number of days from admission to PR13" PRDAY14 "Number of days from admission to PR14" PRDAY15 "Number of days from admission to PR15" PointOfOriginUB04 "Point of origin for admission or visit, UB-04 standard coding" PointOfOrigin_X "Point of origin for admission or visit, as received from source" RACE "Race (uniform)" TOTCHG "Total charges (cleaned)" TOTCHG_X "Total charges (as received from source)" TRAN_IN "Transfer in indicator" YEAR "Calendar year" ZIPINC_QRTL "Median household income national quartile for patient ZIP Code" . *** Convert special values to system missing values ***. RECODE AGE (-99 -88 -66=SYSMIS). RECODE AGEDAY (-99 -88 -66=SYSMIS). RECODE AMONTH (-9 -8 -6 -5=SYSMIS). RECODE ASOURCE (-9 -8 -6 -5=SYSMIS). RECODE ATYPE (-9 -8 -6 -5=SYSMIS). RECODE AWEEKEND (-9 -8 -6 -5=SYSMIS). RECODE DIED (-9 -8 -6 -5=SYSMIS). RECODE DISCWT (-99.9999999 -88.8888888 -66.6666666=SYSMIS). RECODE DISPUB04 (-9 -8 -6 -5=SYSMIS). RECODE DISPUNIFORM (-9 -8 -6 -5=SYSMIS). RECODE DQTR (-9 -8 -6 -5=SYSMIS). RECODE DQTR_X (-9 -8 -6 -5=SYSMIS). RECODE DRG (-99 -88 -66=SYSMIS). RECODE DRG24 (-99 -88 -66=SYSMIS). RECODE DRGVER (-9 -8 -6 -5=SYSMIS). RECODE DRG_NoPOA (-99 -88 -66=SYSMIS). RECODE DXCCS1 (-99 -88 -66=SYSMIS). RECODE DXCCS2 (-99 -88 -66=SYSMIS). RECODE DXCCS3 (-99 -88 -66=SYSMIS). RECODE DXCCS4 (-99 -88 -66=SYSMIS). RECODE DXCCS5 (-99 -88 -66=SYSMIS). RECODE DXCCS6 (-99 -88 -66=SYSMIS). RECODE DXCCS7 (-99 -88 -66=SYSMIS). RECODE DXCCS8 (-99 -88 -66=SYSMIS). RECODE DXCCS9 (-99 -88 -66=SYSMIS). RECODE DXCCS10 (-99 -88 -66=SYSMIS). RECODE DXCCS11 (-99 -88 -66=SYSMIS). RECODE DXCCS12 (-99 -88 -66=SYSMIS). RECODE DXCCS13 (-99 -88 -66=SYSMIS). RECODE DXCCS14 (-99 -88 -66=SYSMIS). RECODE DXCCS15 (-99 -88 -66=SYSMIS). RECODE DXCCS16 (-99 -88 -66=SYSMIS). RECODE DXCCS17 (-99 -88 -66=SYSMIS). RECODE DXCCS18 (-99 -88 -66=SYSMIS). RECODE DXCCS19 (-99 -88 -66=SYSMIS). RECODE DXCCS20 (-99 -88 -66=SYSMIS). RECODE DXCCS21 (-99 -88 -66=SYSMIS). RECODE DXCCS22 (-99 -88 -66=SYSMIS). RECODE DXCCS23 (-99 -88 -66=SYSMIS). RECODE DXCCS24 (-99 -88 -66=SYSMIS). RECODE DXCCS25 (-99 -88 -66=SYSMIS). RECODE ELECTIVE (-9 -8 -6 -5=SYSMIS). RECODE E_CCS1 (-999 -888 -666=SYSMIS). RECODE E_CCS2 (-999 -888 -666=SYSMIS). RECODE E_CCS3 (-999 -888 -666=SYSMIS). RECODE E_CCS4 (-999 -888 -666=SYSMIS). RECODE FEMALE (-9 -8 -6 -5=SYSMIS). RECODE HCUP_ED (-99 -88 -66=SYSMIS). RECODE HOSPBRTH (-9 -8 -6 -5=SYSMIS). RECODE LOS (-9999 -8888 -6666=SYSMIS). RECODE LOS_X (-99999 -88888 -66666=SYSMIS). RECODE MDC (-9 -8 -6 -5=SYSMIS). RECODE MDC24 (-9 -8 -6 -5=SYSMIS). RECODE MDC_NoPOA (-9 -8 -6 -5=SYSMIS). RECODE MDNUM1_R (-9999 -8888 -6666=SYSMIS). RECODE MDNUM2_R (-9999 -8888 -6666=SYSMIS). RECODE NCHRONIC (-9 -8 -6 -5=SYSMIS). RECODE NDX (-9 -8 -6 -5=SYSMIS). RECODE NECODE (-99 -88 -66=SYSMIS). RECODE NEOMAT (-9 -8 -6 -5=SYSMIS). RECODE NIS_STRATUM (-999 -888 -666=SYSMIS). RECODE NPR (-9 -8 -6 -5=SYSMIS). RECODE ORPROC (-9 -8 -6 -5=SYSMIS). RECODE PAY1 (-9 -8 -6 -5=SYSMIS). RECODE PAY2 (-9 -8 -6 -5=SYSMIS). RECODE PL_NCHS2006 (-99 -88 -66=SYSMIS). RECODE PRCCS1 (-99 -88 -66=SYSMIS). RECODE PRCCS2 (-99 -88 -66=SYSMIS). RECODE PRCCS3 (-99 -88 -66=SYSMIS). RECODE PRCCS4 (-99 -88 -66=SYSMIS). RECODE PRCCS5 (-99 -88 -66=SYSMIS). RECODE PRCCS6 (-99 -88 -66=SYSMIS). RECODE PRCCS7 (-99 -88 -66=SYSMIS). RECODE PRCCS8 (-99 -88 -66=SYSMIS). RECODE PRCCS9 (-99 -88 -66=SYSMIS). RECODE PRCCS10 (-99 -88 -66=SYSMIS). RECODE PRCCS11 (-99 -88 -66=SYSMIS). RECODE PRCCS12 (-99 -88 -66=SYSMIS). RECODE PRCCS13 (-99 -88 -66=SYSMIS). RECODE PRCCS14 (-99 -88 -66=SYSMIS). RECODE PRCCS15 (-99 -88 -66=SYSMIS). RECODE PRDAY1 (-99 -88 -66=SYSMIS). RECODE PRDAY2 (-99 -88 -66=SYSMIS). RECODE PRDAY3 (-99 -88 -66=SYSMIS). RECODE PRDAY4 (-99 -88 -66=SYSMIS). RECODE PRDAY5 (-99 -88 -66=SYSMIS). RECODE PRDAY6 (-99 -88 -66=SYSMIS). RECODE PRDAY7 (-99 -88 -66=SYSMIS). RECODE PRDAY8 (-99 -88 -66=SYSMIS). RECODE PRDAY9 (-99 -88 -66=SYSMIS). RECODE PRDAY10 (-99 -88 -66=SYSMIS). RECODE PRDAY11 (-99 -88 -66=SYSMIS). RECODE PRDAY12 (-99 -88 -66=SYSMIS). RECODE PRDAY13 (-99 -88 -66=SYSMIS). RECODE PRDAY14 (-99 -88 -66=SYSMIS). RECODE PRDAY15 (-99 -88 -66=SYSMIS). RECODE RACE (-9 -8 -6 -5=SYSMIS). RECODE TOTCHG (-999999999 -888888888 -666666666=SYSMIS). RECODE TOTCHG_X (-99999999999.99 -88888888888.88 -66666666666.66=SYSMIS). RECODE TRAN_IN (-9 -8 -6 -5=SYSMIS). RECODE YEAR (-999 -888 -666=SYSMIS). RECODE ZIPINC_QRTL (-9 -8 -6 -5=SYSMIS). SAVE OUTFILE = 'NIS_2009_Core.SAV' / COMPRESSED.