/* These input files can be found on the SEER Web site */
/* https://seer.cancer.gov/censustract-pops/ */

filename in 'us.2006_2019.tract.level.pops.txt';

/* All files read into SEER*Prep must end in .txd */
/* We'll keep all Maryland records for 2006-2018 */
filename out 'yr2006_2019.tract.pops.md.txd';

data _null_;
  infile in;
  file out;
  length state_a $ 2;
  input
    @01 Year     4.
    @05 State_A  $Char2. 
    @07 State_F  2.
    @09 County   3.
    @12 Tract    $Char6.
    @18 Race     1.
    @19 Sex      1.
    @20 AgeGrp   2.
    @22 Pop      9.
    ;
  if 2006<=year<=2018;  /* keep only 2006-2018 records */
  if state_f=24;        /* keep only Maryland records */
  /* The format of the population files required by SEER*Prep */
  /* is the same as the files distributed from */
  /* http://seer.cancer.gov/popdata */
  put @01 Year     4.
      @05 State_A  $2.
      @07 State_F  z2.
      @09 County   z3.
      @12 tract    $6.
      @18 race     z1.
      @19 sex       1.
      @20 agegrp   z2.
      @22 Pop      z9.
      ;
run;