/* Published: 03/11/2024 */

/**************************   COMMENTS   *******************************/
/* THIS INPUT STATMENT IS FOR THE 2022 SEER-MEDICARE LINKAGE.          */
/***********************************************************************/

/***************   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.                                         */
/***********************************************************************/
/* Six segments are provided for the HHA claims files: base (claims),  */
/* revenue, condition, occurrence, span and value.                     */
/* The Patient ID and ENC_JOIN_KEY (column 18) should be used to merge */
/* these 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 hhabase '/directory/hha2019.base.enc.txt';                    /* reading in an un-zipped file* /
*filename hhabase pipe 'gunzip -c /directory/hha2019.base.enc.txt.gz';  /* reading in a zipped file */
*filename hhabase pipe 'gunzip -c /directory/hha*.base.enc.txt.gz';     /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hhabase_enc;
  infile hhabase lrecl=592 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                       $char6.
        @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.
        @116 CLM_RCPT_DT                      $char8.
        @124 CLM_FAC_TYPE_CD                  $char1.
        @125 CLM_SRVC_CLSFCTN_TYPE_CD         $char1.
        @126 CLM_FREQ_CD                      $char1.
        @127 CNTRCT_NUM                       $char5.
        @132 CNTRCT_PBP_NUM                   $char3.
        @135 CLM_MDCL_REC                     $char1.
        @136 ORG_NPI                          $char10.  /* Encrypted */
        @146 ORG_TXNMY_CD                     $char10.
        @156 RNDRNG_PHYSN_NPI                 $char10.  /* Encrypted */
        @166 RFRG_PHYSN_NPI                   $char10.  /* Encrypted */
        @176 AT_PHYSN_NPI                     $char10.  /* Encrypted */
        @186 AT_PHYSN_TXNMY_CD                $char10.
        @196 OP_PHYSN_NPI                     $char10.  /* Encrypted */
        @206 OT_PHYSN_NPI                     $char10.  /* Encrypted */
        @216 CLM_ADMSN_DT                     $char8.   /* YYMMDD8 */
        @224 PTNT_DSCHRG_STUS_CD              $char2.
        @226 BENE_DSCHRG_DT                   $char8.   /* YYMMDD8 */
        @234 PRNCPAL_DGNS_CD                  $char7.
        @241 ICD_DGNS_CD1                     $char7.
        @248 ICD_DGNS_CD2                     $char7.
        @255 ICD_DGNS_CD3                     $char7.
        @262 ICD_DGNS_CD4                     $char7.
        @269 ICD_DGNS_CD5                     $char7.
        @276 ICD_DGNS_CD6                     $char7.
        @283 ICD_DGNS_CD7                     $char7.
        @290 ICD_DGNS_CD8                     $char7.
        @297 ICD_DGNS_CD9                     $char7.
        @304 ICD_DGNS_CD10                    $char7.
        @311 ICD_DGNS_CD11                    $char7.
        @318 ICD_DGNS_CD12                    $char7.
        @325 ICD_DGNS_CD13                    $char7.
        @332 ICD_DGNS_CD14                    $char7.
        @339 ICD_DGNS_CD15                    $char7.
        @346 ICD_DGNS_CD16                    $char7.
        @353 ICD_DGNS_CD17                    $char7.
        @360 ICD_DGNS_CD18                    $char7.
        @367 ICD_DGNS_CD19                    $char7.
        @374 ICD_DGNS_CD20                    $char7.
        @381 ICD_DGNS_CD21                    $char7.
        @388 ICD_DGNS_CD22                    $char7.
        @395 ICD_DGNS_CD23                    $char7.
        @402 ICD_DGNS_CD24                    $char7.
        @409 ICD_DGNS_CD25                    $char7.
        @416 CLM_1ST_DGNS_E_CD                $char7.
        @423 ICD_DGNS_E_CD1                   $char7.
        @430 ICD_DGNS_E_CD2                   $char7.
        @437 ICD_DGNS_E_CD3                   $char7.
        @444 RSN_VISIT_CD1                    $char7.
        @451 RSN_VISIT_CD2                    $char7.
        @458 RSN_VISIT_CD3                    $char7.
        @465 CLM_OBSLT_DT                     $char8.  /* YYMMDD8 */
        @503 CLM_BPRVDR_USPS_STATE_CD         $char2.
        @505 CLM_BPRVDR_ADR_ZIP_CD            $char9.  /* Encrypted */
        @544 CLM_SUBSCR_USPS_STATE_CD         $char2.
        @546 CLM_SUBSCR_ADR_ZIP_CD            $char9.  /* Encrypted */
        @555 BENE_CNTY_CD                     $char3.
        @558 BENE_STATE_CD                    $char2.
        @560 BENE_MLG_CNTCT_ZIP_CD            $char9.  /* Encrypted */
        @569 GNDR_CD                          $char1.
        @570 BENE_RACE_CD                     $char1.
        @571 DOB_YEAR                         $char4.
        @579 BENE_MDCR_STUS_CD                $char2.
        @581 TAX_NUM                          $char10. /* Encrypted */
        @591 BENE_STATE                       $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_FAC_TYPE_CD                  = "Claim Facility Type Code"
        CLM_SRVC_CLSFCTN_TYPE_CD         = "Claim Service classification Type Code"
        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"
        RNDRNG_PHYSN_NPI                 = "Claim Rendering Physician NPI Number"
        RFRG_PHYSN_NPI                   = "Claim Referring Physician NPI Number"
        AT_PHYSN_NPI                     = "Claim Attending Physician NPI Number"
        AT_PHYSN_TXNMY_CD                = "Claim Attending Physician Taxonomy Code"
        OP_PHYSN_NPI                     = "Claim Operating Physician NPI Number"
        OT_PHYSN_NPI                     = "Claim Other Physician NPI Number"
        CLM_ADMSN_DT                     = "Claim Admission Date"
        PTNT_DSCHRG_STUS_CD              = "Patient Discharge Status Code"
        BENE_DSCHRG_DT                   = "Beneficiary Discharge Date"
        PRNCPAL_DGNS_CD                  = "Claim Principal Diagnosis Code"
        ICD_DGNS_CD1                     = "Claim Diagnosis Code 1"
        ICD_DGNS_CD2                     = "Claim Diagnosis Code 2"
        ICD_DGNS_CD3                     = "Claim Diagnosis Code 3"
        ICD_DGNS_CD4                     = "Claim Diagnosis Code 4"
        ICD_DGNS_CD5                     = "Claim Diagnosis Code 5"
        ICD_DGNS_CD6                     = "Claim Diagnosis Code 6"
        ICD_DGNS_CD7                     = "Claim Diagnosis Code 7"
        ICD_DGNS_CD8                     = "Claim Diagnosis Code 8"
        ICD_DGNS_CD9                     = "Claim Diagnosis Code 9"
        ICD_DGNS_CD10                    = "Claim Diagnosis Code 10"
        ICD_DGNS_CD11                    = "Claim Diagnosis Code 11"
        ICD_DGNS_CD12                    = "Claim Diagnosis Code 12"
        ICD_DGNS_CD13                    = "Claim Diagnosis Code 13"
        ICD_DGNS_CD14                    = "Claim Diagnosis Code 14"
        ICD_DGNS_CD15                    = "Claim Diagnosis Code 15"
        ICD_DGNS_CD16                    = "Claim Diagnosis Code 16"
        ICD_DGNS_CD17                    = "Claim Diagnosis Code 17"
        ICD_DGNS_CD18                    = "Claim Diagnosis Code 18"
        ICD_DGNS_CD19                    = "Claim Diagnosis Code 19"
        ICD_DGNS_CD20                    = "Claim Diagnosis Code 20"
        ICD_DGNS_CD21                    = "Claim Diagnosis Code 21"
        ICD_DGNS_CD22                    = "Claim Diagnosis Code 22"
        ICD_DGNS_CD23                    = "Claim Diagnosis Code 23"
        ICD_DGNS_CD24                    = "Claim Diagnosis Code 24"
        ICD_DGNS_CD25                    = "Claim Diagnosis Code 25"
        CLM_1ST_DGNS_E_CD                = "First Claim Diagnosis E Code"
        ICD_DGNS_E_CD1                   = "Claim Diagnosis E Code 1"
        ICD_DGNS_E_CD2                   = "Claim Diagnosis E Code 2"
        ICD_DGNS_E_CD3                   = "Claim Diagnosis E Code 3"
        RSN_VISIT_CD1                    = "Reason for Visit Diagnosis Code 1"
        RSN_VISIT_CD2                    = "Reason for Visit Diagnosis Code 2"
        RSN_VISIT_CD3                    = "Reason for Visit Diagnosis Code 3"
        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_YEAR                         = "Year of Birth"
        BENE_MDCR_STUS_CD                = "Beneficiary Medicare Status Code"
        TAX_NUM                          = "Provider Tax Number"
        BENE_STATE                       = "Beneficiary State Postal Code"
        ;
run;
proc contents data=hhabase_enc position;
Title 'proc contents, HHA Base Encounter file';
run;

*filename hhareven '/directory/hha2019.revenue.enc.txt';                    /* reading in an un-zipped file* /
*filename hhareven pipe 'gunzip -c /directory/hha2019.revenue.enc.txt.gz';  /* reading in a zipped file */
*filename hhareven pipe 'gunzip -c /directory/hha*.revenue.enc.txt.gz';   /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hharevenue_enc;
  infile hhareven lrecl=154 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                     $char13.
        @048 CLM_THRU_DT                      $char8.   /* YYMMDD8 */
        @056 REV_CNTR                         $char4.
        @060 REV_CNTR_FROM_DT                 $char8.   /* YYMMDD8 */
        @068 REV_CNTR_THRU_DT                 $char8.   /* YYMMDD8 */
        @076 REV_CNTR_UNIT_CNT                $char8.
        @084 HCPCS_CD                         $char5.
        @089 HCPCS_1ST_MDFR_CD                $char2.
        @091 HCPCS_2ND_MDFR_CD                $char2.
        @093 HCPCS_3RD_MDFR_CD                $char2.
        @095 REV_CNTR_IDE_NDC_UPC_NUM         $char24.
        @119 REV_CNTR_NDC_QTY                 10.3
        @129 REV_CNTR_NDC_QTY_QLFR_CD         $char2.
        @131 REV_CNTR_RNDRNG_PHYSN_NPI        $char10.   /* Encrypted */
        @141 LINE_LTST_CLM_IND                $char1.
        @142 LINE_NUM_ORIG                    $char13.
        ;

  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"
        REV_CNTR                         = "Revenue Center Code"
        REV_CNTR_FROM_DT                 = "Revenue Center From Date"
        REV_CNTR_THRU_DT                 = "Revenue Center Thru Date"
        REV_CNTR_UNIT_CNT                = "Revenue Center Unit Count"
        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"
        REV_CNTR_IDE_NDC_UPC_NUM         = "Revenue Center IDE, NDC, or UPC Number"
        REV_CNTR_NDC_QTY                 = "Revenue Center National Drug Code (NDC) Quantity"
        REV_CNTR_NDC_QTY_QLFR_CD         = "Revenue Center NDC Quantity Qualifier Code"
        REV_CNTR_RNDRNG_PHYSN_NPI        = "Revenue Center Rendering Physician NPI"
        LINE_LTST_CLM_IND                = "Line Latest Claim Indicator"
        LINE_NUM_ORIG                    = "Original Claim Line Number"
         ;
run;
proc contents data=hharevenue_enc position;
Title 'proc contents, HHA Revenue Encounter file';
run;

*filename hhacond '/directory/hha2019.condition.enc.txt';                    /* reading in an un-zipped file* /
*filename hhacond pipe 'gunzip -c /directory/hha2019.condition.enc.txt.gz';  /* reading in a zipped file */
*filename hhacond pipe 'gunzip -c /directory/hha*.condition.enc.txt.gz';   /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hhacondition_enc;
  infile hhacond lrecl=38 missover pad;
  input
       @01  patient_id               $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
       @16  ENC_JOIN_KEY             $char15.  /* Encrypted */
       @31  CLM_TYPE_CD              $char4.
       @35  RLT_COND_CD_SEQ          $char2.
       @37  CLM_RLT_COND_CD          $char2.
     ;

  label
     patient_id             = "Patient ID"
     ENC_JOIN_KEY           = "Unique Encounter Join Key"
     CLM_TYPE_CD            = "Claim Type Code"
     RLT_COND_CD_SEQ        = "Claim Related Condition Code Sequence"
     CLM_RLT_COND_CD        = "Claim Related Condition Code"
    ;
run;
proc contents data=hhacondition_enc position;
Title 'proc contents, HHA Condition Encounter file';
run;

*filename hhaoccur '/directory/hha2019.occurrence.enc.txt';                    /* reading in an un-zipped file* /
*filename hhaoccur pipe 'gunzip -c /directory/hha2019.occurrence.enc.txt.gz';  /* reading in a zipped file */
*filename hhaoccur pipe 'gunzip -c /directory/hha*.occurrence.enc.txt.gz';   /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hhaoccurrence_enc;
  infile hhaoccur lrecl=46 missover pad;
  input
      @001 patient_id               $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
      @16  ENC_JOIN_KEY             $char15.  /* Encrypted */
      @31  CLM_TYPE_CD              $char4.
      @35  RLT_OCRNC_CD_SEQ         $char2.
      @37  CLM_RLT_OCRNC_CD         $char2.
      @39  CLM_RLT_OCRNC_DT         $char8.   /*  YYMMDD8  */
     ;

  label
     patient_id           = "Patient ID"
     ENC_JOIN_KEY         = "Unique Encounter Join Key"
     CLM_TYPE_CD          = "Claim Type Code"
     RLT_OCRNC_CD_SEQ     = "Claim Related Occurrence Code Sequence"
     CLM_RLT_OCRNC_CD     = "Claim Related Occurrence Code"
     CLM_RLT_OCRNC_DT     = "Claim Related Occurrence Date"
    ;
run;
proc contents data=hhaoccurrence_enc position;
Title 'proc contents, HHA Occurrence Encounter file';
run;

*filename hhaspan '/directory/hha2019.span.enc.txt';                    /* reading in an un-zipped file* /
*filename hhaspan pipe 'gunzip -c /directory/hha2019.span.enc.txt.gz';  /* reading in a zipped file */
*filename hhaspan pipe 'gunzip -c /directory/hha*.span.enc.txt.gz';   /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hhaspan_enc;
  infile hhaspan lrecl=54 missover pad;
  input
      @01  patient_id            $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
      @16  ENC_JOIN_KEY          $char15.  /* Encrypted */
      @31  CLM_TYPE_CD           $char4.
      @35  RLT_SPAN_CD_SEQ       $char2.
      @37  CLM_SPAN_CD           $char2.
      @39  CLM_SPAN_FROM_DT      $char8.  /*  YYMMDD8  */
      @47  CLM_SPAN_THRU_DT      $char8.  /*  YYMMDD8  */
     ;

  label
     patient_id          = "Patient ID"
     ENC_JOIN_KEY        = "Unique Encounter Join Key"
     CLM_TYPE_CD         = "Claim Type Code"
     RLT_SPAN_CD_SEQ     = "Claim Related Span Code Sequence"
     CLM_SPAN_CD         = "Claim Occurrence Span Code"
     CLM_SPAN_FROM_DT    = "Claim Occurrence Span From Date"
     CLM_SPAN_THRU_DT    = "Claim Occurrence Span Through Date"
    ;
run;
proc contents data=hhaspan_enc position;
Title 'proc contents, HHA SPAN Encounter file';
run;

*filename hhavalue '/directory/hha2019.value.enc.txt';                    /* reading in an un-zipped file* /
*filename hhavalue pipe 'gunzip -c /directory/hha2019.value.enc.txt.gz';  /* reading in a zipped file */
*filename hhavalue pipe 'gunzip -c /directory/hha*.value.enc.txt.gz';   /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data hhavalue_enc;
  infile hhavalue lrecl=38 missover pad;
  input
       @01  patient_id               $char15.  /* Patient ID (for either Cancer or Non-Cancer Patients) */
       @16  ENC_JOIN_KEY             $char15.  /* Encrypted */
       @31  CLM_TYPE_CD              $char4.
       @35  RLT_VAL_CD_SEQ           $char2.
       @37  CLM_VAL_CD               $char2.
      ;

  label
     patient_id        = "Patient ID"
     ENC_JOIN_KEY      = "Unique Encounter Join Key"
     CLM_TYPE_CD       = "Claim Type Code"
     RLT_VAL_CD_SEQ    = "Claim Related Value Code Sequence"
     CLM_VAL_CD        = "Claim Value Code"
     ;
run;
proc contents data=hhavalue_enc position;
Title 'proc contents, HHA Value Encounter file';
run;