/*Published: 12/31/2012*/
/***********************************************************************/
/* IF YOU RECEIVED THE PEDSF FILE BEFORE DECEMBER 2012 THEN YOU WILL   */
/* NEED A DIFFERENT INPUT STATEMENT. PLEASE CONTACT IMS VIA E-MAIL     */
/* SEER-MEDICARE@IMSWEB.COM AND AN INPUT STATEMENT WILL BE SENT TO     */
/* YOU.                                                                */
/* This input statement is used to read in the pedsf.cancer.txt        */
/* file.                                                               */
/***********************************************************************/

*filename inped '/directory/pedsf.cancer.txt';                    /*reading in an unzipped file*/
filename inped pipe 'gunzip -c /directory/pedsf.cancer.txt.gz';   /*reading in a zipped file*/

options nocenter validvarname=upcase;

data pedsf(drop= inc inc2 begin end pos i p);
  infile inped lrecl=4937 missover pad;
  input
      @0001  patient_id $char10.
   /*   @0001  reg        $char2.  */
   /*   @0003  casenum    $char8.  */
      @0011  fivepct   $char1.
      @0012  mat_type  $char1.
      @0013  yobflg1   $char1.
      @0014  dobflg2   $char1.
      @0015  yodflg3   $char1.
      @0016  sexflg4   $char1.
      @0017  lstflg5   $char1.
      @0018  fstflg6   $char1.
      @0019  mobflg7   $char1.
      @0020  midflg8   $char1.
      @0021  numdigit  $char1.
      @0022  dod_flg   $char1.
      @0023  dob_flg   $char1.
      @0024  linkflag  $char1.
      @0025  med_dodm  $char2.
      @0027  med_dodd  $char2.
      @0029  med_dody  $char4.
      @0033  birthm    $char2.
      @0037  birthyr   $char4.
      @0041  m_sex     $char1.
      @0042  race      $char1.
      @0043  rsncd1    $char1.
      @0044  cur_ent   $char1.
      @0045  cur_yr    $char4.  /* new in 2012 Linkage */
      @0049  chr_esrd  $char1.
      @0050  chr_esrd_yr $char4.  /* new in 2012 Linkage */
      @0054  med_stcd  $char2.
      @0056  medst_yr  $char4.  /* new in 2012 Linkage */
      @0060  VRFYDTH   $char1.  /* new in 2012 Linkage */

      @0061  STATE     $char2.
      @0063  COUNTY    $char3.
      @0066  zip       $char9.        /*Special permission required*/
      @0075  code_sys  $char1.
      @0076  tract     $char6.        /*Special permission required*/
      @0082  tract2k   $char6.        /*Special permission required*/
      @0088  HSA       $char3.
      @0091  URBRUR    $char1.
      @0092  URBAN     $char2.

      @0094  ctpci90   10.
      @0104  ctmed90   10.
      @0114  ctden90   10.
      @0124  ctnon90   6.2
      @0130  cthso90   6.2
      @0136  ctscl90   6.2
      @0142  ctcol90   6.2
      @0148  ctblk90   6.2
      @0154  ctwht90   6.2
      @0160  cthsp90   6.2
      @0166  ctpov90   6.2
      @0172  cten590   6.2
      @0178  cten690   6.2
      @0184  medag90   10.
      @0194  medrc90   10.
      @0204  povrc90   6.2
      @0210  nonrc90   6.2
      @0216  hsorc90   6.2
      @0222  sclrc90   6.2
      @0228  colrc90   6.2
      @0234  pov_rc90  6.2  /* new in 2012 Linkage */
      @0240  zppci90   10.
      @0250  zpmed90   10.
      @0260  zpden90   10.
      @0270  zpnon90   6.2
      @0276  zphso90   6.2
      @0282  zpscl90   6.2
      @0288  zpcol90   6.2
      @0294  zpblk90   6.2
      @0300  zpwht90   6.2
      @0306  zphsp90   6.2
      @0312  zpen590   6.2
      @0318  zpen690   6.2
      @0324  znonrc90  6.2
      @0330  zhsorc90  6.2
      @0336  zsclrc90  6.2
      @0342  zcolrc90  6.2
      @0348  zppov_rc90 6.2  /* new in 2012 Linkage */
      @0354  zppovrage90 6.2  /* new in 2012 Linkage */
      @0360  zppov90   6.2  /* new in 2012 Linkage */

      @0366  ctpci00   10.
      @0376  ctmed00   10.
      @0386  ctden00   10.
      @0396  ctnon00   6.2
      @0402  cthso00   6.2
      @0408  ctscl00   6.2
      @0414  ctcol00   6.2
      @0420  ctblk00   6.2
      @0426  ctwht00   6.2
      @0432  cthsp00   6.2
      @0438  ctpov00   6.2
      @0444  cten500   6.2
      @0450  cten600   6.2
      @0456  medag00   10.
      @0466  medrc00   10.
      @0476  povrc00   6.2
      @0482  nonrc00   6.2
      @0488  hsorc00   6.2
      @0494  sclrc00   6.2
      @0500  colrc00   6.2
      @0506  pov_rc00  6.2  /* new in 2012 Linkage */
      @0512  zppci00   10.
      @0522  zpmed00   10.
      @0532  zpden00   10.
      @0542  zpnon00   6.2
      @0548  zphso00   6.2
      @0554  zpscl00   6.2
      @0560  zpcol00   6.2
      @0566  zpblk00   6.2
      @0572  zpwht00   6.2
      @0578  zphsp00   6.2
      @0584  zpen500   6.2
      @0590  zpen600   6.2
      @0596  znonrc00  6.2
      @0602  zhsorc00  6.2
      @0608  zsclrc00  6.2
      @0614  zcolrc00  6.2
      @0620  zppov_rc00 6.2  /* new in 2012 Linkage */
      @0626  zppovrage00 6.2  /* new in 2012 Linkage */
      @0632  zppov00   6.2  /* new in 2012 Linkage */

      @0662  S_SEX     $char1.
      @0663  RAC_RECB  $char2.
      @0665  RAC_RECY  $char1.
      @0666  ICD_CODE  $char1.
      @0667  COD89V    $char4.
      @0671  COD10V    $char4.
      @0675  codkm     $char3.
      @0678  codpub    $char3.

      @0684  nhiade    $char1.
      @0685  ihslink   $char1.
      @0686  SER_DODM  $char2.
      @0688  SER_DODY  $char4.
      @0693  sRACE     $char2.
      @0695  ORIGIN    $char1.
      @0696  origrecb  $char1.
      @0707  STAT_REC  $char1.
      @0708  cen_cert  $char1.
      @0709  ctcer2k   $char1.
      @0710  yr_brth   $char4.  /* new in 2012 Linkage */
      @0714  plc_brth  $char3.
      @0717  COUNT     $char2.
      @0719  NUMPRIMS  $char2.
      @0721  MULTSITE  $char1.
      @0722  RESNREC   $char1.
      @0729  oshufcase $char8.

      @0749  rtirace   $char1.
      @0750  cred06    $char1.
      @0751  (plan06_01-plan06_12) ($char1.)
      @0763  (cost06_01-cost06_12) ($char2.)
      @0787  (rds06_01-rds06_12) ($char1.)
      @0799  (dual06_01-dual06_12) ($char2.)
      @0823  ptd06       $char2.
      @0825  rdscnt06    $char2.
      @0827  dualcnt06   $char2.
      @0830  cred07    $char1.
      @0831  (plan07_01-plan07_12) ($char1.)
      @0843  (cost07_01-cost07_12) ($char2.)
      @0867  (rds07_01-rds07_12) ($char1.)
      @0879  (dual07_01-dual07_12) ($char2.)
      @0903  ptd07       $char2.
      @0905  rdscnt07    $char2.
      @0907  dualcnt07   $char2.
      @0910  cred08    $char1.
      @0911  (plan08_01-plan08_12) ($char1.)
      @0923  (cost08_01-cost08_12) ($char2.)
      @0947  (rds08_01-rds08_12) ($char1.)
      @0959  (dual08_01-dual08_12) ($char2.)
      @0983  ptd08       $char2.
      @0985  rdscnt08    $char2.
      @0987  dualcnt08   $char2.
      @0990  cred09    $char1.
      @0991  (plan09_01-plan09_12) ($char1.)
      @1003  (cost09_01-cost09_12) ($char2.)
      @1027  (rds09_01-rds09_12) ($char1.)
      @1039  (dual09_01-dual09_12) ($char2.)
      @1063  ptd09       $char2.
      @1065  rdscnt09    $char2.
      @1067  dualcnt09   $char2.
      @1070  cred10    $char1.
      @1071  (plan10_01-plan10_12) ($char1.)
      @1083  (cost10_01-cost10_12) ($char2.)
      @1107  (rds10_01-rds10_12) ($char1.)
      @1119  (dual10_01-dual10_12) ($char2.)
      @1143  ptd10       $char2.
      @1145  rdscnt10    $char2.
      @1147  dualcnt10   $char2.
      @1150  cred11    $char1.                /* new in 2012 Linkage */
      @1151  (plan11_01-plan11_12) ($char1.)  /* new in 2012 Linkage */
      @1163  (cost11_01-cost11_12) ($char2.)  /* new in 2012 Linkage */
      @1187  (rds11_01-rds11_12) ($char1.)    /* new in 2012 Linkage */
      @1199  (dual11_01-dual11_12) ($char2.)  /* new in 2012 Linkage */
      @1223  ptd11       $char2.              /* new in 2012 Linkage */
      @1225  rdscnt11    $char2.              /* new in 2012 Linkage */
      @1227  dualcnt11   $char2.              /* new in 2012 Linkage */
      @;

  array enmon(252)   $ mon1-mon252;
  array ghon(252)    $ gho1-gho252;
  array allflag(252) $ allflag1-allflag252;
  array enta(21)    $ ptacnt1991-ptacnt2011;
  array entb(21)    $ ptbcnt1991-ptbcnt2011;
  array hmoc(21)    $ hmocnt1991-hmocnt2011;
  array stbuy(21)    $ stbuyin1991-stbuyin2011;

      inc=1230;
      retain begin end;
      begin=1;
      end=12;

      do i = 1 to 21;
        do p = begin to end;
        input @inc      enmon(p) $char1.
              @inc + 12 ghon(p)  $char1.
              @inc + 24 allflag(p) $char1.  /* new in 2012 Linkage */
              @;
              inc=inc + 1;
              end;
        begin = begin + 12;
        end = end + 12;
        input @inc + 24  enta(i) $char2.
          @inc + 26  entb(i) $char2.
          @inc + 28  hmoc(i) $char2.
          @inc + 30  stbuy(i)  $char2.
          @;
        inc=inc + 32;
     end;

  array zipcd(21)    $ zip1991-zip2011;
  array registry(21) $ registry1991-registry2011;
  array regcd2(21)   $ reg2cd1991-reg2cd2011;

     inc2= 2154;
       do i = 1 to 21;
       input @inc2      zipcd(i)    $char9.
             @inc2 + 9  registry(i) $char2.
             @inc2 +11  regcd2(i)   $char2.
             @;
             inc2=inc2+13;
             end;

  array seq(10)      $ seq1-seq10;
  array site(10)     $ site1-site10;
  array siter(10)    $ siter1-siter10;
  array sterkm(10)   $ siterkm1-siterkm10;
  array hist(10)     $ hist1-hist10;
  array hist_2(10)   $ hist2_1-hist2_10;
  array beh(10)      $ beh1-beh10;
  array beh_2(10)    $ beh2_1-beh2_10;
  array behtrnd(10)  $ behtrend1-behtrend10;
  array modx(10)     $ modx1-modx10;
  array yrdx(10)     $ yrdx1-yrdx10;
  array ddxflg(10)   $ ddxflag1-ddxflag10;
  array ager(10)     $ ager1-ager10;
  array src(10)      $ src1-src10;
  array hstst(10)    $ hstst1-hstst10;
  array aj3sr(10)    $ aj3sr1-aj3sr10;
  array ajccstg(10)  $ ajccstg1-ajccstg10;
  array dajccts(10)  $ dajcct1-dajcct10;
  array dajccms(10)  $ dajccm1-dajccm10;
  array dajccns(10)  $ dajccn1-dajccn10;
  array dajcstg(10)  $ dajccstg1-dajccstg10;
  array dajcflg(10)  $ dajcflg1-dajcflg10;
  array dss77s(10)   $ dss77s1-dss77s10;
  array dss77f(10)   $ dss77f1-dss77f10;
  array dss00s(10)   $ dss00s1-dss00s10;
  array dss00f(10)   $ dss00f1-dss00f10;
  array sss77(10)    $ sss77v1-sss77v10;
  array sssm2z(10)   $ sssm2Z1-sssm2Z10;
  array tdscrp(10)   $ t_dscrpt1-t_dscrpt10;
  array ndscrp(10)   $ n_dscrpt1-n_dscrpt10;
  array mdscrp(10)   $ m_dscrpt1-m_dscrpt10;
  array sum2k(10)    $ summ2k1-summ2k10;
  array frstprm(10)  $ frstprm1-frstprm10;
  array marst(10)    $ marst1-marst10;
  array regs(10)     $ reg1-reg10;
  array monrx(10)    $ monrx1-monrx10;
  array yr_rx(10)    $ yearrx1-yearrx10;
  array rad(10)      $ rad1-rad10;
  array other_tx(10) $ other_tx1-other_tx10;
  array radsurg(10)  $ radsurg1-radsurg10;
  array radbrn(10)   $ radbrn1-radbrn10;
  array nosrg(10)    $ nosrg1-nosrg10;
  array grade(10)    $ grade1-grade10;
  array dxconf(10)   $ dxconf1-dxconf10;
  array lat(10)      $ lat1-lat10;
  array sssurg(10)   $ sssurg1-sssurg10;
  array sxprim(10)   $ sxprim1-sxprim10;
  array numnd(10)    $ numnd1-numnd10;
  array sxscop(10)   $ sxscop1-sxscop10;
  array sxsite(10)   $ sxsite1-sxsite10;
  array recstr(10)   $ recstr1-recstr10;
  array sxprif(10)   $ sxprif1-sxprif10;
  array sxscof(10)   $ sxscof1-sxscof10;
  array sxsitf(10)   $ sxsitf1-sxsitf10;
  array tumor1(10)   $ tumor1_1-tumor1_10;
  array tumor2(10)   $ tumor2_1-tumor2_10;
  array tumor3(10)   $ tumor3_1-tumor3_10;
  array e4siz(10)    $ e4siz1-e4siz10;
  array e4ext(10)    $ e4ext1-e4ext10;
  array e4nod(10)    $ e4nod1-e4nod10;
  array e10sz(10)    $ e10sz1-e10sz10;
  array e10ex(10)    $ e10ex1-e10ex10;
  array e10nd(10)    $ e10nd1-e10nd10;
  array e10pn(10)    $ e10pn1-e10pn10;
  array e10ne(10)    $ e10ne1-e10ne10;
  array e10pe(10)    $ e10pe1-e10pe10;
  array eodcde(10)   $ eod_cd1-eod_cd10;
  array cnty(10)     $ cnty1-cnty10;
  array csex(10)     $ csex1-csex10;
  array cslym(10)    $ cslym1-cslym10;
  array csmet(10)    $ csmet1-csmet10;
  array cssch(10)    $ cssch1-cssch10;
  array cssite1(10)  $ cs1st1-cs1st10;
  array cssite2(10)  $ cs2st1-cs2st10;
  array cssite3(10)  $ cs3st1-cs3st10;
  array cssite4(10)  $ cs4st1-cs4st10;
  array cssite5(10)  $ cs5st1-cs5st10;
  array cssite6(10)  $ cs6st1-cs6st10;
  array cssite8(10)  $ cs8st1-cs8st10;
  array cssite10(10) $ cs10st1-cs10st10;
  array cssite11(10) $ cs11st1-cs11st10;
  array cssite13(10) $ cs13st1-cs13st10;
  array cssite15(10) $ cs15st1-cs15st10;
  array cssite16(10) $ cs16st1-cs16st10;
  array cssite25(10) $ cs25st1-cs25st10;
  array cstum(10)    $ cstum1-cstum10;
  array csvf(10)     $ csvf1-csvf10;
  array csvl(10)     $ csvl1-csvl10;
  array csts(10)     $ csts1-csts10;
  array csrg(10)     $ csrg1-csrg10;
  array csmt(10)     $ csmt1-csmt10;
  array hisrcb(10)   $ hisrcb1-hisrcb10;
  array icdo(10)     $ icdo1-icdo10;
  array napia_cd(10) $ napiia1-napiia10;
  array ayasite(10)  $ ayasiter1-ayasiter10;
  array lymsub(10)   $ lymsubr1-lymsubr10;
  array vsrtdx(10)   $ vsrtdx1-vsrtdx10;
  array payer_dx(10) $ payer_dx1-payer_dx10;
  array erstat(10)   $ erstat1-erstat10;
  array prstat(10)   $ prstat1-prstat10;
  array vasinvv(10)  $ vasinv1-vasinv10;
  array dthflg(10)   $ dthflag1-dthflag10;
  array ositmor(10)  $ ositmor1-ositmor10;
  array ositeod(10)  $ ositeod1-ositeod10;
  array oeoddt(10)   $ oeoddt1-oeoddt10;
  array ositbeh(10)  $ ositbeh1-ositbeh10;
  array osurcon(10)  $ osurcon1-osurcon10;
  array oseqlat(10)  $ oseqlat1-oseqlat10;
  array osittyp(10)  $ osittyp1-osittyp10;
  array oseqcon(10)  $ oseqcon1-oseqcon10;
  array odfsite(10)  $ odfsite1-odfsite10;
  array orptsrc(10)  $ orptsrc1-orptsrc10;
  array oleukdx(10)  $ oleukdx1-oleukdx10;
  array hbenign(10)  $ hbenign1-hbenign10;
  array ositage(10)  $ ositage1-ositage10;
  array ICCC3vs(10)  $ ICCC3V1-ICCC3V10;
  array histrecs(10) $ histrec1-histrec10;
  array ICCC3Xs(10)  $ ICCC3X1-ICCC3X10;
  array ICCCSITEs(10) $ ICCCSITE1-ICCCSITE10;
  array ICCCSMs(10)  $ ICCCSM1-ICCCSM10;
  array intprims(10) $ intprim1-intprim10;
  array survmon(10)  $ survmo1-survmo10;
  array survyear(10) $ survyr1-survyr10;
  array odthcls(10)  $ odthclass1-odthclass10;
  array typefu(10)   $ typefu1-typefu10;
  array cscur(10)    $ cscurrent1-cscurrent10;
  array cs03sch(10)  $ cs03sch1-cs03sch10;
  array icd09(10)    $ icdot09_1-icdot09_10;
  array icd10(10)    $ icdot10_1-icdot10_10;

  pos = 2427;
  do i = 1 to 10;
   input @(pos +  0) seq(i)     $char2.
         @(pos +  2) site(i)    $char3.
         @(pos +  5) siter(i)   $char2.
         @(pos +  7) sterkm(i)  $char2.
         @(pos + 11) hist(i)    $char4.
         @(pos + 15) hist_2(i)  $char4.
         @(pos + 19) beh(i)     $char1.
         @(pos + 20) beh_2(i)   $char1.
         @(pos + 21) behtrnd(i) $char1.
         @(pos + 22) modx(i)    $char2.
         @(pos + 24) yrdx(i)    $char4.
         @(pos + 28) ddxflg(i)  $char2.
         @(pos + 30) ager(i)    $char2.
         @(pos + 32) src(i)     $char1.
         @(pos + 33) hstst(i)   $char1.
         @(pos + 34) aj3sr(i)   $char2.
         @(pos + 36) ajccstg(i) $char2.
         @(pos + 38) dajccts(i) $char2.
         @(pos + 40) dajccms(i) $char2.
         @(pos + 42) dajccns(i) $char2.
         @(pos + 44) dajcstg(i) $char2.
         @(pos + 46) dajcflg(i) $char1.
         @(pos + 47) dss77s(i)  $char1.
         @(pos + 48) dss77f(i)  $char1.
         @(pos + 49) dss00s(i)  $char1.
         @(pos + 50) dss00f(i)  $char1.
         @(pos + 51) sss77(i)   $char1.
         @(pos + 52) sssm2z(i)  $char1.
         @(pos + 53) tdscrp(i)  $char1.
         @(pos + 54) ndscrp(i)  $char1.
         @(pos + 55) mdscrp(i)  $char1.
         @(pos + 56) sum2k(i)   $char1.
         @(pos + 59) frstprm(i) $char1.
         @(pos + 61) marst(i)   $char1.
         @(pos + 62) regs(i)    $char2.
         @(pos + 64) monrx(i)   $char2.
         @(pos + 66) yr_rx(i)   $char4.
         @(pos + 70) rad(i)     $char1.
         @(pos + 77) other_tx(i) $char1.
         @(pos + 78) radsurg(i) $char1.
         @(pos + 79) radbrn(i)  $char1.
         @(pos + 80) nosrg(i)   $char1.
         @(pos + 81) grade(i)   $char1.
         @(pos + 82) dxconf(i)  $char1.
         @(pos + 83) lat(i)     $char1.
         @(pos + 84) sssurg(i)  $char2.
         @(pos + 86) sxprim(i)  $char2.
         @(pos + 88) numnd(i)   $char2.
         @(pos +090) sxscop(i)  $char1.
         @(pos +091) sxsite(i)  $char1.
         @(pos +092) recstr(i)  $char1.
         @(pos +093) sxprif(i)  $char2.
         @(pos +095) sxscof(i)  $char1.
         @(pos +096) sxsitf(i)  $char1.
         @(pos +097) tumor1(i)  $char1.
         @(pos +098) tumor2(i)  $char1.
         @(pos +099) tumor3(i)  $char1.
         @(pos +100) e4siz(i)   $char2.
         @(pos +102) e4ext(i)   $char1.
         @(pos +103) e4nod(i)   $char1.
         @(pos +104) e10sz(i)   $char3.
         @(pos +107) e10ex(i)   $char2.
         @(pos +109) e10nd(i)   $char1.
         @(pos +110) e10pn(i)   $char2.
         @(pos +112) e10ne(i)   $char2.
         @(pos +114) e10pe(i)   $char2.
         @(pos +116) eodcde(i)  $char1.
         @(pos +117) cnty(i)    $char3.
         @(pos +120) csex(i)    $char3.
         @(pos +123) cslym(i)   $char3.
         @(pos +126) csmet(i)   $char2.
         @(pos +128) cssch(i)   $char2.
         @(pos +130) cssite1(i) $char3.
         @(pos +133) cssite2(i) $char3.
         @(pos +136) cssite3(i) $char3.
         @(pos +139) cssite4(i) $char3.
         @(pos +142) cssite5(i) $char3.
         @(pos +145) cssite6(i) $char3.
         @(pos +148) cssite8(i)  $char3.  /* new in 2012 Linkage */
         @(pos +151) cssite10(i) $char3.  /* new in 2012 Linkage */
         @(pos +154) cssite11(i) $char3.  /* new in 2012 Linkage */
         @(pos +157) cssite13(i) $char3.  /* new in 2012 Linkage */
         @(pos +160) cssite15(i) $char3.  /* new in 2012 Linkage */
         @(pos +163) cssite16(i) $char3.  /* new in 2012 Linkage */
         @(pos +166) cssite25(i) $char3.  /* new in 2012 Linkage */
         @(pos +169) cstum(i)   $char3.
         @(pos +172) csvf(i)    $char2.
         @(pos +174) csvl(i)    $char2.
         @(pos +176) csts(i)    $char1.  /* new in 2012 Linkage */
         @(pos +177) csrg(i)    $char1.  /* new in 2012 Linkage */
         @(pos +178) csmt(i)    $char1.  /* new in 2012 Linkage */

         @(pos +181) hisrcb(i)  $char2.
         @(pos +183) icdo(i)    $char1.
         @(pos +184) napia_cd(i) $char2.
         @(pos +186) ayasite(i) $char2.
         @(pos +188) lymsub(i)  $char2.
         @(pos +192) vsrtdx(i)  $char1.
         @(pos +197) payer_dx(i) $char2.
         @(pos +199) erstat(i)   $char1.  /* new in 2012 Linkage */
         @(pos +200) prstat(i)   $char1.  /* new in 2012 Linkage */
         @(pos +201) vasinvv(i)  $char1.  /* new in 2012 Linkage */
         @(pos +202) dthflg(i)   $char2.  /* new in 2012 Linkage */
         @(pos +204) ositmor(i)  $char1.  /* new in 2012 Linkage */
         @(pos +205) ositeod(i)  $char1.  /* new in 2012 Linkage */
         @(pos +206) oeoddt(i)   $char1.  /* new in 2012 Linkage */
         @(pos +207) ositbeh(i)  $char1.  /* new in 2012 Linkage */
         @(pos +208) osurcon(i)  $char1.  /* new in 2012 Linkage */
         @(pos +209) oseqlat(i)  $char1.  /* new in 2012 Linkage */
         @(pos +210) osittyp(i)  $char1.  /* new in 2012 Linkage */
         @(pos +211) oseqcon(i)  $char1.  /* new in 2012 Linkage */
         @(pos +212) odfsite(i)  $char1.  /* new in 2012 Linkage */
         @(pos +213) orptsrc(i)  $char1.  /* new in 2012 Linkage */
         @(pos +214) oleukdx(i)  $char1.  /* new in 2012 Linkage */
         @(pos +215) hbenign(i)  $char1.  /* new in 2012 Linkage */
         @(pos +216) ositage(i)  $char1.  /* new in 2012 Linkage */
         @(pos +217) ICCC3vs(i)  $char3.  /* new in 2012 Linkage */
         @(pos +220) histrecs(i) $char2.  /* new in 2012 Linkage */
         @(pos +222) ICCC3Xs(i)  $char3.  /* new in 2012 Linkage */
         @(pos +225) ICCCSITEs(i) $char3.  /* new in 2012 Linkage */
         @(pos +228) ICCCSMs(i)   $char3.  /* new in 2012 Linkage */
         @(pos +231) intprims(i)  $char1.  /* new in 2012 Linkage */
         @(pos +232) survmon(i)  $char2.  /* new in 2012 Linkage */
         @(pos +234) survyear(i) $char2.  /* new in 2012 Linkage */
         @(pos +236) odthcls(i)  $char1.  /* new in 2012 Linkage */
         @(pos +237) typefu(i)   $char1.   /* new in 2012 Linkage */
         @(pos +238) cscur(i)    $char2.  /* new in 2012 Linkage */
         @(pos +240) cs03sch(i)  $char3.  /* new in 2012 Linkage */
         @(pos +243) icd09(i)    $char4.  /* new in 2012 Linkage */
         @(pos +247) icd10(i)    $char4.  /* new in 2012 Linkage */
         @;
     pos = pos + 251;
     end;
  input;

label
 /*  reg      = 'Registry'    */
 /*  casenum  = 'Case Number' */
  fivepct  = 'Five Percent Indicator'
  mat_type = 'Match Type'
  yobflg1  = 'Year of Birth Flag'
  dobflg2  = 'Day of Birth Flag'
  yodflg3  = 'Year of Death Flag'
  sexflg4  = 'Sex Flag'
  lstflg5  = 'Last Name Flag'
  fstflg6  = 'First Name Flag'
  mobflg7  = 'Month of Birth Flag'
  midflg8  = 'Middle Initial Flag'
  numdigit = 'Number of Digits in SSN that Matched'
  dod_flg  = 'Date of Death Flag'
  dob_flg  = 'Date of Birth Flag'
  linkflag = 'Linkage Flag'
  med_dodm = 'Medicare Month of Death'
  med_dodd = 'Medicare Day of Death'
  med_dody = 'Medicare Year of Death'
  birthm   = 'Medicare Month of Birth'
  birthyr  = 'Medicare Year of Birth'
  m_sex    = 'Medicare Sex'
  race     = 'Medicare Race'
  rsncd1   = 'Original Reason for Entitlement'
  cur_ent  = 'Current Reason for Entitlment'
  cur_yr   = 'Current Reason for Entitlement Year'
  chr_esrd = 'Chronic Renal Disease'
  chr_esrd_yr = 'Chronic Renal Disease Year'
  med_stcd = 'Medicare Status Code'
  medst_yr = 'Medicare Status Code Year'
  vrfydth  = 'Valid Date of Death'
  state    = 'State'
  county   = 'County'
  zip      = 'Zip Code'
  code_sys = 'Census Cod Sys 1970/80/90'
  tract    = 'Census Tract 1970/1980/1990'
  tract2k  = 'Census Tract 2000'
  hsa      = 'HSA'
  urbrur   = 'Urban/Rural recode'
  urban    = 'Urban/Rural code'

  ctpci90  = 'Census Tract PCI (Census 1990)'
  ctmed90  = 'Census Tract Median Income (Census 1990)'
  ctden90  = 'Census Tract Density (Census 1990)'
  ctnon90  = 'Census Tract Pct Non High School Grads (Census 1990)'
  cthso90  = 'Census Tract Pct High School Only (Census 1990)'
  ctscl90  = 'Census Tract Pct Some College Education (Census 1990)'
  ctcol90  = 'Census Tract Pct College Education at least 4 years (Census 1990)'
  ctblk90  = 'Census Tract Pct Blacks (Census 1990)'
  ctwht90  = 'Census Tract Pct Whites (Census 1990)'
  cthsp90  = 'Census Tract Pct Hispanics (Census 1990)'
  ctpov90  = 'Census Tract Pct Poverty for All (Census 1990)'
  cten590  = 'Census Tract Pct of HHs who do not speak English well or at all 5+ (Census 1990)'
  cten690  = 'Census Tract Pct of HHs who do not speak English well or at all 65+ (Census 1990)'
  medag90  = 'Census Tract Median HH Income by Age (Census 1990)'
  medrc90  = 'Census Tract Median HH Income by Race (Census 1990)'
  povrc90  = 'Census Tract Pct Poverty by Race/Age (Census 1990)'
  nonrc90  = 'Census Tract Pct Non High School Grads by Race (Census 1990)'
  hsorc90  = 'Census Tract Pct High School Only by Race (Census 1990)'
  sclrc90  = 'Census Tract Pct Some College by Race (Census 1990)'
  colrc90  = 'Census Tract Pct College Education at least 4 years by Race (Census 1990)'
  pov_rc90 = 'Census Tract Pct Poverty by Race (Census 1990)'
  zppci90  = 'Zip Code PCI (Census 1990)'
  zpmed90  = 'Zip Code Median Income (Census 1990)'
  zpden90  = 'Zip Code Density (Census 1990)'
  zpnon90  = 'Zip Code Pct Non High School Grads (Census 1990)'
  zphso90  = 'Zip Code Pct High School Only (Census 1990)'
  zpscl90  = 'Zip Code Pct Some College Education (Census 1990)'
  zpcol90  = 'Zip Code Pct College Education at least 4 years (Census 1990)'
  zpblk90  = 'Zip Code Pct Blacks (Census 1990)'
  zpwht90  = 'Zip Code Pct Whites (Census 1990)'
  zphsp90  = 'Zip Code Pct Hispanics (Census 1990)'
  zpen590  = 'Zip Code Pct of HHs who do not speak English well or at all 5+ (Census 1990)'
  zpen690  = 'Zip Code Pct of HHs who do not speak English well or at all 65+ (Census 1990)'
  znonrc90 = 'Zip Code Pct Non High School Grads by Race (Census 1990)'
  zhsorc90 = 'Zip Code Pct High School Only by Race (Census 1990)'
  zsclrc90 = 'Zip Code Pct Some College by Race (Census 1990)'
  zcolrc90 = 'Zip Code Pct College Education at least 4 years by Race (Census 1990)'
  zppovrage90 = 'Zip Code Pct Poverty by Race/Age (Census 1990)'
  zppov_rc90 = 'Zip Code Pct Poverty by Race (Census 1990)'
  zppov90  = 'Zip Code Pct Poverty for All (Census 1990)'
  ctpci00  = 'Census Tract PCI (Census 2000)'
  ctmed00  = 'Census Tract Median Income (Census 2000)'
  ctden00  = 'Census Tract Density (Census 2000)'
  ctnon00  = 'Census Tract Pct Non High School Grads (Census 2000)'
  cthso00  = 'Census Tract Pct High School Only (Census 2000)'
  ctscl00  = 'Census Tract Pct Some College Education (Census 2000)'
  ctcol00  = 'Census Tract Pct College Education at least 4 years (Census 2000)'
  ctblk00  = 'Census Tract Pct Blacks (Census 2000)'
  ctwht00  = 'Census Tract Pct Whites (Census 2000)'
  cthsp00  = 'Census Tract Pct Hispanics (Census 2000)'
  ctpov00  = 'Census Tract Pct Poverty for All (Census 2000)'
  cten500  = 'Census Tract Pct of HHs who do not speak English well or at all 5+ (Census 2000)'
  cten600  = 'Census Tract Pct of HHs who do not speak English well or at all 65+ (Census 2000)'
  medag00  = 'Census Tract Median HH Income by Age (Census 2000)'
  medrc00  = 'Census Tract Median HH Income by Race (Census 2000)'
  povrc00  = 'Census Tract Pct Poverty by Race/Age (Census 2000)'
  nonrc00  = 'Census Tract Pct Non High School Grads by Race (Census 2000)'
  hsorc00  = 'Census Tract Pct High School Only by Race (Census 2000)'
  sclrc00  = 'Census Tract Pct Some College by Race (Census 2000)'
  colrc00  = 'Census Tract Pct College Education by Race (Census 2000)'
  pov_rc00 = 'Census Tract Pct Poverty by Race (Census 2000)'
  zppci00  = 'Zip Code PCI (Census 2000)'
  zpmed00  = 'Zip Code Median Income (Census 2000)'
  zpden00  = 'Zip Code Density (Census 2000)'
  zpnon00  = 'Zip Code Pct Non High School Grads (Census 2000)'
  zphso00  = 'Zip Code Pct High School Only (Census 2000)'
  zpscl00  = 'Zip Code Pct Some College Education (Census 2000)'
  zpcol00  = 'Zip Code Pct College Education at least 4 years (Census 2000)'
  zpblk00  = 'Zip Code Pct Blacks (Census 2000)'
  zpwht00  = 'Zip Code Pct Whites (Census 2000)'
  zphsp00  = 'Zip Code Pct Hispanics (Census 2000)'
  zpen500  = 'Zip Code Pct of HHs who do not speak English well or at all 5+ (Census 2000)'
  zpen600  = 'Zip Code Pct of HHs who do not speak English well or at all 65+ (Census 2000)'
  znonrc00 = 'Zip Code Pct Non High School Grads by Race (Census 2000)'
  zhsorc00 = 'Zip Code Pct High School Only by Race (Census 2000)'
  zsclrc00 = 'Zip Code Pct Some College by Race (Census 2000)'
  zcolrc00 = 'Zip Code Pct College Education by Race (Census 2000)'
  zppovrage00 = 'Zip Code Pct Poverty by Race/Age (Census 2000)'
  zppov_rc00= 'Zip Code Pct Poverty by Race (Census 2000)'
  zppov00  = 'Zip Code Pct Poverty for All (Census 2000)'
  s_sex    = 'SEER Sex'
  rac_recb = 'Race recode (expanded 1970,80 exp rates)'
  rac_recy = 'Race recode (W, B, AI, API)'
  icd_code = 'COD ICD Code'
  cod89v   = 'Cause of Death (ICD-8 or 9)'
  cod10v   = 'Cause of Death (ICD-10)'
  codkm    = 'COD to site rec KM'
  codpub   = 'COD to site recode'
  nhiade   = 'NHIA Derived Hispanic Origin'
  ihslink  = 'IHS Link Recode'
  ser_dodm = 'SEER Month of Death'
  ser_dody = 'SEER Year of Death'
  srace    = 'SEER Race/Ethnicity'
  origin   = 'Spanish surname or origin'
  origrecb = 'Origin recode NHIA (Hispanic, Non-Hisp)'
  STAT_REC = 'Vital status recode (study cutoff used)'
  cen_cert = 'Census Tract Certainty 70/80/90'
  ctcer2k  = 'Census Tract Certainty 2000'
  yr_brth  = 'Year of Birth'
  plc_brth = 'Place of Birth'
  count    = 'Number of SEER records'
  numprims = 'Number of Primaries'
  multsite = 'Multiple Site Indicator'
  resnrec  = 'Diagnosis Indicator'
  oshufcase= 'Old Encrypted Casenum'

  rtirace  = "Research Triangle Institute Race Code (PartD - last available year)"
  cred06   = "On/Off Creditable Coverage Switch (PartD - 2006)"
  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)"
  plan06_01= "Plan-Value Indicators (January) (PartD - 2006)"
  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)"
  cost06_01= "Denominator Cost Share Group (January) (PartD - 2006)"
  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)"
  rds06_01 = "Retiree Drug Subsidy Indicators (January) (PartD - 2006)"
  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)"
  dual06_01= "State Reported Dual Eligible Status Code (January) (PartD - 2006)"
  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)"
  ptd06    = "Plan Coverage Months (PartD - 2006)"
  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)"
  rdscnt06 = "Retiree Drug Subsidy Months (PartD - 2006)"
  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)"
  dualcnt06= "Medicaid Dual Eligible Months (PartD - 2006)"
  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)"

  mon1     = 'Part A and B Entitlement Indicator'
  gho1     = 'HMO Entitlement Indicator'
  allflag1 = 'State Buy-in Flag'
  ptacnt1991 = 'Number of Months in 1991 Covered for Part A'
  ptacnt1992 = 'Number of Months in 1992 Covered for Part A'
  ptacnt1993 = 'Number of Months in 1993 Covered for Part A'
  ptacnt1994 = 'Number of Months in 1994 Covered for Part A'
  ptacnt1995 = 'Number of Months in 1995 Covered for Part A'
  ptacnt1996 = 'Number of Months in 1996 Covered for Part A'
  ptacnt1997 = 'Number of Months in 1997 Covered for Part A'
  ptacnt1998 = 'Number of Months in 1998 Covered for Part A'
  ptacnt1999 = 'Number of Months in 1999 Covered for Part A'
  ptacnt2000 = 'Number of Months in 2000 Covered for Part A'
  ptacnt2001 = 'Number of Months in 2001 Covered for Part A'
  ptacnt2002 = 'Number of Months in 2002 Covered for Part A'
  ptacnt2003 = 'Number of Months in 2003 Covered for Part A'
  ptacnt2004 = 'Number of Months in 2004 Covered for Part A'
  ptacnt2005 = 'Number of Months in 2005 Covered for Part A'
  ptacnt2006 = 'Number of Months in 2006 Covered for Part A'
  ptacnt2007 = 'Number of Months in 2007 Covered for Part A'
  ptacnt2008 = 'Number of Months in 2008 Covered for Part A'
  ptacnt2009 = 'Number of Months in 2009 Covered for Part A'
  ptacnt2010 = 'Number of Months in 2010 Covered for Part A'
  ptacnt2011 = 'Number of Months in 2011 Covered for Part A'
  ptbcnt1991 = 'Number of Months in 1991 Covered for Part B'
  ptbcnt1992 = 'Number of Months in 1992 Covered for Part B'
  ptbcnt1993 = 'Number of Months in 1993 Covered for Part B'
  ptbcnt1994 = 'Number of Months in 1994 Covered for Part B'
  ptbcnt1995 = 'Number of Months in 1995 Covered for Part B'
  ptbcnt1996 = 'Number of Months in 1996 Covered for Part B'
  ptbcnt1997 = 'Number of Months in 1997 Covered for Part B'
  ptbcnt1998 = 'Number of Months in 1998 Covered for Part B'
  ptbcnt1999 = 'Number of Months in 1999 Covered for Part B'
  ptbcnt2000 = 'Number of Months in 2000 Covered for Part B'
  ptbcnt2001 = 'Number of Months in 2001 Covered for Part B'
  ptbcnt2002 = 'Number of Months in 2002 Covered for Part B'
  ptbcnt2003 = 'Number of Months in 2003 Covered for Part B'
  ptbcnt2004 = 'Number of Months in 2004 Covered for Part B'
  ptbcnt2005 = 'Number of Months in 2005 Covered for Part B'
  ptbcnt2006 = 'Number of Months in 2006 Covered for Part B'
  ptbcnt2007 = 'Number of Months in 2007 Covered for Part B'
  ptbcnt2008 = 'Number of Months in 2008 Covered for Part B'
  ptbcnt2009 = 'Number of Months in 2009 Covered for Part B'
  ptbcnt2010 = 'Number of Months in 2010 Covered for Part B'
  ptbcnt2011 = 'Number of Months in 2011 Covered for Part B'
  hmocnt1991 = 'Number of Months in 1991 as an HMO member'
  hmocnt1992 = 'Number of Months in 1992 as an HMO member'
  hmocnt1993 = 'Number of Months in 1993 as an HMO member'
  hmocnt1994 = 'Number of Months in 1994 as an HMO member'
  hmocnt1995 = 'Number of Months in 1995 as an HMO member'
  hmocnt1996 = 'Number of Months in 1996 as an HMO member'
  hmocnt1997 = 'Number of Months in 1997 as an HMO member'
  hmocnt1998 = 'Number of Months in 1998 as an HMO member'
  hmocnt1999 = 'Number of Months in 1999 as an HMO member'
  hmocnt2000 = 'Number of Months in 2000 as an HMO member'
  hmocnt2001 = 'Number of Months in 2001 as an HMO member'
  hmocnt2002 = 'Number of Months in 2002 as an HMO member'
  hmocnt2003 = 'Number of Months in 2003 as an HMO member'
  hmocnt2004 = 'Number of Months in 2004 as an HMO member'
  hmocnt2005 = 'Number of Months in 2005 as an HMO member'
  hmocnt2006 = 'Number of Months in 2006 as an HMO member'
  hmocnt2007 = 'Number of Months in 2007 as an HMO member'
  hmocnt2008 = 'Number of Months in 2008 as an HMO member'
  hmocnt2009 = 'Number of Months in 2009 as an HMO member'
  hmocnt2010 = 'Number of Months in 2010 as an HMO member'
  hmocnt2011 = 'Number of Months in 2011 as an HMO member'
  stbuyin1991 = 'Number of Months in 1991 with State Buy-in Coverage'
  stbuyin1992 = 'Number of Months in 1992 with State Buy-in Coverage'
  stbuyin1993 = 'Number of Months in 1993 with State Buy-in Coverage'
  stbuyin1994 = 'Number of Months in 1994 with State Buy-in Coverage'
  stbuyin1995 = 'Number of Months in 1995 with State Buy-in Coverage'
  stbuyin1996 = 'Number of Months in 1996 with State Buy-in Coverage'
  stbuyin1997 = 'Number of Months in 1997 with State Buy-in Coverage'
  stbuyin1998 = 'Number of Months in 1998 with State Buy-in Coverage'
  stbuyin1999 = 'Number of Months in 1999 with State Buy-in Coverage'
  stbuyin2000 = 'Number of Months in 2000 with State Buy-in Coverage'
  stbuyin2001 = 'Number of Months in 2001 with State Buy-in Coverage'
  stbuyin2002 = 'Number of Months in 2002 with State Buy-in Coverage'
  stbuyin2003 = 'Number of Months in 2003 with State Buy-in Coverage'
  stbuyin2004 = 'Number of Months in 2004 with State Buy-in Coverage'
  stbuyin2005 = 'Number of Months in 2005 with State Buy-in Coverage'
  stbuyin2006 = 'Number of Months in 2006 with State Buy-in Coverage'
  stbuyin2007 = 'Number of Months in 2007 with State Buy-in Coverage'
  stbuyin2008 = 'Number of Months in 2008 with State Buy-in Coverage'
  stbuyin2009 = 'Number of Months in 2009 with State Buy-in Coverage'
  stbuyin2010 = 'Number of Months in 2010 with State Buy-in Coverage'
  stbuyin2011 = 'Number of Months in 2011 with State Buy-in Coverage'

  zip1991   = 'Zip Code in 1991'
  zip1992   = 'Zip Code in 1992'
  zip1993   = 'Zip Code in 1993'
  zip1994   = 'Zip Code in 1994'
  zip1995   = 'Zip Code in 1995'
  zip1996   = 'Zip Code in 1996'
  zip1997   = 'Zip Code in 1997'
  zip1998   = 'Zip Code in 1998'
  zip1999   = 'Zip Code in 1999'
  zip2000   = 'Zip Code in 2000'
  zip2001   = 'Zip Code in 2001'
  zip2002   = 'Zip Code in 2002'
  zip2003   = 'Zip Code in 2003'
  zip2004   = 'Zip Code in 2004'
  zip2005   = 'Zip Code in 2005'
  zip2006   = 'Zip Code in 2006'
  zip2007   = 'Zip Code in 2007'
  zip2008   = 'Zip Code in 2008'
  zip2009   = 'Zip Code in 2009'
  zip2010   = 'Zip Code in 2010'
  zip2011   = 'Zip Code in 2011'
  registry1991 ='SEER registry code in 1991 (retained over years)'
  registry1992 ='SEER registry code in 1992 (retained over years)'
  registry1993 ='SEER registry code in 1993 (retained over years)'
  registry1994 ='SEER registry code in 1994 (retained over years)'
  registry1995 ='SEER registry code in 1995 (retained over years)'
  registry1996 ='SEER registry code in 1996 (retained over years)'
  registry1997 ='SEER registry code in 1997 (retained over years)'
  registry1998 ='SEER registry code in 1998 (retained over years)'
  registry1999 ='SEER registry code in 1999 (retained over years)'
  registry2000 ='SEER registry code in 2000 (retained over years)'
  registry2001 ='SEER registry code in 2001 (retained over years)'
  registry2002 ='SEER registry code in 2002 (retained over years)'
  registry2003 ='SEER registry code in 2003 (retained over years)'
  registry2004 ='SEER registry code in 2004 (retained over years)'
  registry2005 ='SEER registry code in 2005 (retained over years)'
  registry2006 ='SEER registry code in 2006 (retained over years)'
  registry2007 ='SEER registry code in 2007 (retained over years)'
  registry2008 ='SEER registry code in 2008 (retained over years)'
  registry2009 ='SEER registry code in 2009 (retained over years)'
  registry2010 ='SEER registry code in 2010 (retained over years)'
  registry2011 ='SEER registry code in 2011 (retained over years)'
  reg2cd1991   = 'SEER registry code at the end of the year (1991)'
  reg2cd1992   = 'SEER registry code at the end of the year (1992)'
  reg2cd1993   = 'SEER registry code at the end of the year (1993)'
  reg2cd1994   = 'SEER registry code at the end of the year (1994)'
  reg2cd1995   = 'SEER registry code at the end of the year (1995)'
  reg2cd1996   = 'SEER registry code at the end of the year (1996)'
  reg2cd1997   = 'SEER registry code at the end of the year (1997)'
  reg2cd1998   = 'SEER registry code at the end of the year (1998)'
  reg2cd1999   = 'SEER registry code at the end of the year (1999)'
  reg2cd2000   = 'SEER registry code at the end of the year (2000)'
  reg2cd2001   = 'SEER registry code at the end of the year (2001)'
  reg2cd2002   = 'SEER registry code at the end of the year (2002)'
  reg2cd2003   = 'SEER registry code at the end of the year (2003)'
  reg2cd2004   = 'SEER registry code at the end of the year (2004)'
  reg2cd2005   = 'SEER registry code at the end of the year (2005)'
  reg2cd2006   = 'SEER registry code at the end of the year (2006)'
  reg2cd2007   = 'SEER registry code at the end of the year (2007)'
  reg2cd2008   = 'SEER registry code at the end of the year (2008)'
  reg2cd2009   = 'SEER registry code at the end of the year (2009)'
  reg2cd2010   = 'SEER registry code at the end of the year (2010)'
  reg2cd2011   = 'SEER registry code at the end of the year (2011)'

  seq1     = 'Sequence Number'
  site1    = 'Primary Site'
  siter1   = 'Site Recode'
  siterkm1 = 'Site rec with Kaposi and mesothelioma'
  hist1    = 'Histologic Type ICD-O-3'
  hist2_1  = 'Histology (92-00) ICD-O-2'
  beh1     = 'Behavior code ICD-O-3 (1973+)'
  beh2_1   = 'Behavior code ICD-O-2 (1973+)'
  behtrend1= 'Behavior recode for analysis'
  modx1    = 'Month of Diagnosis'
  yrdx1    = 'Year of Diagnosis'
  ddxflag1 = 'Diagnosis Date Started Flag'
  ager1    = 'Age at Diagnosis'
  src1     = 'Type of Reporting Source'
  hstst1   = 'SEER historic stage A'
  aj3sr1   = 'SEER modified AJCC stage 3rd (1988-2003)'
  ajccstg1 = 'AJCC stage 3rd edition (1988-2003)'
  dajcct1  = 'Derived AJCC T, 6th ed (2004+)'
  dajccm1  = 'Derived AJCC M, 6th ed (2004+)'
  dajccn1  = 'Derived AJCC N, 6th ed (2004+)'
  dajccstg1= 'Derived AJCC Stage Group, 6th ed (2004+)'
  dajcflg1 = 'Derived AJCC--Flag (2004+)'
  dss77s1  = 'Derived SS1977 (2004+)'
  dss77f1  = 'Derived SS1977--Flag (2004+)'
  dss00s1  = 'Derived SS2000 (2004+)'
  dss00f1  = 'Derived SS2000--Flag (2004+)'
  sss77v1  = 'SEER summary stage 1977 (1995-2000)'
  sssm2Z1  = 'SEER summary stage 2000 (2001-2003)'
  t_dscrpt1= 'Derived AJCC T Descriptor (2004+)'
  n_dscrpt1= 'Derived AJCC N Descriptor (2004+)'
  m_dscrpt1= 'Derived AJCC M Descriptor (2004+)'
  summ2k1  = 'Summary Stage 2000 (1998+)'
  frstprm1 = 'First maligant primary indicator'
  marst1   = 'Marital Status at diagnosis'
  reg1     = 'SEER Registry Code at Diagnosis'
  monrx1   = 'Month Therapy Started'
  yearrx1  = 'Year Therapy Started'
  rad1     = 'Radiation'
  other_tx1= 'Other cancer-directed therapy'
  radsurg1 = 'Radiation sequence with surgery '
  radbrn1  = 'Radiation to Brain and/or CNS (1988-1997)'
  nosrg1   = 'Reason no cancer-directed surgery'
  grade1   = 'Grade'
  dxconf1  = 'Diagnostic Confirmation'
  lat1     = 'Laterality (1973+)'
  sssurg1  = 'Site Specific Surgery (1983-1997)'
  sxprim1  = 'Surgery of primary site (1998-2002)'
  numnd1   = 'Number of regional lymph node exams (1998-2002)'
  sxscop1  = 'Scope of regional lymph node surgery (1998-2002)'
  sxsite1  = 'Surgery of other reg/dist sites (1998-2002)'
  recstr1  = 'First course of reconstruction (1998-2002)'
  sxprif1  = 'RX Summ--Surg Prim Site (1998+)'
  sxscof1  = 'RX Summ--Scope Reg LN Sur (2003+)'
  sxsitf1  = 'RX Summ--Surg Oth Reg/Dis (2003+)'
  tumor1_1 = 'Tumor Marker 1 (1990-2003)'
  tumor2_1 = 'Tumor Marker 2 (1990-2003)'
  tumor3_1 = 'Tumor Marker 3 (1998-2003)'
  e4siz1   = 'EOD 4 - size (1983-1987)'
  e4ext1   = 'EOD 4 - extent (1983-1987)'
  e4nod1   = 'EOD 4 - nodes (1983-1987)'
  e10sz1   = 'EOD 10 - size (1988-2003)'
  e10ex1   = 'EOD 10 - extent (1988-2003)'
  e10nd1   = 'EOD 10 - nodes (1988-2003)'
  e10pn1   = 'Regional nodes positive (1988+)'
  e10ne1   = 'Regional nodes examined (1988+)'
  e10pe1   = 'EOD 10 - Prostate path ext (1995-2003)'
  eod_cd1  = 'Coding system-EOD (1973-2003)'
  cnty1    = 'County at Diagnosis'
  csex1    = 'CS extension (2004+)'
  cslym1   = 'CS lymph nodes (2004+)'
  csmet1   = 'CS mets at dx (2004+)'
  cssch1   = 'CS Schema'
  cs1st1   = 'CS site-specific factor 1 (2004+)'
  cs2st1   = 'CS site-specific factor 2 (2004+)'
  cs3st1   = 'CS site-specific factor 3 (2004+)'
  cs4st1   = 'CS site-specific factor 4 (2004+)'
  cs5st1   = 'CS site-specific factor 5 (2004+)'
  cs6st1   = 'CS site-specific factor 6 (2004+)'
  cs8st1   = 'CS site-specific factor 8 (2004+)'
  cs10st1  = 'CS site-specific factor 10 (2004+)'
  cs11st1  = 'CS site-specific factor 11 (2004+)'
  cs13st1  = 'CS site-specific factor 13 (2004+)'
  cs15st1  = 'CS site-specific factor 15 (2004+)'
  cs16st1  = 'CS site-specific factor 16 (2004+)'
  cs25st1  = 'CS site-specific factor 25 (2004+)'
  cstum1   = 'CS tumor size (2004+)'
  csvf1    = 'CS Version input (2004+)'
  csvl1    = 'CS Version latest (2004+)'
  csts1    = 'CS Tumor Size/Ext Eval (2004+)'
  csrg1    = 'CS Reg Nodes Eval (2004+)'
  csmt1    = 'CS Mets Eval (2004+)'
  hisrcb1  = 'Histology recode - Brain groupings'
  icdo1    = 'ICD-O coding scheme'
  napiia1  = 'NAPIIA Derived API Race'
  ayasiter1= 'AYA site recode'
  lymsubr1 = 'Lymphoma subtype recode'
  vsrtdx1  = 'SEER cause-specific death classification'
  payer_dx1= 'Primary Payer at DX'
  erstat1  = 'ER Status Recode Breast Cancer (1990+)'
  prstat1  = 'PR Status Recode Breast Cancer (1990+)'
  vasinv1  = 'Lymph-vascular Invasion (2004+)'
  dthflag1 = 'Therapy date flag'
  ositmor1 = 'Site-laterality-morph override'
  ositeod1 = 'Site-laterality-EOD override'
  oeoddt1  = 'Site-EOD-dx date override'
  ositbeh1 = 'Site-behavior override'
  osurcon1 = 'Surgery-diagnostic conf override'
  oseqlat1 = 'Site-type-lat-seq override'
  osittyp1 = 'Site-type edit override'
  oseqcon1 = 'Sequence number-dx conf override'
  odfsite1 = 'Seq-ill-defined site override'
  orptsrc1 = 'Report source sequence override'
  oleukdx1 = 'Report source sequence override'
  hbenign1 = 'Histology edit override'
  ositage1 = 'Age-site edit override'
  ICCC3V1  = 'ICCC site recode ICD-O-3'
  histrec1 = 'Histology recode - broad groupings'
  ICCC3X1  = 'ICCC site recode extended ICD-O-3'
  ICCCSITE1= 'ICCC site recode ICD-O-2'
  ICCCSM1  = 'SEER modified ICCC site recode ICD-O-2'
  intprim1 = 'Primary by International Rules'
  survmo1  = 'Survival time recode (month)'
  survyr1  = 'Survival time recode (year)'
  odthclass1= 'SEER other cause of death classification'
  typefu1  = 'Type of follow-up expected'
  cscurrent1= 'CS version input current (2004+)'
  cs03sch1 = 'CS Schema – v 0203 '
  icdot09_1= 'Recode ICD-O-2 to 9'
  icdot10_1= 'Recode ICD-O-2 to 10'
  ;

run;

proc contents data=pedsf;
   title 'proc contents, of PEDSF file';

run;