/* Published: 03/11/2024 */

/**************************   COMMENTS   *******************************/
/* THIS INPUT STATMENT IS FOR THE 2022 SEER-MEDICARE LINKAGE.          */
/* IF YOU RECEIVED DME FILES BEFORE NOVEMBER 2021 THEN YOU WILL        */
/* NEED A DIFFERENT INPUT STATEMENT. PLEASE CONTACT IMS VIA E-MAIL AT  */
/* SEER-MEDICARE@IMSWEB.COM AND AN INPUT STATEMENT WILL BE SENT TO YOU */
/***********************************************************************/

/***************   IMPORTANT PROGRAMING NOTES   ************************/
/*               TO IDENTIFY CLAIMS PER PATIENT                        */
/*                                                                     */
/* The Patient ID and ENC_JOIN_KEY (column 18/16) should be used to    */
/* identify all the records for each claim per patient.  Both are      */
/* needed to identify a claim.                                         */
/***********************************************************************/
/* Two segments are provided for the DME claims files: base (claims)   */
/* and line.                                                           */
/* The Patient ID and ENC_JOIN_KEY (column 18) should be used to merge */
/* these two files.                                                    */
/***********************************************************************/
/* 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 dmebase  '/directory/dme2019.base.enc.txt';                   /*reading in an un-zipped file*/
*filename dmebase pipe 'gunzip -c /directory/dme2019.base.enc.txt.gz';  /*reading in a zipped file*/
*filename dmebase pipe 'gunzip -c /directory/dme*.base.enc.txt.gz';     /*using wildcard to match multiple files */

options nocenter validvarname=upcase;

data dmebase_enc;
  infile dmebase lrecl=415 missover pad;
  input
        @001 PATIENT_ID                       $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
        @016 SAMPLE_GROUP                     $char2.
        @018 ENC_JOIN_KEY                     $char15.  /* Encrypted*/
        @033 CLM_TYPE_CD                      $char4.
        @037 CLM_FROM_DT                      $char8.   /* YYMMDD8 */
        @045 CLM_THRU_DT                      $char8.   /* YYMMDD8 */
        @053 SRVC_MONTH                       6.
        @059 CLM_CHRT_RVW_SW                  $char1.
        @060 CLM_CNTL_NUM                     $char23.
        @083 CLM_ORIG_CNTL_NUM                $char23.
        @106 CLM_FINL_ACTN_IND                $char1.
        @107 CLM_LTST_CLM_IND                 $char1.
        @108 EDPS_CREATE_DT                   $char8.    /* YYMMDD8 */
        @116 CLM_RCPT_DT                      $char8.    /* YYMMDD8 */
        @124 CLM_FREQ_CD                      $char1.
        @125 CNTRCT_NUM                       $char5.
        @130 CNTRCT_PBP_NUM                   $char3.
        @133 CLM_MDCL_REC                     $char1.
        @134 ORG_NPI                          $char10.   /* Encrypted */
        @144 ORG_TXNMY_CD                     $char10.
        @154 RFRG_PHYSN_NPI                   $char10.   /* Encrypted */
        @164 PRNCPAL_DGNS_CD                  $char7.
        @171 PRNCPAL_DGNS_VRSN_CD             $char1.
        @172 ICD_DGNS_CD1                     $char7.
        @179 ICD_DGNS_VRSN_CD1                $char1.
        @180 ICD_DGNS_CD2                     $char7.
        @187 ICD_DGNS_VRSN_CD2                $char1.
        @188 ICD_DGNS_CD3                     $char7.
        @195 ICD_DGNS_VRSN_CD3                $char1.
        @196 ICD_DGNS_CD4                     $char7.
        @203 ICD_DGNS_VRSN_CD4                $char1.
        @204 ICD_DGNS_CD5                     $char7.
        @211 ICD_DGNS_VRSN_CD5                $char1.
        @212 ICD_DGNS_CD6                     $char7.
        @219 ICD_DGNS_VRSN_CD6                $char1.
        @220 ICD_DGNS_CD7                     $char7.
        @227 ICD_DGNS_VRSN_CD7                $char1.
        @228 ICD_DGNS_CD8                     $char7.
        @235 ICD_DGNS_VRSN_CD8                $char1.
        @236 ICD_DGNS_CD9                     $char7.
        @243 ICD_DGNS_VRSN_CD9                $char1.
        @244 ICD_DGNS_CD10                    $char7.
        @251 ICD_DGNS_VRSN_CD10               $char1.
        @252 ICD_DGNS_CD11                    $char7.
        @259 ICD_DGNS_VRSN_CD11               $char1.
        @260 ICD_DGNS_CD12                    $char7.
        @267 ICD_DGNS_VRSN_CD12               $char1.
        @268 ICD_DGNS_CD13                    $char7.
        @275 ICD_DGNS_VRSN_CD13               $char1.
        @276 CLM_OBSLT_DT                     $char8.  /* YYMMDD8 */
        @314 CLM_BPRVDR_USPS_STATE_CD         $char2.
        @316 CLM_BPRVDR_ADR_ZIP_CD            $char9.  /* Encrypted */
        @355 CLM_SUBSCR_USPS_STATE_CD         $char2.
        @357 CLM_SUBSCR_ADR_ZIP_CD            $char9.  /* Encrypted */
        @366 BENE_CNTY_CD                     $char3.
        @369 BENE_STATE_CD                    $char2.
        @371 BENE_MLG_CNTCT_ZIP_CD            $char9.  /* Encrypted */
        @380 GNDR_CD                          $char1.
        @381 BENE_RACE_CD                     $char1.
        @382 DOB_YEAR                         $char4.
        @390 BENE_MDCR_STUS_CD                $char2.
        @392 TAX_NUM                          $char10.  /* Encrypted */
        @402 BENE_STATE                       $char2.
        @404 RNDRNG_PHYSN_NPI                 $char10.  /* Encrypted */
        @414 CLM_PLACE_OF_SRVC_CD             $char2.
         ;

  label PATIENT_ID                       = "Patient ID"
        SAMPLE_GROUP                     = "CCW Beneficiary Random Sample Group"
        ENC_JOIN_KEY                     = "Unique Encounter Join Key"
        CLM_TYPE_CD                      = "Claim Type Code"
        CLM_FROM_DT                      = "Claim From Date"
        CLM_THRU_DT                      = "Claim Through Date"
        SRVC_MONTH                       = "Service Month"
        CLM_CHRT_RVW_SW                  = "Claim Chart Review Switch"
        CLM_CNTL_NUM                     = "Claim Control Number"
        CLM_ORIG_CNTL_NUM                = "Claim Original Control Number"
        CLM_FINL_ACTN_IND                = "Claim Final Action Indicator"
        CLM_LTST_CLM_IND                 = "Latest Claim Indicator"
        EDPS_CREATE_DT                   = "Encounter Data Processing System (EDPS) Create Date"
        CLM_RCPT_DT                      = "Claim Receipt Date"
        CLM_FREQ_CD                      = "Claim Frequency Code"
        CNTRCT_NUM                       = "Medicare Part C Contract Number"
        CNTRCT_PBP_NUM                   = "Medicare Part C Plan Benefit Package (PBP) Number"
        CLM_MDCL_REC                     = "Claim Medical Record Number"
        ORG_NPI                          = "Organization NPI Number"
        ORG_TXNMY_CD                     = "Organization Taxonomy Code"
        RFRG_PHYSN_NPI                   = "Claim Referring Physician NPI Number"
        PRNCPAL_DGNS_CD                  = "Claim Principal Diagnosis Code"
        PRNCPAL_DGNS_VRSN_CD             = "Claim Principal Diagnosis Code Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD1                     = "Claim Diagnosis Code 1"
        ICD_DGNS_VRSN_CD1                = "Claim Diagnosis Code 1 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD2                     = "Claim Diagnosis Code 2"
        ICD_DGNS_VRSN_CD2                = "Claim Diagnosis Code 2 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD3                     = "Claim Diagnosis Code 3"
        ICD_DGNS_VRSN_CD3                = "Claim Diagnosis Code 3 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD4                     = "Claim Diagnosis Code 4"
        ICD_DGNS_VRSN_CD4                = "Claim Diagnosis Code 4 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD5                     = "Claim Diagnosis Code 5"
        ICD_DGNS_VRSN_CD5                = "Claim Diagnosis Code 5 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD6                     = "Claim Diagnosis Code 6"
        ICD_DGNS_VRSN_CD6                = "Claim Diagnosis Code 6 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD7                     = "Claim Diagnosis Code 7"
        ICD_DGNS_VRSN_CD7                = "Claim Diagnosis Code 7 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD8                     = "Claim Diagnosis Code 8"
        ICD_DGNS_VRSN_CD8                = "Claim Diagnosis Code 8 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD9                     = "Claim Diagnosis Code 9"
        ICD_DGNS_VRSN_CD9                = "Claim Diagnosis Code 9 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD10                    = "Claim Diagnosis Code 10"
        ICD_DGNS_VRSN_CD10               = "Claim Diagnosis Code 10 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD11                    = "Claim Diagnosis Code 11"
        ICD_DGNS_VRSN_CD11               = "Claim Diagnosis Code 11 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD12                    = "Claim Diagnosis Code 12"
        ICD_DGNS_VRSN_CD12               = "Claim Diagnosis Code 12 Diagnosis Version Code (ICD-9 or ICD-10)"
        ICD_DGNS_CD13                    = "Claim Diagnosis Code 13"
        ICD_DGNS_VRSN_CD13               = "Claim Diagnosis Code 13 Diagnosis Version Code (ICD-9 or ICD-10)"
        CLM_OBSLT_DT                     = "Claim Obsolete Date"
        CLM_BPRVDR_USPS_STATE_CD         = "Billing Provider Address - USPS State Code"
        CLM_BPRVDR_ADR_ZIP_CD            = "Billing Provider Address - ZIP Code"
        CLM_SUBSCR_USPS_STATE_CD         = "Medicare Subscriber Address - USPS State Code"
        CLM_SUBSCR_ADR_ZIP_CD            = "Medicare Subscriber Address - ZIP Code"
        BENE_CNTY_CD                     = "Beneficiary County Code from Claim (SSA)"
        BENE_STATE_CD                    = "Beneficiary Residence (SSA) State Code"
        BENE_MLG_CNTCT_ZIP_CD            = "Beneficiary ZIP Code of Residence"
        GNDR_CD                          = "Gender Code"
        BENE_RACE_CD                     = "Race Code"
        DOB_DT                           = "Date of Birth"
        BENE_MDCR_STUS_CD                = "Beneficiary Medicare Status Code"
        TAX_NUM                          = "Provider Tax Number"
        BENE_STATE                       = "Beneficiary State Postal Code"
        RNDRNG_PHYSN_NPI                 = "Claim Rendering Physician NPI Number"
        CLM_PLACE_OF_SRVC_CD             = "Claim Place of Service Code"
         ;
run;

proc contents data=dmebase_enc position;
Title 'proc contents, DME Base Encounter file';
run;

*filename dmeline  '/directory/dme2019.line.enc.txt';                   /*reading in an un-zipped file*/
*filename dmeline pipe 'gunzip -c /directory/dme2019.line.enc.txt.gz';  /*reading in a zipped file*/
*filename dmeline pipe 'gunzip -c /directory/dme*.line.enc.txt.gz';     /*using wildcard to match multiple files */

data dmeline_enc;
  infile dmeline lrecl=135 missover pad;
  input
        @001 PATIENT_ID                       $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
        @016 ENC_JOIN_KEY                     $char15.  /* Encrypted */
        @031 CLM_TYPE_CD                      $char4.
        @035 CLM_LINE_NUM                     13.
        @048 CLM_THRU_DT                      $char8.   /* YYMMDD8 */
        @056 PRVDR_NPI                        $char10.  /* Encrypted */
        @066 PRVDR_SPCLTY                     $char2.
        @068 LINE_SRVC_CNT                    12.3
        @080 LINE_PLACE_OF_SRVC_CD            $char2.
        @082 LINE_1ST_EXPNS_DT                $char8.  /* YYMMDD8 */
        @090 LINE_LAST_EXPNS_DT               $char8.  /* YYMMDD8 */
        @098 HCPCS_CD                         $char5.
        @103 HCPCS_1ST_MDFR_CD                $char2.
        @105 HCPCS_2ND_MDFR_CD                $char2.
        @107 HCPCS_3RD_MDFR_CD                $char2.
        @109 HCPCS_4TH_MDFR_CD                $char2.
        @111 LINE_NDC_CD                      $char11.
        @122 LINE_LTST_CLM_IND                $char1.
        @123 LINE_NUM_ORIG                    13.
        ;

  label
        PATIENT_ID                       = "Patient ID"
        ENC_JOIN_KEY                     = "Unique Encounter Join Key"
        CLM_TYPE_CD                      = "Claim Type Code"
        CLM_LINE_NUM                     = "Claim Line Number"
        CLM_THRU_DT                      = "Claim Through Date"
        PRVDR_NPI                        = "DME Line Supplier NPI"
        PRVDR_SPCLTY                     = "Line CMS Provider Specialty Code"
        LINE_SRVC_CNT                    = "Line Service Count"
        LINE_PLACE_OF_SRVC_CD            = "Line Place of Service Code"
        LINE_1ST_EXPNS_DT                = "Line First Expense Date"
        LINE_LAST_EXPNS_DT               = "Line Last Expense Date"
        HCPCS_CD                         = "HCFA Common Procedure Coding System (HCPCS) Code"
        HCPCS_1ST_MDFR_CD                = "HCPCS Initial Modifier Code"
        HCPCS_2ND_MDFR_CD                = "HCPCS Second Modifier Code"
        HCPCS_3RD_MDFR_CD                = "HCPCS Third Modifier Code"
        HCPCS_4TH_MDFR_CD                = "HCPCS Fourth Modifier Code"
        LINE_NDC_CD                      = "Line National Drug Code (NDC)"
        LINE_LTST_CLM_IND                = "Line Latest Claim Indicator"
        LINE_NUM_ORIG                    = "Original Claim Line Number";
        ;
run;

proc contents data=dmeline_enc position;
Title 'proc contents, DME Line file';
run;