/* Published: 12/31/2012 */

/********************** COMMENTS ***************************************/
/* THIS INPUT STATMENT IS FOR THE 2012 SEER-MEDICARE LINKAGE.          */
/* IF YOU RECEIVED NCH FILES BEFORE DECEMBER 2012 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 */
/***********************************************************************/
/*                                                                     */
/* For cancer files, Patient Identifier is @01 REGCASE $char10.        */
/* For non-cancer files, Patient Identifier is @01 HICBIC $char11.     */
/*                                                                     */
/***********************************************************************/

/***************   IMPORTANT PROGRAMING NOTES   ************************/
/* TO IDENTIFY CLAIMS PER PATIENT                                      */
/*                                                                     */
/* Unlike HHA, Hospice and Outpatient, DME and NCH use only the link   */
/* number (column 451) and Patient ID to identify a claim for each     */
/* patient.                                                            */
/*                                                                     */
/***********************************************************************/

/***********************************************************************/
/* 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 nchin '/directory/nch10.txt';                        /* reading in an un-zipped file */
filename nchin pipe 'gunzip -c /directory/nch10.txt.gz';      /* reading in a zipped file */
*filename nchin pipe 'gunzip -c /directory/nch*.txt.gz';       /* using wildcard to match multiple files */

options nocenter validvarname=upcase;

data nch;
  infile nchin lrecl=744 missover pad;
  INPUT
    @001  PATIENT_ID    $char11. /* Patient ID (for either Cancer or Non-Cancer Patients) */
 /* @001  regcase       $char10. */  /* ID for Cancer Patients */
 /* @001  HICBIC        $char11. */  /* ID for Non Cancer Patients */
    @012  bic           $char2.
    @014  state_cd      $char2.
    @016  cnty_cd       $char3.
    @019  bene_zip      $char9.  /*****Special Permission Required*****/
    @028  ms_cd         $char2.
    @030  clm_type      $char2.
    @032  from_dtm      $char2.
    @034  from_dtd      $char2.
    @036  from_dty      $char4.
    @040  thru_dtm      $char2.
    @042  thru_dtd      $char2.
    @044  thru_dty      $char4.
    @048  fi_num        $char5.
    @053  entry_cd      $char1.  /* new in 2012 Linkage */
    @054  pmtdnlcd      $char1.
    @055  asgmntcd      $char1.
    @056  rfr_upin      $char6.
    @062  rfr_npi       $char10.
    @072  hcfaspec      $char2.
    @074  prtcptg       $char1.
    @075  proindcd      $char2.  /* formatted $char1. in 2010 Linkage */
    @077  pay80cd       $char1.
    @078  dedind        $char1.
    @079  payindcd      $char1.
    @080  mtuscnt       12.3     /* formatted 8. in 2010 Linkage */
    @092  mtusind       $char1.
    @093  hcpcs         $char5.
    @098  mf1           $char2.  /* named mfrcd1 in 2010 Linkage */
    @100  mf2           $char2.  /* named mfrcd2 in 2010 Linkage */
    @102  mf3           $char2.  /* new in 2012 Linkage */
    @104  mf4           $char2.  /* new in 2012 Linkage */
    @106  lsubmamt      15.2     /* named submamt in 2010 Linkage */
    @121  lalowamt      15.2     /* named alowamt in 2010 Linkage */
    @136  hcfatype      $char1.
    @137  plcsrvc       $char2.
    @139  frexpenm      $char2.
    @141  frexpend      $char2.
    @143  frexpeny      $char4.
    @147  lsexpenm      $char2.
    @149  lsexpend      $char2.
    @151  lsexpeny      $char4.
    @155  srvc_cnt      12.      /* formatted 4. in 2010 Linkage */
    @167  linediag      $char7.  /* formatted $char5. in 2010 Linkage */
    @174  linepmt       15.2
    @189  ldedamt       15.2
    @204  lprpayat      15.2
    @219  lprpaycd      $char1.
    @220  lbenpmt       15.2
    @235  lprvpmt       15.2
    @250  coinamt       15.2
    @265  lintamt       15.2     /* new in 2012 Linkage */
    @280  dedapply      15.2
    @295  prpayamt      15.2
    @310  pmt_amt       15.2
    @325  allowamt      15.2     /* named alowchrg in 2010 Linkage */
    @340  sbmtamt       15.2     /* named sbmtchrg in 2010 Linkage */
    @355  prov_pmt      15.2
    @370  prpyalow      15.2
    @385  rfr_prfl      $char14.
    @399  astnt_cd      $char1.
    @400  hcpcs_yr      $char1.
    @401  per_pin       $char10.
    @411  perupin       $char6.
    @417  prf_npi       $char10.
    @427  prgrp_npi     $char10.
    @437  prv_type      $char1.
    @438  prvstate      $char2.
    @440  prozip        $char9.
    @449  clinecnt      $char2.
    @451  link_num      $char10.
    @461  daily_dtm     $char2.
    @463  daily_dtd     $char2.
    @465  daily_dty     $char4.
    @469  DESY_SORT_KEY $CHAR9.
    @478  pdgns_cd      $char7.  /* formatted $char5. in 2010 Linkage */
    @485  cdgncnt       $char2.  /* formatted $char1. in 2010 Linkage */
    @487  (dgn_cd1-dgn_cd12) ($char7.)  /* formatted $char5. in 2010 Linkage */
    @571  betos         $char3.
    @574  benepaid      15.2     /* new in 2012 Linkage */
    @589  acrtn_dtm     $char2.  /* new in 2012 Linkage */
    @591  acrtn_dtd     $char2.  /* new in 2012 Linkage */
    @593  acrtn_dty     $char4.  /* new in 2012 Linkage */
    @597  nchben_pmt    15.2     /* new in 2012 Linkage */
    @612  cln_tril      $char8.  /* new in 2012 Linkage */
    @620  ansthcnt      12.      /* new in 2012 Linkage */
    @632  llabamt       15.2     /* new in 2012 Linkage */
    @647  llab_num      $char10. /* new in 2012 Linkage */
    @657  price_cd      $char2.  /* new in 2012 Linkage */
    @659  psych_lmt     15.2     /* new in 2012 Linkage */
    @674  ide_num       $char7.  /* new in 2012 Linkage */
    @681  tax_num       $char10. /* new in 2012 Linkage */
    @700  lrx_num       $char30. /* new in 2012 Linkage */
    @730  dup_chk       $char1.  /* new in 2012 Linkage */
    @731  hgb_rslt      $char4.  /* new in 2012 Linkage */
    @735  hgb_type      $char2.  /* new in 2012 Linkage */
    @737  year          $char4.
    @741  rec_count     3.
    ;

  label
    patient_id = 'Patient ID'
 /* regcase    = 'SEER Registry Case Number' */
 /* HICBIC     = 'Non-Cancer Patient ID' */
    bic        = '12 - Beneficiary Identification Code'
    state_cd   = '14 - Beneficiary Residence SSA Standard State Code'
    cnty_cd    = '35 - Beneficiary Residence SSA Standard County Code'
    bene_zip   = '42 - Beneficiary Mailing Contact ZIP Code'  /*****Special Permission Required*****/
    ms_cd      = '46 - CWF Beneficiary Medicare Status Code'
    clm_type   = '7 - NCH Claim Type Code'
    from_dtm   = '15 - Claim From Month'
    from_dtd   = '15 - Claim From Day'
    from_dty   = '15 - Claim From Year'
    thru_dtm   = '16 - Claim Through Month'
    thru_dtd   = '16 - Claim Through Day'
    thru_dty   = '16 - Claim Through Year'
    fi_num     = '39 - Carrier Number'
    entry_cd   = '30 - Carrier Claim Entry Code'
    pmtdnlcd   = '55 - Carrier Claim Payment Denial Code'
    asgmntcd   = '62 - Carrier Claim Provider Assignment Indicator Switch'
    rfr_upin   = '60 - Claim Referring Physician UPIN Number'
    rfr_npi    = '61 - Claim Referring Physician NPI Number'
    hcfaspec   = '124 - Line HCFA Provider Specialty Code'
    prtcptg    = '126 - Line Provider Participating Indicator Code'
    proindcd   = '159 - Line Processing Indicator Code'
    pay80cd    = '160 - Line Payment 80%/100% Code'
    dedind     = '161 - Line Service deductible indicator Switch'
    payindcd   = '162 - Line Payment Indicator Code'
    mtuscnt    = '163 - Carrier Line Miles/Time/Units/Services Count'
    mtusind    = '164 - Carrier Line Miles/Time/Units/Services Indicator Code'
    hcpcs      = '135 - Line HCPCS Code'
    mf1        = '136 - Line HCPCS Initial Modifier Code'
    mf2        = '137 - Line HCPCS Second Modifier Code'
    mf3        = '138 - Carrier Line HCPCS Third Modifier Code'
    mf4        = '139 - Carrier Line HCPCS Fourth Modifier Code'
    lsubmamt   = '155 - Line Submitted Charge Amount'
    lalowamt   = '156 - Line Allowed Charge Amount'
    hcfatype   = '129 - Line HCFA Type Service Code'
    plcsrvc    = '131 - Line Place of Service Code'
    frexpenm   = '133 - Line First Expense Month'
    frexpend   = '133 - Line First Expense Day'
    frexpeny   = '133 - Line First Expense Year'
    lsexpenm   = '134 - Line Last Expense Month'
    lsexpend   = '134 - Line Last Expense Day'
    lsexpeny   = '134 - Line Last Expense Year'
    srvc_cnt   = '128 - Line Service Count'
    linediag   = '167 - Line Diagnosis Code'
    linepmt    = '143 - Line NCH Payment Amount'
    ldedamt    = '146 - Line Beneficiary Part B Deductible Amount'
    lprpayat   = '148 - Line Beneficiary Primay Payer Paid Amount'
    lprpaycd   = '147 - Line Beneficiary Primay Payer Code'
    lbenpmt    = '144 - Line Beneficiary Payment Amount'
    lprvpmt    = '145 - Line Provider Payment Amount'
    coinamt    = '149 - Line Coinsurance Amount'
    lintamt    = '151 - Line Interest Amount'
    dedapply   = '68 - Carrier Claim Cash Deductible Applied Amount'
    prpayamt   = '58 - Carrier Claim Primary Payer Paid Amount'
    pmt_amt    = '57 - Claim Payment Amount'
    allowamt   = '67 - NCH Claim Allowed Charge Amount'
    sbmtamt    = '66 - NCH Carrier Claim Submitted Charge Amount'
    prov_pmt   = '63 - NCH Claim Provider Payment Amount'
    prpyalow   = '152 - Line Primary Payer Allowed Charge Amount'
    rfr_prfl   = '78 - Carrier referring PIN physician'
    astnt_cd   = '127 - Carrier Line Reduced Payment Physician Assistant Code'
    hcpcs_yr   = '69 - Carrier Claim HCPCS Year Code'
    per_pin    = '116 - Performing provider pin num'
    perupin    = '117 - Line performing provider UPIN'
    prf_npi    = '118 - Line performing provider NPI'
    prgrp_npi  = '119 - Line Performing Group NPI'
    prv_type   = '120 - Provider type'
    prvstate   = '122 - Line NCH Provider State Code'
    prozip     = '123 - Line performing provider zip'
    clinecnt   = '26 - Claim Total Line Count'
    link_num   = '23 - NCH Segment Link Number'
    daily_dtm  = '22 - NCH Daily Process Month'
    daily_dtd  = '22 - NCH Daily Process Day'
    daily_dty  = '22 - NCH Daily Process Year'
    DESY_SORT_KEY = 'DESY Sort Key'
    pdgns_cd   = '53 - Principal Diagnosis Code'
    cdgncnt    = '83 - Claim Diagnosis Code Count'
    dgn_cd1    = '113 - Claim Diagnosis Code #1'
    dgn_cd2    = '113 - Claim Diagnosis Code #2'
    dgn_cd3    = '113 - Claim Diagnosis Code #3'
    dgn_cd4    = '113 - Claim Diagnosis Code #4'
    dgn_cd5    = '113 - Claim Diagnosis Code #5'
    dgn_cd6    = '113 - Claim Diagnosis Code #6'
    dgn_cd7    = '113 - Claim Diagnosis Code #7'
    dgn_cd8    = '113 - Claim Diagnosis Code #8'
    dgn_cd9    = '113 - Claim Diagnosis Code #9'
    dgn_cd10   = '113 - Claim Diagnosis Code #10'
    dgn_cd11   = '113 - Claim Diagnosis Code #11'
    dgn_cd12   = '113 - Claim Diagnosis Code #12'
    betos      = '140 - Line NCH Betos Code'
    benepaid   = '65 - Carrier Claim Beneficiary Paid Amount'
    acrtn_dtm  = '18 - CWF Claim Accretion Date Month'
    acrtn_dtd  = '18 - CWF Claim Accretion Date Day'
    acrtn_dty  = '18 - CWF Claim Accretion Date Year'
    nchben_pmt = '64 - NCH Claim Beneficiary Payment Amount'
    cln_tril   = '73 - Claim Clinical Trial Number'
    ansthcnt   = '168 - Carrier Line Anesthesia Base Unit Count'
    llabamt    = '158 - Carrier line clinical lab charge amt.'
    llab_num   = '157 - Carrier line clinical lab num'
    price_cd   = '132 - Line Pricing Locality Code'
    psych_lmt  = '150 - Carrier Line Psychiatric, OT, PT Limit Amount'
    ide_num    = '141 - Line IDE Number'
    tax_num    = '121 - Line Provider Tax Number'
    lrx_num    = '179 - Carrier Line RX Number'
    dup_chk    = '175 - Line Duplicate Claim Check Indicator Code'
    hgb_rslt   = '181 - Line Hematocrit/Hemoglobin Result Number'
    hgb_type   = '180 - Line Hematocrit/Hemoglobin Test Type Code'
    year       = 'Claim Year'
    rec_count  = 'Record Count for Claim'
    ;
run;

proc contents data=nch position;
run;