/***********************************************************************/
/* IF YOU RECEIVED THE PEDSF FILE BEFORE APRIL 2007 THEN YOU WILL      */
/* NEED A DIFFERENT INPUT STATEMENT. PLEASE CONTACT ANGELA MEEKINS VIA */
/* E-MAIL MEEKINSA@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 begin end pos i p);  
  infile inped lrecl=3544 missover pad;
  input 
      @0001  regcase   $char10.
      @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.
      @0024  med_dodm  $char2.
      @0026  med_dodd  $char2.
      @0028  med_dody  $char4.
      @0032  birthm    $char2.
      @0036  birthyr   $char4.
      @0040  m_sex     $char1.
      @0041  race      $char1.
      @0042  rsncd1    $char1.
      @0043  cur_ent   $char1.
      @0044  chr_esrd  $char1.
      @0045  med_stcd  $char2.      
      @0047  STATE     $char2.
      @0049  COUNTY    $char3.
      @0052  zip       $char9.        /*Special permission required*/
      @0061  code_sys  $char1.
      @0062  tract     $char6.        /*Special permission required*/
      @0068  tract2k   $char6.        /*Special permission required*/
      @0074  HSA       $char3.
      @0077  URBRUR    $char1.
      @0078  URBAN     $char2.
      @0080  ctpci90   10.
      @0090  ctmed90   10.
      @0100  ctden90   10.
      @0110  ctnon90   6.2
      @0116  cthso90   6.2
      @0122  ctscl90   6.2
      @0128  ctcol90   6.2
      @0134  ctblk90   6.2
      @0140  ctwht90   6.2
      @0146  cthsp90   6.2
      @0152  ctpov90   6.2
      @0158  cten590   6.2
      @0164  cten690   6.2
      @0170  medag90   10.
      @0180  medrc90   10.
      @0190  povrc90   6.2
      @0196  nonrc90   6.2
      @0202  hsorc90   6.2
      @0208  sclrc90   6.2
      @0214  colrc90   6.2            
      @0220  zppci90   10.
      @0230  zpmed90   10.
      @0240  zpden90   10.
      @0250  zpnon90   6.2
      @0256  zphso90   6.2
      @0262  zpscl90   6.2
      @0268  zpcol90   6.2
      @0274  zpblk90   6.2
      @0280  zpwht90   6.2
      @0286  zphsp90   6.2
      @0292  zpen590   6.2 
      @0298  zpen690   6.2
      @0304  znonrc90  6.2
      @0310  zhsorc90  6.2
      @0316  zsclrc90  6.2
      @0322  zcolrc90  6.2
      @0328  ctpci00   10.
      @0338  ctmed00   10.
      @0348  ctden00   10.
      @0358  ctnon00   6.2
      @0364  cthso00   6.2
      @0370  ctscl00   6.2
      @0376  ctcol00   6.2
      @0382  ctblk00   6.2
      @0388  ctwht00   6.2
      @0394  cthsp00   6.2
      @0400  ctpov00   6.2
      @0406  cten500   6.2
      @0412  cten600   6.2      
      @0418  medag00   10.
      @0428  medrc00   10.
      @0438  povrc00   6.2
      @0444  nonrc00   6.2
      @0450  hsorc00   6.2
      @0456  sclrc00   6.2
      @0462  colrc00   6.2      
      @0468  zppci00   10.
      @0478  zpmed00   10.
      @0488  zpden00   10.      
      @0498  zpnon00   6.2
      @0504  zphso00   6.2
      @0510  zpscl00   6.2
      @0516  zpcol00   6.2
      @0522  zpblk00   6.2
      @0528  zpwht00   6.2
      @0534  zphsp00   6.2
      @0540  zpen500   6.2
      @0546  zpen600   6.2
      @0552  znonrc00  6.2
      @0558  zhsorc00  6.2
      @0564  zsclrc00  6.2
      @0570  zcolrc00  6.2      
      @0576  reg65     $char2.          
      @0578  S_SEX     $char1.
      @0579  RAC_RECB  $char2.
      @0581  ICD_CODE  $char1.
      @0582  COD89V    $char4.
      @0586  COD10V    $char4.
      @0590  codkm     $char3.
      @0593  codpub    $char3.
      @0596  nhiade    $char1.
      @0597  ihsrecl   $char1.
      @0598  SER_DODM  $char2.
      @0600  SER_DODY  $char4.
      @0604  AGE_DX    $char3.
      @0607  sRACE     $char2.
      @0609  ORIGIN    $char1.
      @0610  DX65M     $char2.
      @0612  DX65Y     $char4.
      @0616  RESNREC   $char1.
      @0617  STAT_REC  $char1.
      @0622  cen_cert  $char1.
      @0623  ctcer2k   $char1.
      @0624  plc_brth  $char3.
      @0627  COUNT     $char2.
      @0629  NUMPRIMS  $char2.
      @0631  AGE1DX    $char3.
      @0634  SEQ1OV65  $char1.
      @0635  MULTSITE  $char1.
      @0636  SEQ1DX    $char2.      
      @;

  array count1(22)   $ 2 ptacnt1986-ptacnt2007;
  array count2(22)   $ 2 ptbcnt1986-ptbcnt2007;
  array count3(22)   $ 2 hmocnt1986-hmocnt2007;
  array stbuy(22)    $ 2 stbuyin1986-stbuyin2007;
  array enmon(264)   $ 1 mon1-mon264;
  array ghon(264)    $ 1 gho1-gho264;
  array zipcd(22)    $ 9 zip1986-zip2007;
  array registry(22) $ 2 registry1986-registry2007;
  array regcd2(22)   $ 2 reg2cd1986-reg2cd2007;
  array seq(10)      $ 2 seq1-seq10;
  array site(10)     $ 3 site1-site10;
  array siter(10)    $ 2 siter1-siter10;
  array hist(10)     $ 4 hist1-hist10;
  array beh(10)      $ 1 beh1-beh10;
  array modx(10)     $ 2 modx1-modx10;
  array yrdx(10)     $ 4 yrdx1-yrdx10;
  array ager(10)    $ 2 ager1-ager10;
  array src(10)     $ 1 src1-src10; 
  array hstst(10)   $ 1 hstst1-hstst10;
  array aj3sr(10)   $ 2 aj3sr1-aj3sr10;
  array nosrg(10)   $ 1 nosrg1-nosrg10;
  array grade(10)   $ 1 grade1-grade10;
  array dxconf(10)  $ 1 dxconf1-dxconf10;
  array sssurg(10)  $ 2 sssurg1-sssurg10;
  array rad(10)     $ 1 rad1-rad10;
  array lat(10)     $ 1 lat1-lat10;
  array e4siz(10)   $ 2 e4siz1-e4siz10;
  array e4ext(10)   $ 1 e4ext1-e4ext10;
  array e4nod(10)   $ 1 e4nod1-e4nod10;
  array e10sz(10)   $ 3 e10sz1-e10sz10;
  array e10ex(10)   $ 2 e10ex1-e10ex10;
  array e10nd(10)   $ 1 e10nd1-e10nd10;
  array e10pn(10)   $ 2 e10pn1-e10pn10;
  array e10ne(10)   $ 2 e10ne1-e10ne10;
  array e10pe(10)   $ 2 e10pe1-e10pe10;
  array marst(10)   $ 1 marst1-marst10;
  array sxprim(10)  $ 2 sxprim1-sxprim10; 
  array numnd(10)   $ 2 numnd1-numnd10; 
  array sxscop(10)  $ 1 sxscop1-sxscop10; 
  array sxsite(10)  $ 1 sxsite1-sxsite10; 
  array recstr(10)  $ 1 recstr1-recstr10;
  array tumor1(10)  $ 1 tumor1_1-tumor1_10;
  array tumor2(10)  $ 1 tumor2_1-tumor2_10;
  array tumor3(10)  $ 1 tumor3_1-tumor3_10;
  array frstprm(10) $ 1 frstprm1-frstprm10;
  array radsurg(10) $ 1 radsurg1-radsurg10;
  array radbrn(10)  $ 1 radbrn1-radbrn10;
  array ajccstg(10) $ 2 ajccstg1-ajccstg10;
  array site2r(10)  $ 2 site2r1-site2r10;
  array ste2rkm(10)  $ 2 site2rkm1-site2rkm10;
  array sterkm(10)   $ 2 siterkm1-siterkm10;
  array behtrnd(10)  $ 1 behtrend1-behtrend10;
  array beh_2(10)    $ 2 beh2_1-beh2_10;
  array hist_2(10)   $ 4 hist2_1-hist2_10;
  array other_tx(10) $ 1 other_tx1-other_tx10;
  array multprm(10)  $ 1 multprim1-multprim10;
  array regs(10)     $ 2 reg1-reg10;
  array sxscof(10)   $ 1 sxscof1-sxscof10;
  array sxsitf(10)   $ 1 sxsitf1-sxsitf10;
  array monrx(10)    $ 2 monrx1-monrx10;
  array yr_rx(10)    $ 4 yearrx1-yearrx10;
  array sxprif(10)   $ 2 sxprif1-sxprif10;
  array cnty(10)     $ 3 cnty1-cnty10;
  array survm(10)    $ 2 survm1-survm10;
  array survy(10)    $ 2 survy1-survy10;
  array survt(10)    $ 3 survt1-survt10;
  array dajccts(10)  $ 2 dajcct1-dajcct10;
  array dajccms(10)  $ 2 dajccm1-dajccm10;
  array dajccns(10)  $ 2 dajccn1-dajccn10;
  array dajcstg(10)  $ 2 dajccstg1-dajccstg10;
  array dajcflg(10)  $ 1 dajcflg1-dajcflg10;
  array eodcde(10)   $ 1 eod_cd1-eod_cd10;
  array csex(10)     $ 2 csex1-csex10;
  array cslym(10)    $ 2 cslym1-cslym10;
  array csmet(10)    $ 2 csmet1-csmet10;
  array csmt(10)     $ 1 csmt1-csmt10;
  array csrg(10)     $ 1 csrg1-csrg10;
  array cssite1(10)  $ 3 cs1st1-cs1st10;
  array cssite2(10)  $ 3 cs2st1-cs2st10;
  array cssite3(10)  $ 3 cs3st1-cs3st10;
  array cssite4(10)  $ 3 cs4st1-cs4st10;
  array cssite5(10)  $ 3 cs5st1-cs5st10;
  array cssite6(10)  $ 3 cs6st1-cs6st10;
  array cstum(10)    $ 3 cstum1-cstum10;
  array cssch(10)    $ 2 cssch1-cssch10;
  array csts(10)     $ 1 csts1-csts10;
  array csvf(10)     $ 2 csvf1-csvf10;
  array csvl(10)     $ 2 csvl1-csvl10;
  array dss77s(10)   $ 1 dss77s1-dss77s10;
  array dss77f(10)   $ 1 dss77f1-dss77f10;
  array dss00s(10)   $ 1 dss00s1-dss00s10;
  array dss00f(10)   $ 1 dss00f1-dss00f10;
  array ihsrec(10)   $ 1 ihsrec1-ihsrec10;
  array sss77(10)    $ 1 sss77v1-sss77v10;
  array sssm2z(10)   $ 1 sssm2Z1-sssm2Z10;
  array hisrcb(10)   $ 2 hisrcb1-hisrcb10;
  array icdo(10)     $ 1 icdo1-icdo10;
  array icd3(10)     $ 4 icd3_1-icd3_10;
  array icd3m(10)    $ 4 icd3M1-icd3M10;
  array primstl(10)  $ 3 primsl1-primsl10;
  array la05_cd(10)  $ 1 la05_1-la05_10;
  array napia_cd(10) $ 2 napiia1-napiia10;
   
      inc=638;
      retain begin end;
      begin=1;
      end=12;

      do i = 1 to 22;
        do p = begin to end;
        input @inc      enmon(p) $char1.
              @inc + 12 ghon(p)  $char1.
              @;
              inc=inc + 1;
              end;
          begin = begin + 12;
          end = end + 12;
    input @inc + 12  count1(i) $char2.
          @inc + 14  count2(i) $char2.
                @inc + 16  count3(i) $char2.
                @inc + 18  stbuy(i)  $char2.
                @;
          inc=inc + 20;
     end;

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

  pos = 1673;
  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 +  9) site2r(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) ager(i)    $char2.
         @(pos + 30) src(i)     $char1.
         @(pos + 31) 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 + 65) frstprm(i) $char1.
         @(pos + 66) multprm(i) $char1.
         @(pos + 67) marst(i)   $char1.
         @(pos + 68) regs(i)    $char2.
         @(pos + 70) monrx(i)   $char2.
         @(pos + 72) yr_rx(i)   $char4.
         @(pos + 76) rad(i)     $char1.
         @(pos + 83) other_tx(i) $char1.
         @(pos + 84) radsurg(i) $char1.
         @(pos + 85) radbrn(i)  $char1.
         @(pos + 86) nosrg(i)   $char1.
         @(pos + 87) grade(i)   $char1.
         @(pos + 88) dxconf(i)  $char1.
         @(pos + 89) lat(i)     $char1.
         @(pos + 90) sssurg(i)  $char2.
         @(pos + 92) sxprim(i)  $char2.
         @(pos + 94) numnd(i)   $char2.
         @(pos + 96) sxscop(i)  $char1.
         @(pos + 97) sxsite(i)  $char1.
         @(pos + 98) recstr(i)  $char1.
         @(pos + 99) sxprif(i)  $char2.
         @(pos +101) sxscof(i)  $char1.
         @(pos +102) sxsitf(i)  $char1.
         @(pos +103) tumor1(i)  $char1.
         @(pos +104) tumor2(i)  $char1.
         @(pos +105) tumor3(i)  $char1.
         @(pos +106) e4siz(i)   $char2.
         @(pos +108) e4ext(i)   $char1.
         @(pos +109) e4nod(i)   $char1.
         @(pos +110) e10sz(i)   $char3.
         @(pos +113) e10ex(i)   $char2.
         @(pos +115) e10nd(i)   $char1.
         @(pos +116) e10pn(i)   $char2.
         @(pos +118) e10ne(i)   $char2.
         @(pos +120) e10pe(i)   $char2.
         @(pos +122) eodcde(i)  $char1.
         @(pos +123) cnty(i)    $char3.
         @(pos +126) survm(i)   $char2.
         @(pos +128) survy(i)   $char2.
         @(pos +130) survt(i)   $char3.
         @(pos +133) csex(i)    $char2.
         @(pos +135) cslym(i)   $char2.
         @(pos +137) csmet(i)   $char2.
         @(pos +139) csmt(i)    $char1.
         @(pos +140) csrg(i)    $char1.
         @(pos +141) cssite1(i) $char3.
         @(pos +144) cssite2(i) $char3.
         @(pos +147) cssite3(i) $char3.
         @(pos +150) cssite4(i) $char3.
         @(pos +153) cssite5(i) $char3.
         @(pos +156) cssite6(i) $char3.
         @(pos +159) cstum(i)   $char3.
         @(pos +162) cssch(i)   $char2.
         @(pos +164) csts(i)    $char1.
         @(pos +165) csvf(i)    $char2.
         @(pos +167) csvl(i)    $char2.
         @(pos +169) hisrcb(i)  $char2.
         @(pos +171) icdo(i)    $char1.
         @(pos +172) icd3(i)    $char4.
         @(pos +176) icd3m(i)   $char4.
         @(pos +180) primstl(i) $char3.
         @(pos +183) la05_cd(i) $char1.
         @(pos +184) napia_cd(i) $char2.
                @;
     pos = pos + 187;
     end;
  input;

label
  regcase  = 'SEER Registry 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'
  dod_flg  = 'Date of Death 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'
  chr_esrd = 'Chronic Renal Disease'
  med_stcd = 'Medicare Status Code'
  mon1     = 'Part A and B Entitlement Indicator'
  gho1     = 'HMO Entitlement Indicator'
  ptacnt1986 = 'Number of Months in 1986 Covered for Part A'
  ptacnt1987 = 'Number of Months in 1987 Covered for Part A'
  ptacnt1988 = 'Number of Months in 1988 Covered for Part A'
  ptacnt1989 = 'Number of Months in 1989 Covered for Part A'
  ptacnt1990 = 'Number of Months in 1990 Covered for Part A'
  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'
  ptbcnt1986 = 'Number of Months in 1986 Covered for Part B'
  ptbcnt1987 = 'Number of Months in 1987 Covered for Part B'
  ptbcnt1988 = 'Number of Months in 1988 Covered for Part B'
  ptbcnt1989 = 'Number of Months in 1989 Covered for Part B'
  ptbcnt1990 = 'Number of Months in 1990 Covered for Part B'
  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'
  hmocnt1986 = 'Number of Months in 1986 as an HMO member'
  hmocnt1987 = 'Number of Months in 1987 as an HMO member'
  hmocnt1988 = 'Number of Months in 1988 as an HMO member'
  hmocnt1989 = 'Number of Months in 1989 as an HMO member'
  hmocnt1990 = 'Number of Months in 1990 as an HMO member'
  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'
  stbuyin1986 = 'Number of Months in 1986 with State Buy-in Coverage'
  stbuyin1987 = 'Number of Months in 1987 with State Buy-in Coverage'
  stbuyin1988 = 'Number of Months in 1988 with State Buy-in Coverage'
  stbuyin1989 = 'Number of Months in 1989 with State Buy-in Coverage'
  stbuyin1990 = 'Number of Months in 1990 with State Buy-in Coverage'
  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'
  zip1986   = 'Zip Code in 1986'
  zip1987   = 'Zip Code in 1987'
  zip1988   = 'Zip Code in 1988'
  zip1989   = 'Zip Code in 1989'
  zip1990   = 'Zip Code in 1990'
  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'
  registry1986 ='SEER registry code in 1986 (retained over years)'
  registry1987 ='SEER registry code in 1987 (retained over years)'
  registry1988 ='SEER registry code in 1988 (retained over years)'
  registry1989 ='SEER registry code in 1989 (retained over years)'
  registry1990 ='SEER registry code in 1990 (retained over years)'
  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)'
  reg2cd1986   = 'SEER registry code at the end of the year (1986)'
  reg2cd1987   = 'SEER registry code at the end of the year (1987)'
  reg2cd1988   = 'SEER registry code at the end of the year (1988)'
  reg2cd1989   = 'SEER registry code at the end of the year (1989)'
  reg2cd1990   = 'SEER registry code at the end of the year (1990)'
  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)'
  state    = 'State'
  county   = 'County'
  zip      = 'Zip Code'
  tract    = 'Census Tract 1970/80/90'
  tract2k  = 'Census Tract 2000'
  hsa      = 'Health Service Area'
  s_sex    = 'SEER Sex'
  rac_recb = 'SEER Race Recode B'
  icd_code = 'ICD Code - Cause of Death'
  cod89v   = 'Cause of Death 8th and 9th version'
  cod10v   = 'Cause of Death 10th version'
  ser_dodm = 'SEER Month of Death'
  ser_dody = 'SEER Year of Death'
  age_dx   = 'SEER Age at Diagnosis'
  srace    = 'SEER Race/Ethnicity'
  origin   = 'SEER Hispanic Surname'
  dx65m    = 'First Diagnosis date at age 65 + (months)'
  dx65y    = 'First Diagnosis date at age 65 + (years)'
  resnrec  = 'Diagnosis Indicator'
  age1dx   = 'Age at First Diagnosis'
  seq1ov65 = 'Over 65 Flag'
  multsite = 'Multiple Site Indicator'
  seq1dx   = '1st Cancer Sequence Number'
  count    = 'Number of SEER records'
  seq1     = 'Sequence Number 1'
  site1    = 'Cancer Site'
  siter1   = 'Cancer Site Recode 1'
  hist1    = 'Histology Code 1'
  beh1     = 'Behavior Code 1'
  modx1    = 'Month of Diagnosis 1'
  yrdx1    = 'Year of Diagnosis 1'
  ager1    = 'Age at Diagnosis Year 1'
  src1     = 'Reporting Source 1'
  hstst1   = 'Historic Stage 1'
  aj3sr1   = 'Modified AJC Stage 1 (1988+)'
  nosrg1   = 'Was Cancer Directed Surgery Performed?'
  grade1   = 'Grade 1'
  dxconf1  = 'Diagnostic Confirmation 1'
  sssurg1  = 'Site Specific Surgery 1'
  rad1     = 'Radiation 1'
  lat1     = 'Laterality 1'
  e4siz1   = 'EOD 4 (Size) 1'
  e4ext1   = 'EOD 4 (Extent) 1'
  e4nod1   = 'EOD 4 (Nodes) 1'
  e10sz1   = 'EOD 10 (Size) 1'
  e10ex1   = 'EOD 10 (Extent) 1'
  e10nd1   = 'EOD 10 (Nodes) 1'
  e10pn1   = 'EOD 10 (# Positive Nodes) 1'
  e10ne1   = 'EOD 10 (# Nodes Examined) 1'
  e10pe1   = 'EOD 10 (Prostate Pathology Ext 1995+) 1'
  marst1   = 'Marital Status'
  sxprim1  = 'Surgery of primary site (1998+)'
  numnd1   = 'Number of regional lymph node exams (1998+)'
  sxscop1  = 'Scope of regional lymph node surgery (1998+)'
  sxsite1  = 'Surgery of other reg/dist sites (1998+)'
  recstr1  = 'First course of reconstruction (1998+)'
  ctpci90  = 'Census Tract PCI (Census 1990)'                       
  ctmed90  = 'Census Tract Median Income (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)' 
  ctden90  = 'Census Tract Density (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)'
  zppci90  = 'Zip Code PCI (Census 1990)'                       
  zpmed90  = 'Zip Code Median Income (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)' 
  zpden90  = 'Zip Code Density (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)'
  ctpci00  = 'Census Tract PCI (Census 2000)'                       
  ctmed00  = 'Census Tract Median Income (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)' 
  ctden00  = 'Census Tract Density (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)'
  zppci00  = 'Zip Code PCI (Census 2000)'                       
  zpmed00  = 'Zip Code Median Income (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)' 
  zpden00  = 'Zip Code Density (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)'
  cen_cert = 'Census Tract Certainty 70/80/90'
  ctcer2k  = 'Census Tract Certainty 2000'
  plc_brth = 'Place of Birth'
  numprims = 'Number of Primary Cancers'
  tumor1_1 = 'Tumor Marker #1'
  tumor2_1 = 'Tumor Marker #2'
  tumor3_1 = 'Tumor Marker #3'
  frstprm1 = 'First maligant primary indicator'
  radsurg1 = 'Radiation sequence with surgery #1'
  radbrn1  = 'Radiation to Brain and/or CNS #1'
  SITERKM1 = "Site rec with Kaposi and mesothelioma"
  BEHTREND1= "Behavior recode for analysis"
  CODKM    = "COD to site rec KM"
  BEH2_1   = "Behavior code ICD-O-2 (1973+)"
  HIST2_1  = "Histology (92-00) ICD-O-2"
  SITE2R1  = "Site recode (ICD-O-2)"
  AJCCSTG1 = "AJCC stage 3rd edition (1988+)"
  SXPRIF1  = "RX Summ--Surg Prim Site (1998+)"
  SXSCOF1  = "RX Summ--Scope Reg LN Sur (2003+)"
  SXSITF1  = "RX Summ--Surg Oth Reg/Dis (2003+)"
  OTHER_TX1= "Other cancer-directed therapy"
  TRACT2K  = "Census Tract 2000"
  CODE_SYS = "Census Cod Sys 1970/80/90"
  STAT_REC = "Vital status recode (study cutoff used)"
  survm1   = "Survival time recode (month)"
  survy1   = "Survival time recode (year)"
  survt1   = "Survival time recode (total # of months)"
  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"
  eod_cd1  = "Coding system-extent of disease"
  csex1    = "CS extension"
  cslym1   = "CS lymph nodes"
  csmet1   = "CS mets at dx"
  csmt1    = "CS Mets Eval"
  csrg1    = "CS Reg Node Eval"
  cs1st1   = "CS site-specific factor 1"
  cs2st1   = "CS site-specific factor 2"
  cs3st1   = "CS site-specific factor 3"
  cs4st1   = "CS site-specific factor 4"
  cs5st1   = "CS site-specific factor 5"
  cs6st1   = "CS site-specific factor 6"
  cstum1   = "CS tumor size"
  cssch1   = "CS Schema"
  csts1    = "CS Tumor Size/Ext Eval"
  csvf1    = "CS Version 1st"
  csvl1    = "CS Version Latest"
  dss77s1  = "Derived SS1977"
  dss77f1  = "Derived SS1977--Flag"
  dss00s1  = "Derived SS2000"
  dss00f1  = "Derived SS2000--Flag"
  ihsrec1  = "IHS Link Recode (Nov 2007+2006)"
  sss77v1  = "SEER summary stage 1977 (1995-2000)"
  sssm2Z1  = "SEER summary stage 2000 (2001-2003)"
  hisrcb1  = "Histology recode - Brain groupings"
  icdo1    = "ICD-O coding scheme"
  icd3_1   = "ICD-O-3 Hist/behav"
  icd3M1   = "ICD-O-3 Hist/behav, malignant"
  primsl1  = "Primary Site - labeled"
  la05_1   = "Louisiana 2005 - 1st vs 2nd half of year"
  napiia1  = "NAPIIA Derived API Race"
  ;

run;

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