/*Published: 11/01/2018*/ /********************** COMMENTS ***********************************/ /* */ /* Please Note: If you are using PC SAS to read in these files you */ /* will have to un-zip the files first and use the un-zipped filename */ /* statement, rather than using the zipped files and statement. */ /* */ /***********************************************************************/ *filename partDin '/directory/PTD.denom.txt'; /*reading in an un-zipped file*/ filename partDin pipe 'gunzip -c /directory/PTD.denom.txt.gz'; /*reading in a zipped file*/ options nocenter validvarname=upcase; data partD; infile partDin lrecl=803 missover pad; input @0001 linkid $char11. @0012 rtirace $char1. @0013 (cred07-cred16) ($char1.) @0023 (plan07_01-plan07_12) ($char1.) @0035 (plan08_01-plan08_12) ($char1.) @0047 (plan09_01-plan09_12) ($char1.) @0059 (plan10_01-plan10_12) ($char1.) @0071 (plan11_01-plan11_12) ($char1.) @0083 (plan12_01-plan12_12) ($char1.) @0095 (plan13_01-plan13_12) ($char1.) @0107 (plan14_01-plan14_12) ($char1.) @0119 (plan15_01-plan15_12) ($char1.) @0131 (plan16_01-plan16_12) ($char1.) @0143 (cost07_01-cost07_12) ($char2.) @0167 (cost08_01-cost08_12) ($char2.) @0191 (cost09_01-cost09_12) ($char2.) @0215 (cost10_01-cost10_12) ($char2.) @0239 (cost11_01-cost11_12) ($char2.) @0263 (cost12_01-cost12_12) ($char2.) @0287 (cost13_01-cost13_12) ($char2.) @0311 (cost14_01-cost14_12) ($char2.) @0335 (cost15_01-cost15_12) ($char2.) @0359 (cost16_01-cost16_12) ($char2.) @0383 (rds07_01-rds07_12) ($char1.) @0395 (rds08_01-rds08_12) ($char1.) @0407 (rds09_01-rds09_12) ($char1.) @0419 (rds10_01-rds10_12) ($char1.) @0431 (rds11_01-rds11_12) ($char1.) @0443 (rds12_01-rds12_12) ($char1.) @0455 (rds13_01-rds13_12) ($char1.) @0467 (rds14_01-rds14_12) ($char1.) @0479 (rds15_01-rds15_12) ($char1.) @0491 (rds16_01-rds16_12) ($char1.) @0503 (dual07_01-dual07_12) ($char2.) @0527 (dual08_01-dual08_12) ($char2.) @0551 (dual09_01-dual09_12) ($char2.) @0575 (dual10_01-dual10_12) ($char2.) @0599 (dual11_01-dual11_12) ($char2.) @0623 (dual12_01-dual12_12) ($char2.) @0647 (dual13_01-dual13_12) ($char2.) @0671 (dual14_01-dual14_12) ($char2.) @0695 (dual15_01-dual15_12) ($char2.) @0719 (dual16_01-dual16_12) ($char2.) @0743 (ptd07-ptd16) ($char2.) @0763 (rdscnt07-rdscnt16 ) ($char2.) @0783 (dualcnt07-dualcnt16) ($char2.) ; * Labels *; label linkid = "Patient ID" rtirace = "Research Triangle Institute Race Code (PartD - last available year)" cred07 = "On/Off Creditable Coverage Switch (PartD - 2007)" cred08 = "On/Off Creditable Coverage Switch (PartD - 2008)" cred09 = "On/Off Creditable Coverage Switch (PartD - 2009)" cred10 = "On/Off Creditable Coverage Switch (PartD - 2010)" cred11 = "On/Off Creditable Coverage Switch (PartD - 2011)" cred12 = "On/Off Creditable Coverage Switch (PartD - 2012)" cred13 = "On/Off Creditable Coverage Switch (PartD - 2013)" cred14 = "On/Off Creditable Coverage Switch (PartD - 2014)" cred15 = "On/Off Creditable Coverage Switch (PartD - 2015)" cred16 = "On/Off Creditable Coverage Switch (PartD - 2016)" plan07_01 = "Plan-Value Indicators (January) (PartD - 2007)" plan08_01 = "Plan-Value Indicators (January) (PartD - 2008)" plan09_01 = "Plan-Value Indicators (January) (PartD - 2009)" plan10_01 = "Plan-Value Indicators (January) (PartD - 2010)" plan11_01 = "Plan-Value Indicators (January) (PartD - 2011)" plan12_01 = "Plan-Value Indicators (January) (PartD - 2012)" plan13_01 = "Plan-Value Indicators (January) (PartD - 2013)" plan14_01 = "Plan-Value Indicators (January) (PartD - 2014)" plan15_01 = "Plan-Value Indicators (January) (PartD - 2015)" plan16_01 = "Plan-Value Indicators (January) (PartD - 2016)" cost07_01 = "Denominator Cost Share Group (January) (PartD - 2007)" cost08_01 = "Denominator Cost Share Group (January) (PartD - 2008)" cost09_01 = "Denominator Cost Share Group (January) (PartD - 2009)" cost10_01 = "Denominator Cost Share Group (January) (PartD - 2010)" cost11_01 = "Denominator Cost Share Group (January) (PartD - 2011)" cost12_01 = "Denominator Cost Share Group (January) (PartD - 2012)" cost13_01 = "Denominator Cost Share Group (January) (PartD - 2013)" cost14_01 = "Denominator Cost Share Group (January) (PartD - 2014)" cost15_01 = "Denominator Cost Share Group (January) (PartD - 2015)" cost16_01 = "Denominator Cost Share Group (January) (PartD - 2016)" rds07_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2007)" rds08_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2008)" rds09_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2009)" rds10_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2010)" rds11_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2011)" rds12_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2012)" rds13_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2013)" rds14_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2014)" rds15_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2015)" rds16_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2016)" dual07_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2007)" dual08_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2008)" dual09_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2009)" dual10_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2010)" dual11_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2011)" dual12_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2012)" dual13_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2013)" dual14_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2014)" dual15_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2015)" dual16_01 = "State Reported Dual Eligible Status Code (January) (PartD - 2016)" ptd07 = "Plan Coverage Months (PartD - 2007)" ptd08 = "Plan Coverage Months (PartD - 2008)" ptd09 = "Plan Coverage Months (PartD - 2009)" ptd10 = "Plan Coverage Months (PartD - 2010)" ptd11 = "Plan Coverage Months (PartD - 2011)" ptd12 = "Plan Coverage Months (PartD - 2012)" ptd13 = "Plan Coverage Months (PartD - 2013)" ptd14 = "Plan Coverage Months (PartD - 2014)" ptd15 = "Plan Coverage Months (PartD - 2015)" ptd16 = "Plan Coverage Months (PartD - 2016)" rdscnt07 = "Retiree Drug Subsidy Months (PartD - 2007)" rdscnt08 = "Retiree Drug Subsidy Months (PartD - 2008)" rdscnt09 = "Retiree Drug Subsidy Months (PartD - 2009)" rdscnt10 = "Retiree Drug Subsidy Months (PartD - 2010)" rdscnt11 = "Retiree Drug Subsidy Months (PartD - 2011)" rdscnt12 = "Retiree Drug Subsidy Months (PartD - 2012)" rdscnt13 = "Retiree Drug Subsidy Months (PartD - 2013)" rdscnt14 = "Retiree Drug Subsidy Months (PartD - 2014)" rdscnt15 = "Retiree Drug Subsidy Months (PartD - 2015)" rdscnt16 = "Retiree Drug Subsidy Months (PartD - 2016)" dualcnt07 = "Medicaid Dual Eligible Months (PartD - 2007)" dualcnt08 = "Medicaid Dual Eligible Months (PartD - 2008)" dualcnt09 = "Medicaid Dual Eligible Months (PartD - 2009)" dualcnt10 = "Medicaid Dual Eligible Months (PartD - 2010)" dualcnt11 = "Medicaid Dual Eligible Months (PartD - 2011)" dualcnt12 = "Medicaid Dual Eligible Months (PartD - 2012)" dualcnt13 = "Medicaid Dual Eligible Months (PartD - 2013)" dualcnt14 = "Medicaid Dual Eligible Months (PartD - 2014)" dualcnt15 = "Medicaid Dual Eligible Months (PartD - 2015)" dualcnt16 = "Medicaid Dual Eligible Months (PartD - 2016)" ; run; proc contents data=partD position; run;