-------------------------------------------------------------------------------
       log:  /home/brass/hdir0/ebenstei/nta/taiwan/census1990/logs/census1990.l
> og
  log type:  text
 opened on:   5 Nov 2005, 01:25:13

. 
. #delimit;
delimiter now ;
. /*=======================================       
>  Program: censusdata.do
>  Author:  Avi Ebenstein
>  Created: March 2005
>  Purpose: Create Stata files from
>           Taiwan census files
> ========================================*/
> 
> ***********************;
. * Convert small data   ;
. * sets into Stata      ;
. ***********************;
. local fileparts "01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 
> 21 63 64 71 72";

. *===============================;
. * Step 1: Bring data into Stata ;
. *===============================;
. local rerun=1;

. while `rerun'==1{;
  2. foreach i of local fileparts{;
  3. clear _all;
  4. qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta
> /taiwan/census1990/pop1990_raw/y79hS`i'PSN.txt) clear;
  5. compress;
  6.                              ******************;
. * Label variables ;
. ******************;
.                              do ~/nta/taiwan/census1990/dofiles/label1990.do;
  7. for var *: label values X X;
  8. label var birthyear "Actual birthyear (post revolution)";
  9. replace birthyear=birthyear+1911;
 10. egen uniqueid=concat(county town village superdist cendist dwellnum unit);
 11.                              sort uniqueid;
 12. gen census=1990;
 13. gen yrsed=0;
 14.                              do ~/taiwan/yrsed.do;
 15.                              save ~/nta/taiwan/census1990/data1990/pop1990
> _`i',replace;
 16. };
 17.                  *************;
.                local rerun=0;
 18. };
  - while `rerun'==1{
  = while 1==1{
  - foreach i of local fileparts{
  - clear _all
    ----------------------------------------------------------- begin clear ---
    - version 8
    - drop _all
    - label drop _all
    - matrix drop _all
    - scalar drop _all
    - constraint drop _all
    - eq drop _all
      ------------------------------------------------------------ begin eq ---
      - version 3.1
      - if "$S_eqnum"=="" {
      = if ""=="" {
      - global S_eqnum 0
      - }
      - if "`1'"=="?" | "`1'"=="??" {
      = if "drop"=="?" | "drop"=="??" {
        if "`3'"!="" {
        error 198
        }
        _crceqnm `2'
        local ename "${S_eqeq`r(n_eq)'}"
        if "`1'"=="?" & "`ename'"!= "" {
        local varlist "req ex"
        capture parse "`ename'"
        if _rc {
        di in red "`r(eqname)':" _col(11) "`ename'"
        local varlist "req ex"
        parse "`ename'"
        }
        local ename "`varlist'"
        }
        ret local eq "`ename'"
        ret local eqname "`r(eqname)'"
        global S_1 `return(eq)'
        global S_3 `return(eqname)'
        exit
        }
      - if "`1'"=="dir" | "`1'"=="list" {
      = if "drop"=="dir" | "drop"=="list" {
        local cmd "`1'"
        mac shift
        if "`1'"=="" {
        local 1 "_all"
        }
        _crceqlu `*'
        parse "`r(eqnums)'", parse(" ")
        if "`cmd'"=="dir" {
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}"
        mac shift
        }
        exit
        }
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}:" _col(11) in ye "${S_eqeq`1'}"
        mac shift
        }
        exit
        }
      - if "`1'"=="drop" {
      = if "drop"=="drop" {
      - mac shift
      - if "`*'"=="" {
      = if "_all"=="" {
        error 198
        }
      - local arg "`*'"
      = local arg "_all"
      - _crceqlu `*'
      = _crceqlu _all
        ------------------------------------------------- begin eq._crceqlu ---
        - version 3.1
        - if "`*'" == "" { exit }
        = if "_all" == "" { exit }
        - if "`*'" == "_all" {
        = if "_all" == "_all" {
        - local i 1
        - while `i'<=$S_eqnum {
        = while 1<=0 {
          if "${S_eqnm`i'}"!="" {
          ret local eqnums "`return(eqnums)' `i'"
          }
          local i=`i'+1
          }
        - exit
        --------------------------------------------------- end eq._crceqlu ---
      - parse "`r(eqnums)'", parse(" ")
      = parse "", parse(" ")
      - while "`1'"!="" {
      = while ""!="" {
        _crceqdp `1'
        mac shift
        }
      - if "`arg'"=="_all" {
      = if "_all"=="_all" {
      - global S_eqnum
      - }
      - exit
      -------------------------------------------------------------- end eq ---
    - file close _all
    - postutil clear
    - _return drop _all
    - discard
    ------------------------------------------------------------- end clear ---
  - qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS`i'PSN.txt) clear
  = qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS01PSN.txt) clear
  - compress
county was float now byte
town was float now byte
village was float now int
superdist was float now int
cendist was float now byte
dwellnum was float now int
unit was float now byte
fileid was float now byte
individ was float now int
houseid was float now byte
sex was float now byte
relate was float now byte
age was float now byte
after was float now byte
birthyear was float now byte
lateyear was float now byte
nation was float now byte
locality was float now byte
formres was float now byte
locality2 was float now byte
marstat was float now byte
student was float now byte
educ was float now byte
major was float now byte
health was float now byte
healthprob was float now byte
employed was float now byte
unempres was float now byte
head was float now byte
industry was float now int
occup was float now int
empstat was float now byte
workstudy was float now byte
wsloc was float now byte
locality3 was float now int
moneysource was float now byte
over65 was float now byte
residtype was float now byte
ownhouse was float now byte
qtype was float now byte
hhsize was float now int
hhrel was float now byte
hhrelu6 was float now byte
hhrelu18 was float now byte
over65num was float now byte
disablednum was float now byte
housetype was float now byte
PA088 was float now byte
village2 was float now int
county2 was float now byte
batchid was float now byte
FILLER was float now byte
  - do ~/nta/taiwan/census1990/dofiles/label1990.do

. #delimit;
delimiter now ;
.  label define sex 1 "Male", add;

.         label define sex 2 "Female", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define relate 1 "Household head", add;

. label define relate 2 "Spouse", add;

.         label define relate 3
> "Parent", add;

.             label define relate 4 "Parent's spouse", add;

. label define relate 5 "Grandparents", add;

.             label define
> relate 6 "Child", add;

.                       label define relate 7 "Child's
> spouse", add;

.           label define relate 8 "Grandchildren", add;

.         label
> define relate 9 "Sibling", add;

.               label define relate 10 "Other
> relative", add;

.         label define relate 11 "Employee", add;

.           label define
> relate 12 "Temporary", add;

.                                                                              
>                                                                              
>                                                                              
>            label define after 1 "Before 1912", add;

. label define after 2 "After 1912", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                label define l
> ateyear 1 "Before December 15", add;

. label define lateyear 2 "After December 15", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define nation 1 "Taiwanese", add;

. label define nation 2 "Mainland Chinese", add;

.         label define nation 3
> "American", add;

.     label define nation 4 "Japanese", add;

.    label
> define nation 5 "Southeast Asian", add;

.         label define nation 6 "Other",
> add;

.                                                                              
>                                                                              
>                                                                              
>                                                                         label
>  define formres 1 "Same household", add;

. label define formres 2 "Same village", add;

.         label define formres 3
> "Same town, different village", add;

.    label define formres 4 "Same
> county, different town", add;

.         label define formres 5 "Also Taiwan,
> different county", add;

.          label define formres 6 "In China, not in
> Taiwan", add;

.            label define formres 7 "Outside China/Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                              label define mar
> stat 1 "Single", add;

. label define marstat 2 "Married or partnered", add;

.         label define
> marstat 3 "Divorced or separated", add;

.                label define marstat 4
> "Widowed", add;

.                                                                              
>                                                                              
>                                                                              
>  label define student 1 "Currently studying", add;

. label define student 2 "Graduated", add;

.      label define student 3
> "Drop out", add;

.      label define student 4 "Passed equivalence exam",
> add;

.         label define student 5 "Not in school", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define educ 1 "Elem
> entary school", add;

. label define educ 2 "Junior high schol", add;

.         label define educ 3
> "Senior high school", add;

.   label define educ 4 "Vocational school",
> add;

.         label define educ 5 "Associate College", add;

.             label
> define educ 6 "College", add;

.                label define educ 7 "Graduate
> school", add;

.  label define educ 8 "Illiterate", add;

.          label define
> educ 9 "Self-taught", add;

.  label define educ 10 "Day-Care", add;

. label define educ 11 "Kindergarten", add;

.     label define educ 12
> "Other child-level", add;

.                                                                              
>                                                                              
>                                                                              
>           label define health 1 "No", add;

. label define health 2 "Yes", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define healthprob 1
>  "Multiple impediments", add;

. label define healthprob 2 "Sight impediment", add;

.         label define
> healthprob 3 "Hearing impediment", add;

.               label define healthprob
> 4 "Language impediment", add;

.            label define healthprob 5 "Bodily
> impediment", add;

.          label define healthprob 6 "Intelligence
> impediment", add;

.          label define healthprob 7 "Loss of major
> organ function", add;

.          label define healthprob 8 "Colorblindness",
> add;

.         label define healthprob 9 "Vegetative state or senility", add;

. label define healthprob 10 "Avoids social intersaction", add;

. label define healthprob 11 "Unable to take care of onesself", add;

. label define healthprob 12 "Other", add;

.    label define healthprob 0
> "None, N/A", add;

.                                                                              
>                                                                              
>                                                    label define employed 1 "E
> mployed", add;

. label define employed 2 "Conscripted", add;

.         label define employed
> 3 "Unemployed", add;

.   label define employed 0 "Less than 15 years
> old", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine unempres 1 "Starting to look for a job", add;

. label define unempres 2 "Looking anew for a job", add;

.         label define
> unempres 3 "Pursuing studies", add;

.    label define unempres 4
> "Cooking/ home chores", add;

.    label define unempres 5 "Disabled",
> add;

.         label define unempres 6 "Long illness", add;

.  label define
> unempres 7 "Forbidden to work/imprisoned", add;

.         label define unempres
> 8 "Unwilling to work", add;

.                    label define unempres 9
> "Other", add;

.         label define unempres 0 "Employed or Less than 15
> years old, N/A", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                               label define empstat 1 "Employer", add;

. label define empstat 2 "Self-employed", add;

.         label define empstat 3
> "Private enterprise", add;

.                 label define empstat 4
> "Government", add;

.     label define empstat 5 "Volunteer/ Unpaid", add;

. label define empstat 0 "N/A", add;

.                                                                              
>                                                                              
>                                           label define workstudy 1 "Yes", add
> ;

. label define workstudy 2 "No", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define wsloc 1 "On-site", add
> ;

. label define wsloc 2 "Same village", add;

.         label define wsloc 3
> "Different village", add;

.   label define wsloc 4 "Outside Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine moneysource 1 "Savings", add;

. label define moneysource 2 "Work income", add;

.         label define
> moneysource 3 "Partner", add;

.          label define moneysource 4
> "Children", add;

.          label define moneysource 5 "Other
> relatives/friends", add;

.  label define moneysource 6 "Retirement/
> pensions", add;

.             label define moneysource 7 "Welfare", add;

.         label
> define moneysource 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define residtype 1 "House ", 
> add;

. label define residtype 2 "Apartment", add;

.         label define residtype
> 3 "Other", add;

.                                                                              
>                                                                              
>                                                    label define buildtype 1 "
> Traditional rural type", add;

. label define buildtype 2 "Private courtyard/ duplex type", add;

.         label
> define buildtype 3 "Joined-roof type", add;

.   label define buildtype 4
> "Five or fewer floor apartments", add;

.  label define buildtype 5
> "Six-twelve floor apartments", add;

.     label define buildtype 6 "13 or
> more floor apartments", add;

.    label define buildtype 7 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define inhabited 1 "Someone p
> resent", add;

. label define inhabited 2 "Empty household", add;

.         label define
> inhabited 3 "Other use and nobody present", add;

.                                                                              
>                                                                              
>                                                                              
>                          label define residuse 1 "Use only as home", add;

. label define residuse 2 "Also industrial use", add;

.         label define
> residuse 3 "Also commercial use", add;

.          label define residuse 4 "Also
> other use", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine residage 1 "1912-1945", add;

. label define residage 2 "1946-1960", add;

.         label define residage
> 3 "1961-1970", add;

.    label define residage 4 "1971-1980", add;

.         label
> define residage 5 "1981-1985", add;

.             label define residage 6
> "1986", add;

.         label define residage 7 "1987", add;

.          label define
> residage 8 "1988", add;

.              label define residage 9 "1989", add;

. label define residage 10 "1990", add;

.                                                                              
>                                                                              
>                                                                             l
> abel define roomnum 1 "1", add;

. label define roomnum 2 "2", add;

.         label define roomnum 3 "3",
> add;

.         label define roomnum 4 "4", add;

.       label define roomnum 5
> "5", add;

.      label define roomnum 6 "6", add;

.             label define
> roomnum 7 "7", add;

.  label define roomnum 8 "8", add;

.           label define
> roomnum 9 "9", add;

.  label define roomnum 10 "10 or more", add;

.                                                                              
>                                                                              
>                         label define residnum 1 "1", add;

. label define residnum 2 "2", add;

.         label define residnum 3 "3",
> add;

.         label define residnum 4 "4", add;

.      label define residnum 5
> "5", add;

.      label define residnum 6 "6 or more", add;

.                                                                              
>                                                                              
>                                                                              
>         label define residown 1 "Self-purchased ordinary residence", add;

. label define residown 2 "Self-purchased Government built residence",
> add;

.         label define residown 3 "Inheritance or present", add;

.         label
> define residown 4 "Rented publicly owned Government built residence",
> add;

.         label define residown 5 "Rented privately owned government
> built residence", add;

.               label define residown 6 "Rented
> non-government built residence", add;

.            label define residown 7
> "Allocated residence (subsidized provision of housing)", add;

.          label
> define residown 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                  label define timeat 1 "1 year or less", add;

. label define timeat 2 "1-5 years", add;

.         label define timeat 3 "6-10
> years", add;

.  label define timeat 4 "11-15 years", add;

.             label
> define timeat 5 "16-20 years", add;

.           label define timeat 6 "21
> years or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                   label define spacecomp 1 "R
> ather large", add;

. label define spacecomp 2 "Rather small", add;

.         label define spacecomp
> 3 "About the same", add;

.                                                                              
>                                                                              
>                                                    label define spacediff 1 "
> Less than 5", add;

. label define spacediff 2 "btw 5-10", add;

.         label define spacediff
> 3 "btw 10-15", add;

.     label define spacediff 4 "15-20", add;

.         label
> define spacediff 5 "20 or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                        
end of do-file
  - for var *: label values X X
    ------------------------------------------------------------- begin for ---
    - if _caller()<6 {
      for5_0 `0'
      exit
      }
    - version 6.0
    - gettoken piece cmd: 0, parse(" :") quotes
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"var"' != ":" & `"var"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"*"' != ":" & `"*"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var *"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `":"' != ":" & `":"' != "" {
      local for `"`for' `piece'"'
      gettoken piece cmd: cmd, parse(" :") quotes
      }
    - if `"`piece'"' != ":" {
    = if `":"' != ":" {
      error 198
      }
    - local i 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `"var"' != "" & `"var"'!="," {
    - local i = `i' + 1
    = local i = 0 + 1
    - if `i' > 9 {
    = if 1 > 9 {
      di in red "too many lists"
      exit 198
      }
    - gettoken in: for, parse(" ,")
    - if `"`in'"' == "in" {
    = if `"*"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
    - else local from`i' = substr("XYZABCDEF",`i',1)
    = else local from1 = substr("XYZABCDEF",1,1)
    - GetType `"`su'"'
    = GetType `"var"'
      --------------------------------------------------- begin for.GetType ---
      - local typ `"`1'"'
      = local typ `"var"'
      - local l = length(`"`typ'"')
      = local l = length(`"var"')
      - if `l' == 0 { error 198 }
      = if 3 == 0 { error 198 }
      - if substr("varlist",1,max(3,`l')) == `"`typ'"' {
      = if substr("varlist",1,max(3,3)) == `"var"' {
      - ret local type "varlist"
      - }
      - else if substr("numlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("numlist",1,max(3,3)) == `"var"' {
        ret local type "numlist"
        }
      - else if substr("newlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("newlist",1,max(3,3)) == `"var"' {
        ret local type "newlist"
        }
      - else if "any" == `"`typ'"' {
      = else if "any" == `"var"' {
        ret local type "any"
        }
      - else {
        di in red `""`typ'" invalid list type"'
        exit 198
        }
      ----------------------------------------------------- end for.GetType ---
    - local type "`r(type)'"
    = local type "varlist"
    - local j 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `"*"'!="" & `"*"' != "\" & `"*"'!="," {
    - if "`type'" =="any" {
    = if "varlist" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
    - else local su`i' `"`su`i'' `su'"'
    = else local su1 `" *"'
    - gettoken su for: for, parse(" ,")
    - }
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `""'!="" & `""' != "\" & `""'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
    - if "`type'"!="any" {
    = if "varlist"!="any" {
    - if "`type'"=="varlist" {
    = if "varlist"=="varlist" {
    - if "`su`i''" != "" {
    = if " *" != "" {
    - unabbrev `su`i''
    = unabbrev  *
      ------------------------------------------------------ begin unabbrev ---
      - version 6
      - sret clear
      - gettoken list1 0 : 0
      - local 0 `"`list1' `0'"'
      = local 0 `"* "'
      - syntax varlist [, min(string) max(string)]
      - sret local varlist `varlist'
      = sret local varlist county town village superdist cendist dwellnum unit 
> fileid individ houseid sex relate age after birthyear lateyear nation localit
> y formres locality2 marstat student educ major health healthprob employed une
> mpres head industry occup empstat workstudy wsloc locality3 moneysource over6
> 5 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednu
> m housetype PA088 village2 county2 batchid runid FILLER
      - sret local k : word count `varlist'
      = sret local k : word count county town village superdist cendist dwellnu
> m unit fileid individ houseid sex relate age after birthyear lateyear nation 
> locality formres locality2 marstat student educ major health healthprob emplo
> yed unempres head industry occup empstat workstudy wsloc locality3 moneysourc
> e over65 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num dis
> ablednum housetype PA088 village2 county2 batchid runid FILLER
      - global S_1 "`varlist'"
      = global S_1 "county town village superdist cendist dwellnum unit fileid 
> individ houseid sex relate age after birthyear lateyear nation locality formr
> es locality2 marstat student educ major health healthprob employed unempres h
> ead industry occup empstat workstudy wsloc locality3 moneysource over65 resid
> type ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum house
> type PA088 village2 county2 batchid runid FILLER"
      - global S_2 `s(k)'
      = global S_2 53
      - if "`min'"=="" & "`max'"=="" { exit }
      = if ""=="" & ""=="" { exit }
      -------------------------------------------------------- end unabbrev ---
    - local thesu "`s(varlist)'"
    = local thesu "county town village superdist cendist dwellnum unit fileid i
> ndivid houseid sex relate age after birthyear lateyear nation locality formre
> s locality2 marstat student educ major health healthprob employed unempres he
> ad industry occup empstat workstudy wsloc locality3 moneysource over65 residt
> ype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum houset
> ype PA088 village2 county2 batchid runid FILLER"
    - }
    - else local thesu
    - }
    - else if "`type'"=="numlist" {
    = else if "varlist"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
    - else if "`type'"=="newlist" {
    = else if "varlist"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
    - else {
      di in red "type `type' not yet implemented"
      exit 198
      }
    - parse "`thesu'", parse(" ")
    = parse "county town village superdist cendist dwellnum unit fileid individ
>  houseid sex relate age after birthyear lateyear nation locality formres loca
> lity2 marstat student educ major health healthprob employed unempres head ind
> ustry occup empstat workstudy wsloc locality3 moneysource over65 residtype ow
> nhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum housetype PA
> 088 village2 county2 batchid runid FILLER", parse(" ")
    - local su`i'
    = local su1
    - local j 1
    - while "``j''" != "" {
    = while "county" != "" {
    - local su`i'`j' "``j''"
    = local su11 "county"
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while "``j''" != "" {
    = while "town" != "" {
    - local su`i'`j' "``j''"
    = local su12 "town"
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while "``j''" != "" {
    = while "village" != "" {
    - local su`i'`j' "``j''"
    = local su13 "village"
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while "``j''" != "" {
    = while "superdist" != "" {
    - local su`i'`j' "``j''"
    = local su14 "superdist"
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while "``j''" != "" {
    = while "cendist" != "" {
    - local su`i'`j' "``j''"
    = local su15 "cendist"
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while "``j''" != "" {
    = while "dwellnum" != "" {
    - local su`i'`j' "``j''"
    = local su16 "dwellnum"
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while "``j''" != "" {
    = while "unit" != "" {
    - local su`i'`j' "``j''"
    = local su17 "unit"
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while "``j''" != "" {
    = while "fileid" != "" {
    - local su`i'`j' "``j''"
    = local su18 "fileid"
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while "``j''" != "" {
    = while "individ" != "" {
    - local su`i'`j' "``j''"
    = local su19 "individ"
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while "``j''" != "" {
    = while "houseid" != "" {
    - local su`i'`j' "``j''"
    = local su110 "houseid"
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while "``j''" != "" {
    = while "sex" != "" {
    - local su`i'`j' "``j''"
    = local su111 "sex"
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while "``j''" != "" {
    = while "relate" != "" {
    - local su`i'`j' "``j''"
    = local su112 "relate"
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while "``j''" != "" {
    = while "age" != "" {
    - local su`i'`j' "``j''"
    = local su113 "age"
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while "``j''" != "" {
    = while "after" != "" {
    - local su`i'`j' "``j''"
    = local su114 "after"
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while "``j''" != "" {
    = while "birthyear" != "" {
    - local su`i'`j' "``j''"
    = local su115 "birthyear"
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while "``j''" != "" {
    = while "lateyear" != "" {
    - local su`i'`j' "``j''"
    = local su116 "lateyear"
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while "``j''" != "" {
    = while "nation" != "" {
    - local su`i'`j' "``j''"
    = local su117 "nation"
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while "``j''" != "" {
    = while "locality" != "" {
    - local su`i'`j' "``j''"
    = local su118 "locality"
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while "``j''" != "" {
    = while "formres" != "" {
    - local su`i'`j' "``j''"
    = local su119 "formres"
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while "``j''" != "" {
    = while "locality2" != "" {
    - local su`i'`j' "``j''"
    = local su120 "locality2"
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while "``j''" != "" {
    = while "marstat" != "" {
    - local su`i'`j' "``j''"
    = local su121 "marstat"
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while "``j''" != "" {
    = while "student" != "" {
    - local su`i'`j' "``j''"
    = local su122 "student"
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while "``j''" != "" {
    = while "educ" != "" {
    - local su`i'`j' "``j''"
    = local su123 "educ"
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while "``j''" != "" {
    = while "major" != "" {
    - local su`i'`j' "``j''"
    = local su124 "major"
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while "``j''" != "" {
    = while "health" != "" {
    - local su`i'`j' "``j''"
    = local su125 "health"
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while "``j''" != "" {
    = while "healthprob" != "" {
    - local su`i'`j' "``j''"
    = local su126 "healthprob"
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while "``j''" != "" {
    = while "employed" != "" {
    - local su`i'`j' "``j''"
    = local su127 "employed"
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while "``j''" != "" {
    = while "unempres" != "" {
    - local su`i'`j' "``j''"
    = local su128 "unempres"
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while "``j''" != "" {
    = while "head" != "" {
    - local su`i'`j' "``j''"
    = local su129 "head"
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while "``j''" != "" {
    = while "industry" != "" {
    - local su`i'`j' "``j''"
    = local su130 "industry"
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while "``j''" != "" {
    = while "occup" != "" {
    - local su`i'`j' "``j''"
    = local su131 "occup"
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while "``j''" != "" {
    = while "empstat" != "" {
    - local su`i'`j' "``j''"
    = local su132 "empstat"
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while "``j''" != "" {
    = while "workstudy" != "" {
    - local su`i'`j' "``j''"
    = local su133 "workstudy"
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while "``j''" != "" {
    = while "wsloc" != "" {
    - local su`i'`j' "``j''"
    = local su134 "wsloc"
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while "``j''" != "" {
    = while "locality3" != "" {
    - local su`i'`j' "``j''"
    = local su135 "locality3"
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while "``j''" != "" {
    = while "moneysource" != "" {
    - local su`i'`j' "``j''"
    = local su136 "moneysource"
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while "``j''" != "" {
    = while "over65" != "" {
    - local su`i'`j' "``j''"
    = local su137 "over65"
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while "``j''" != "" {
    = while "residtype" != "" {
    - local su`i'`j' "``j''"
    = local su138 "residtype"
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while "``j''" != "" {
    = while "ownhouse" != "" {
    - local su`i'`j' "``j''"
    = local su139 "ownhouse"
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while "``j''" != "" {
    = while "qtype" != "" {
    - local su`i'`j' "``j''"
    = local su140 "qtype"
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while "``j''" != "" {
    = while "hhsize" != "" {
    - local su`i'`j' "``j''"
    = local su141 "hhsize"
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while "``j''" != "" {
    = while "hhrel" != "" {
    - local su`i'`j' "``j''"
    = local su142 "hhrel"
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu6" != "" {
    - local su`i'`j' "``j''"
    = local su143 "hhrelu6"
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu18" != "" {
    - local su`i'`j' "``j''"
    = local su144 "hhrelu18"
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while "``j''" != "" {
    = while "over65num" != "" {
    - local su`i'`j' "``j''"
    = local su145 "over65num"
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while "``j''" != "" {
    = while "disablednum" != "" {
    - local su`i'`j' "``j''"
    = local su146 "disablednum"
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while "``j''" != "" {
    = while "housetype" != "" {
    - local su`i'`j' "``j''"
    = local su147 "housetype"
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while "``j''" != "" {
    = while "PA088" != "" {
    - local su`i'`j' "``j''"
    = local su148 "PA088"
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while "``j''" != "" {
    = while "village2" != "" {
    - local su`i'`j' "``j''"
    = local su149 "village2"
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while "``j''" != "" {
    = while "county2" != "" {
    - local su`i'`j' "``j''"
    = local su150 "county2"
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while "``j''" != "" {
    = while "batchid" != "" {
    - local su`i'`j' "``j''"
    = local su151 "batchid"
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while "``j''" != "" {
    = while "runid" != "" {
    - local su`i'`j' "``j''"
    = local su152 "runid"
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while "``j''" != "" {
    = while "FILLER" != "" {
    - local su`i'`j' "``j''"
    = local su153 "FILLER"
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while "``j''" != "" {
    = while "" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
    - local j = `j' - 1
    = local j = 54 - 1
    - }
    - if `i'>1 {
    = if 1>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
    - else local nj `j'
    = else local nj 53
    - if `"`su'"' == "\" {
    = if `""' == "\" {
      gettoken su for: for
      }
    - }
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `""' != "" & `""'!="," {
      local i = `i' + 1
      if `i' > 9 {
      di in red "too many lists"
      exit 198
      }
      gettoken in: for, parse(" ,")
      if `"`in'"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
      else local from`i' = substr("XYZABCDEF",`i',1)
      GetType `"`su'"'
      local type "`r(type)'"
      local j 0
      gettoken su for: for, parse(" ,")
      while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
      if "`type'"!="any" {
      if "`type'"=="varlist" {
      if "`su`i''" != "" {
      unabbrev `su`i''
      local thesu "`s(varlist)'"
      }
      else local thesu
      }
      else if "`type'"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
      else if "`type'"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
      else {
      di in red "type `type' not yet implemented"
      exit 198
      }
      parse "`thesu'", parse(" ")
      local su`i'
      local j 1
      while "``j''" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
      local j = `j' - 1
      }
      if `i'>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
      else local nj `j'
      if `"`su'"' == "\" {
      gettoken su for: for
      }
      }
    - local ni `i'
    = local ni 1
    - local in
    - local options "Dryrun noHeader noStop Pause"
    - parse `", `for'"'
    = parse `", "'
    - if "`pause'"!="" {
    = if ""!="" {
      local pause more
      }
    - if "`header'"=="noheader" {
    = if ""=="noheader" {
      local qq *
      }
    - if "`dryrun'" != "" {
    = if "" != "" {
      local xeq "*"
      local stop
      }
    - local todo `"`cmd'"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
    = local todo : subinstr local todo `"X"' `"county"', all count(local c)
    - if `c'==0 {
    = if 2==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
      if `c'==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
      local i = `i' + 1
      }
    - local ncmd 1
    - gettoken piece cmd: cmd, parse(" \") quotes
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"label"'!="\" & `"label"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"values"'!="\" & `"values"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `""'!="\" & `""'!="" {
      local cmd1 `"`cmd1' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
    - while `"`piece'"' == "\" {
    = while `""' == "\" {
      local ncmd = `ncmd' + 1
      gettoken piece cmd: cmd, parse(" \") quotes
      while `"`piece'"'!="\" & `"`piece'"'!="" {
      local cmd`ncmd' `"`cmd`ncmd'' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
      }
    - if `"`piece'"' != "" {
    = if `""' != "" {
      error 198
      }
    - local version = string(_caller())
    - local j 1
    - while `j' <= `nj' {
    = while 1 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county county"'

->  label values county county
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county county
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while `j' <= `nj' {
    = while 2 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"town"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values town town"'

->  label values town town
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values town town
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while `j' <= `nj' {
    = while 3 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village village"'

->  label values village village
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village village
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while `j' <= `nj' {
    = while 4 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"superdist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values superdist superdist"'

->  label values superdist superdist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values superdist superdist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while `j' <= `nj' {
    = while 5 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"cendist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values cendist cendist"'

->  label values cendist cendist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values cendist cendist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while `j' <= `nj' {
    = while 6 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"dwellnum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values dwellnum dwellnum"'

->  label values dwellnum dwellnum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values dwellnum dwellnum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while `j' <= `nj' {
    = while 7 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unit"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unit unit"'

->  label values unit unit
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unit unit
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while `j' <= `nj' {
    = while 8 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"fileid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values fileid fileid"'

->  label values fileid fileid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values fileid fileid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while `j' <= `nj' {
    = while 9 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"individ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values individ individ"'

->  label values individ individ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values individ individ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while `j' <= `nj' {
    = while 10 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"houseid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values houseid houseid"'

->  label values houseid houseid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values houseid houseid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while `j' <= `nj' {
    = while 11 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"sex"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values sex sex"'

->  label values sex sex
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values sex sex
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while `j' <= `nj' {
    = while 12 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"relate"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values relate relate"'

->  label values relate relate
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values relate relate
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while `j' <= `nj' {
    = while 13 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"age"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values age age"'

->  label values age age
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values age age
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while `j' <= `nj' {
    = while 14 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"after"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values after after"'

->  label values after after
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values after after
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while `j' <= `nj' {
    = while 15 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"birthyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values birthyear birthyear"'

->  label values birthyear birthyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values birthyear birthyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while `j' <= `nj' {
    = while 16 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"lateyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values lateyear lateyear"'

->  label values lateyear lateyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values lateyear lateyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while `j' <= `nj' {
    = while 17 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"nation"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values nation nation"'

->  label values nation nation
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values nation nation
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while `j' <= `nj' {
    = while 18 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality locality"'

->  label values locality locality
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality locality
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while `j' <= `nj' {
    = while 19 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"formres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values formres formres"'

->  label values formres formres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values formres formres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while `j' <= `nj' {
    = while 20 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality2 locality2"'

->  label values locality2 locality2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality2 locality2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while `j' <= `nj' {
    = while 21 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"marstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values marstat marstat"'

->  label values marstat marstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values marstat marstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while `j' <= `nj' {
    = while 22 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"student"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values student student"'

->  label values student student
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values student student
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while `j' <= `nj' {
    = while 23 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"educ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values educ educ"'

->  label values educ educ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values educ educ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while `j' <= `nj' {
    = while 24 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"major"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values major major"'

->  label values major major
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values major major
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while `j' <= `nj' {
    = while 25 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"health"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values health health"'

->  label values health health
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values health health
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while `j' <= `nj' {
    = while 26 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"healthprob"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values healthprob healthprob"'

->  label values healthprob healthprob
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values healthprob healthprob
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while `j' <= `nj' {
    = while 27 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"employed"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values employed employed"'

->  label values employed employed
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values employed employed
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while `j' <= `nj' {
    = while 28 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unempres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unempres unempres"'

->  label values unempres unempres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unempres unempres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while `j' <= `nj' {
    = while 29 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"head"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values head head"'

->  label values head head
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values head head
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while `j' <= `nj' {
    = while 30 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"industry"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values industry industry"'

->  label values industry industry
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values industry industry
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while `j' <= `nj' {
    = while 31 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"occup"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values occup occup"'

->  label values occup occup
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values occup occup
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while `j' <= `nj' {
    = while 32 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"empstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values empstat empstat"'

->  label values empstat empstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values empstat empstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while `j' <= `nj' {
    = while 33 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"workstudy"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values workstudy workstudy"'

->  label values workstudy workstudy
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values workstudy workstudy
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while `j' <= `nj' {
    = while 34 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"wsloc"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values wsloc wsloc"'

->  label values wsloc wsloc
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values wsloc wsloc
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while `j' <= `nj' {
    = while 35 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality3"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality3 locality3"'

->  label values locality3 locality3
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality3 locality3
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while `j' <= `nj' {
    = while 36 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"moneysource"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values moneysource moneysource"'

->  label values moneysource moneysource
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values moneysource moneysource
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while `j' <= `nj' {
    = while 37 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65 over65"'

->  label values over65 over65
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65 over65
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while `j' <= `nj' {
    = while 38 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"residtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values residtype residtype"'

->  label values residtype residtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values residtype residtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while `j' <= `nj' {
    = while 39 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"ownhouse"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values ownhouse ownhouse"'

->  label values ownhouse ownhouse
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values ownhouse ownhouse
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while `j' <= `nj' {
    = while 40 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"qtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values qtype qtype"'

->  label values qtype qtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values qtype qtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while `j' <= `nj' {
    = while 41 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhsize"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhsize hhsize"'

->  label values hhsize hhsize
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhsize hhsize
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while `j' <= `nj' {
    = while 42 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrel"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrel hhrel"'

->  label values hhrel hhrel
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrel hhrel
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while `j' <= `nj' {
    = while 43 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu6"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu6 hhrelu6"'

->  label values hhrelu6 hhrelu6
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu6 hhrelu6
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while `j' <= `nj' {
    = while 44 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu18"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu18 hhrelu18"'

->  label values hhrelu18 hhrelu18
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu18 hhrelu18
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while `j' <= `nj' {
    = while 45 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65num"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65num over65num"'

->  label values over65num over65num
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65num over65num
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while `j' <= `nj' {
    = while 46 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"disablednum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values disablednum disablednum"'

->  label values disablednum disablednum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values disablednum disablednum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while `j' <= `nj' {
    = while 47 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"housetype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values housetype housetype"'

->  label values housetype housetype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values housetype housetype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while `j' <= `nj' {
    = while 48 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"PA088"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values PA088 PA088"'

->  label values PA088 PA088
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values PA088 PA088
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while `j' <= `nj' {
    = while 49 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village2 village2"'

->  label values village2 village2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village2 village2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while `j' <= `nj' {
    = while 50 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county2 county2"'

->  label values county2 county2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county2 county2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while `j' <= `nj' {
    = while 51 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"batchid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values batchid batchid"'

->  label values batchid batchid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values batchid batchid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while `j' <= `nj' {
    = while 52 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"runid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values runid runid"'

->  label values runid runid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values runid runid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while `j' <= `nj' {
    = while 53 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"FILLER"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values FILLER FILLER"'

->  label values FILLER FILLER
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values FILLER FILLER
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while `j' <= `nj' {
    = while 54 <= 53 {
      local c 1
      while `c' <= `ncmd' {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
      local j = `j' + 1
      }
    --------------------------------------------------------------- end for ---
  - label var birthyear "Actual birthyear (post revolution)"
  - replace birthyear=birthyear+1911
birthyear was byte now int
(3065779 real changes made)
  - egen uniqueid=concat(county town village superdist cendist dwellnum unit)
    ------------------------------------------------------------ begin egen ---
    - version 6
    - gettoken type 0 : 0, parse(" =(")
    - gettoken name 0 : 0, parse(" =(")
    - if `"`name'"'=="=" {
    = if `"="'=="=" {
    - local name `"`type'"'
    = local name `"uniqueid"'
    - local type : set type
    - }
    - else {
      gettoken eqsign 0 : 0, parse(" =(")
      if `"`eqsign'"' != "=" {
      error 198
      }
      }
    - confirm new variable `name'
    = confirm new variable uniqueid
    - gettoken fcn 0 : 0, parse(" =(")
    - gettoken args 0 : 0, parse(" ,") match(par)
    - if `"`par'"' != "(" {
    = if `"("' != "(" {
      exit 198
      }
    - if `"`args'"' == "_all" {
    = if `"county town village superdist cendist dwellnum unit"' == "_all" {
      version 7.0
      unab args : _all
      local args : subinstr local args "`_sortindex'" "", all word
      version 6.0
      }
    - syntax [if] [in] [, *]
    - if _by() {
      local byopt "by(`_byvars')"
      local cma ","
      }
    - else if `"`options'"' != "" {
    = else if `""' != "" {
      local cma ","
      }
    - tempvar dummy
    - global EGEN_Varname `name'
    = global EGEN_Varname uniqueid
    - capture noisily _g`fcn' `type' `dummy' = (`args') `if' `in' `cma' `byopt'
>  `options'
    = capture noisily _gconcat float __000001 = (county town village superdist 
> cendist dwellnum unit)     
      ------------------------------------------------------ begin _gconcat ---
      - version 7
      - local strlen = cond("$S_StataSE"=="", "80", "244")
      = local strlen = cond(""=="", "80", "244")
      - version 6.0
      - gettoken type 0 : 0
      - gettoken g 0 : 0
      - gettoken eqs 0 : 0
      - syntax varlist(min=1) [if] [in], [Punct(str) Decode MAXLength(str) Form
> at(str) BY(string)]
      - if `"`by'"' != "" {
      = if `""' != "" {
        _egennoby concat() `"`by'"'
        }
      - tempvar xy
      - gen `xy'=1
      = gen __000002=1
      - if "`format'" != "" {
      = if "" != "" {
        capture format `xy' `format'
        if _rc == 120 {
        noi di in r "Invalid format"
        exit 120
        }
        local format `","`format'""'
        }
      - local plen = length(`"`punct'"')
      = local plen = length(`""')
      - local type "str1"
      - if "`maxleng'" != "" {
      = if "" != "" {
        capture confirm integer n `maxleng'
        if _rc | `maxleng' < 1 | `maxleng' > `strlen' {
        di in r "invalid maxlength( )"
        exit 198
        }
        else {
        local maxleng "maxl(`maxleng')"
        }
        }
      - local decode = "`decode'" == "decode"
      = local decode = "" == "decode"
      - quietly {
      - gen `type' `g' = ""
      = gen str1 __000001 = ""
      - tokenize `varlist'
      = tokenize county town village superdist cendist dwellnum unit
      - while "`1'" != "" {
      = while "county" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable county
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(county) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "town" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable town
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(town) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "village" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable village
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(village) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "superdist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable superdist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(superdist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "cendist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable cendist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(cendist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "dwellnum" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable dwellnum
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(dwellnum) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "unit" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable unit
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(unit) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "" != "" {
        capture confirm string variable `1'
        if _rc {
        local decoded 0
        if `decode' {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
        if !`decoded' {
        replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
        }
        }
        else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
        mac shift
        }
      - replace `g' = trim(substr(`g',1,length(`g') - `plen'))
      = replace __000001 = trim(substr(__000001,1,length(__000001) - 0))
      - }
      - local gtype : type `g'
      = local gtype : type __000001
      - if "`gtype'" == "str`strlen'" {
      = if "str13" == "str80" {
        di in gr "(note: str`strlen' variable created; truncated values possibl
> e)"
        }
      -------------------------------------------------------- end _gconcat ---
    - global EGEN_Varname
    - if _rc { exit _rc }
    - quietly count if missing(`dummy')
    = quietly count if missing(__000001)
    - if r(N) {
      local s = cond(r(N)>1,"s","")
      di in bl "(" r(N) " missing value`s' generated)"
      }
    - rename `dummy' `name'
    = rename __000001 uniqueid
    -------------------------------------------------------------- end egen ---
  - sort uniqueid
  - gen census=1990
  - gen yrsed=0
  - do ~/taiwan/yrsed.do

. #delimit;
delimiter now ;
. replace yrsed=0 if educ==1 & census==1980;
(0 real changes made)

. replace yrsed=1 if educ==2 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==3 & census==1980;
(0 real changes made)

. replace yrsed=8 if educ==4 & census==1980;
(0 real changes made)

. replace yrsed=12 if educ==5 & census==1980;
(0 real changes made)

. replace yrsed=10 if educ==6 & census==1980;
(0 real changes made)

. replace yrsed=14 if educ==7 & census==1980;
(0 real changes made)

. replace yrsed=16 if educ==8 & census==1980;
(0 real changes made)

. replace yrsed=18 if educ==9 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==1 & census==1990;
(979577 real changes made)

. replace yrsed=8 if educ==2 & census==1990;
(576166 real changes made)

. replace yrsed=12 if educ==3 & census==1990;
(333379 real changes made)

. replace yrsed=10 if educ==4 & census==1990;
(343952 real changes made)

. replace yrsed=14 if educ==5 & census==1990;
(186609 real changes made)

. replace yrsed=16 if educ==6 & census==1990;
(142509 real changes made)

. replace yrsed=18 if educ==7 & census==1990;
(12762 real changes made)

. replace yrsed=0 if educ==8 & census==1990;
(0 real changes made)

. replace yrsed=1 if educ==9 & census==1990;
(21342 real changes made)

. replace yrsed=1 if educ==10 & census==1990;
(13965 real changes made)

. replace yrsed=2 if educ==11 & census==1990;
(104637 real changes made)

. replace yrsed=2 if educ==12 & census==1990;
(209728 real changes made)

. replace yrsed=4 if educ==1 & census==2000;
(0 real changes made)

. replace yrsed=8 if educ==2 & census==2000;
(0 real changes made)

. replace yrsed=12 if educ==3 & census==2000;
(0 real changes made)

. replace yrsed=10 if educ==4 & census==2000;
(0 real changes made)

. replace yrsed=14 if educ==5 & census==2000;
(0 real changes made)

. replace yrsed=16 if educ==6 & census==2000;
(0 real changes made)

. replace yrsed=17 if educ==7 & census==2000;
(0 real changes made)

. replace yrsed=18 if educ==8 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==9 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==10 & census==2000;
(0 real changes made)

. replace yrsed=1 if educ==11 & census==2000;
(0 real changes made)

. exit;

end of do-file
  - save ~/nta/taiwan/census1990/data1990/pop1990_`i',replace
  = save ~/nta/taiwan/census1990/data1990/pop1990_01,replace
file ~/nta/taiwan/census1990/data1990/pop1990_01.dta saved
  - }
  - clear _all
    ----------------------------------------------------------- begin clear ---
    - version 8
    - drop _all
    - label drop _all
    - matrix drop _all
    - scalar drop _all
    - constraint drop _all
    - eq drop _all
      ------------------------------------------------------------ begin eq ---
      - version 3.1
      - if "$S_eqnum"=="" {
      = if ""=="" {
      - global S_eqnum 0
      - }
      - if "`1'"=="?" | "`1'"=="??" {
      = if "drop"=="?" | "drop"=="??" {
        if "`3'"!="" {
        error 198
        }
        _crceqnm `2'
        local ename "${S_eqeq`r(n_eq)'}"
        if "`1'"=="?" & "`ename'"!= "" {
        local varlist "req ex"
        capture parse "`ename'"
        if _rc {
        di in red "`r(eqname)':" _col(11) "`ename'"
        local varlist "req ex"
        parse "`ename'"
        }
        local ename "`varlist'"
        }
        ret local eq "`ename'"
        ret local eqname "`r(eqname)'"
        global S_1 `return(eq)'
        global S_3 `return(eqname)'
        exit
        }
      - if "`1'"=="dir" | "`1'"=="list" {
      = if "drop"=="dir" | "drop"=="list" {
        local cmd "`1'"
        mac shift
        if "`1'"=="" {
        local 1 "_all"
        }
        _crceqlu `*'
        parse "`r(eqnums)'", parse(" ")
        if "`cmd'"=="dir" {
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}"
        mac shift
        }
        exit
        }
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}:" _col(11) in ye "${S_eqeq`1'}"
        mac shift
        }
        exit
        }
      - if "`1'"=="drop" {
      = if "drop"=="drop" {
      - mac shift
      - if "`*'"=="" {
      = if "_all"=="" {
        error 198
        }
      - local arg "`*'"
      = local arg "_all"
      - _crceqlu `*'
      = _crceqlu _all
        ------------------------------------------------- begin eq._crceqlu ---
        - version 3.1
        - if "`*'" == "" { exit }
        = if "_all" == "" { exit }
        - if "`*'" == "_all" {
        = if "_all" == "_all" {
        - local i 1
        - while `i'<=$S_eqnum {
        = while 1<=0 {
          if "${S_eqnm`i'}"!="" {
          ret local eqnums "`return(eqnums)' `i'"
          }
          local i=`i'+1
          }
        - exit
        --------------------------------------------------- end eq._crceqlu ---
      - parse "`r(eqnums)'", parse(" ")
      = parse "", parse(" ")
      - while "`1'"!="" {
      = while ""!="" {
        _crceqdp `1'
        mac shift
        }
      - if "`arg'"=="_all" {
      = if "_all"=="_all" {
      - global S_eqnum
      - }
      - exit
      -------------------------------------------------------------- end eq ---
    - file close _all
    - postutil clear
    - _return drop _all
    - discard
    ------------------------------------------------------------- end clear ---
  - qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS`i'PSN.txt) clear
  = qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS02PSN.txt) clear
  - compress
county was float now byte
town was float now byte
village was float now int
superdist was float now int
cendist was float now byte
dwellnum was float now int
unit was float now byte
fileid was float now byte
individ was float now int
houseid was float now byte
sex was float now byte
relate was float now byte
age was float now byte
after was float now byte
birthyear was float now byte
lateyear was float now byte
nation was float now byte
locality was float now byte
formres was float now byte
locality2 was float now byte
marstat was float now byte
student was float now byte
educ was float now byte
major was float now byte
health was float now byte
healthprob was float now byte
employed was float now byte
unempres was float now byte
head was float now byte
industry was float now int
occup was float now int
empstat was float now byte
workstudy was float now byte
wsloc was float now byte
locality3 was float now int
moneysource was float now byte
over65 was float now byte
residtype was float now byte
ownhouse was float now byte
qtype was float now byte
hhsize was float now int
hhrel was float now byte
hhrelu6 was float now byte
hhrelu18 was float now byte
over65num was float now byte
disablednum was float now byte
housetype was float now byte
PA088 was float now byte
village2 was float now byte
county2 was float now byte
batchid was float now byte
FILLER was float now byte
  - do ~/nta/taiwan/census1990/dofiles/label1990.do

. #delimit;
delimiter now ;
.  label define sex 1 "Male", add;

.         label define sex 2 "Female", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define relate 1 "Household head", add;

. label define relate 2 "Spouse", add;

.         label define relate 3
> "Parent", add;

.             label define relate 4 "Parent's spouse", add;

. label define relate 5 "Grandparents", add;

.             label define
> relate 6 "Child", add;

.                       label define relate 7 "Child's
> spouse", add;

.           label define relate 8 "Grandchildren", add;

.         label
> define relate 9 "Sibling", add;

.               label define relate 10 "Other
> relative", add;

.         label define relate 11 "Employee", add;

.           label define
> relate 12 "Temporary", add;

.                                                                              
>                                                                              
>                                                                              
>            label define after 1 "Before 1912", add;

. label define after 2 "After 1912", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                label define l
> ateyear 1 "Before December 15", add;

. label define lateyear 2 "After December 15", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define nation 1 "Taiwanese", add;

. label define nation 2 "Mainland Chinese", add;

.         label define nation 3
> "American", add;

.     label define nation 4 "Japanese", add;

.    label
> define nation 5 "Southeast Asian", add;

.         label define nation 6 "Other",
> add;

.                                                                              
>                                                                              
>                                                                              
>                                                                         label
>  define formres 1 "Same household", add;

. label define formres 2 "Same village", add;

.         label define formres 3
> "Same town, different village", add;

.    label define formres 4 "Same
> county, different town", add;

.         label define formres 5 "Also Taiwan,
> different county", add;

.          label define formres 6 "In China, not in
> Taiwan", add;

.            label define formres 7 "Outside China/Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                              label define mar
> stat 1 "Single", add;

. label define marstat 2 "Married or partnered", add;

.         label define
> marstat 3 "Divorced or separated", add;

.                label define marstat 4
> "Widowed", add;

.                                                                              
>                                                                              
>                                                                              
>  label define student 1 "Currently studying", add;

. label define student 2 "Graduated", add;

.      label define student 3
> "Drop out", add;

.      label define student 4 "Passed equivalence exam",
> add;

.         label define student 5 "Not in school", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define educ 1 "Elem
> entary school", add;

. label define educ 2 "Junior high schol", add;

.         label define educ 3
> "Senior high school", add;

.   label define educ 4 "Vocational school",
> add;

.         label define educ 5 "Associate College", add;

.             label
> define educ 6 "College", add;

.                label define educ 7 "Graduate
> school", add;

.  label define educ 8 "Illiterate", add;

.          label define
> educ 9 "Self-taught", add;

.  label define educ 10 "Day-Care", add;

. label define educ 11 "Kindergarten", add;

.     label define educ 12
> "Other child-level", add;

.                                                                              
>                                                                              
>                                                                              
>           label define health 1 "No", add;

. label define health 2 "Yes", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define healthprob 1
>  "Multiple impediments", add;

. label define healthprob 2 "Sight impediment", add;

.         label define
> healthprob 3 "Hearing impediment", add;

.               label define healthprob
> 4 "Language impediment", add;

.            label define healthprob 5 "Bodily
> impediment", add;

.          label define healthprob 6 "Intelligence
> impediment", add;

.          label define healthprob 7 "Loss of major
> organ function", add;

.          label define healthprob 8 "Colorblindness",
> add;

.         label define healthprob 9 "Vegetative state or senility", add;

. label define healthprob 10 "Avoids social intersaction", add;

. label define healthprob 11 "Unable to take care of onesself", add;

. label define healthprob 12 "Other", add;

.    label define healthprob 0
> "None, N/A", add;

.                                                                              
>                                                                              
>                                                    label define employed 1 "E
> mployed", add;

. label define employed 2 "Conscripted", add;

.         label define employed
> 3 "Unemployed", add;

.   label define employed 0 "Less than 15 years
> old", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine unempres 1 "Starting to look for a job", add;

. label define unempres 2 "Looking anew for a job", add;

.         label define
> unempres 3 "Pursuing studies", add;

.    label define unempres 4
> "Cooking/ home chores", add;

.    label define unempres 5 "Disabled",
> add;

.         label define unempres 6 "Long illness", add;

.  label define
> unempres 7 "Forbidden to work/imprisoned", add;

.         label define unempres
> 8 "Unwilling to work", add;

.                    label define unempres 9
> "Other", add;

.         label define unempres 0 "Employed or Less than 15
> years old, N/A", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                               label define empstat 1 "Employer", add;

. label define empstat 2 "Self-employed", add;

.         label define empstat 3
> "Private enterprise", add;

.                 label define empstat 4
> "Government", add;

.     label define empstat 5 "Volunteer/ Unpaid", add;

. label define empstat 0 "N/A", add;

.                                                                              
>                                                                              
>                                           label define workstudy 1 "Yes", add
> ;

. label define workstudy 2 "No", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define wsloc 1 "On-site", add
> ;

. label define wsloc 2 "Same village", add;

.         label define wsloc 3
> "Different village", add;

.   label define wsloc 4 "Outside Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine moneysource 1 "Savings", add;

. label define moneysource 2 "Work income", add;

.         label define
> moneysource 3 "Partner", add;

.          label define moneysource 4
> "Children", add;

.          label define moneysource 5 "Other
> relatives/friends", add;

.  label define moneysource 6 "Retirement/
> pensions", add;

.             label define moneysource 7 "Welfare", add;

.         label
> define moneysource 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define residtype 1 "House ", 
> add;

. label define residtype 2 "Apartment", add;

.         label define residtype
> 3 "Other", add;

.                                                                              
>                                                                              
>                                                    label define buildtype 1 "
> Traditional rural type", add;

. label define buildtype 2 "Private courtyard/ duplex type", add;

.         label
> define buildtype 3 "Joined-roof type", add;

.   label define buildtype 4
> "Five or fewer floor apartments", add;

.  label define buildtype 5
> "Six-twelve floor apartments", add;

.     label define buildtype 6 "13 or
> more floor apartments", add;

.    label define buildtype 7 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define inhabited 1 "Someone p
> resent", add;

. label define inhabited 2 "Empty household", add;

.         label define
> inhabited 3 "Other use and nobody present", add;

.                                                                              
>                                                                              
>                                                                              
>                          label define residuse 1 "Use only as home", add;

. label define residuse 2 "Also industrial use", add;

.         label define
> residuse 3 "Also commercial use", add;

.          label define residuse 4 "Also
> other use", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine residage 1 "1912-1945", add;

. label define residage 2 "1946-1960", add;

.         label define residage
> 3 "1961-1970", add;

.    label define residage 4 "1971-1980", add;

.         label
> define residage 5 "1981-1985", add;

.             label define residage 6
> "1986", add;

.         label define residage 7 "1987", add;

.          label define
> residage 8 "1988", add;

.              label define residage 9 "1989", add;

. label define residage 10 "1990", add;

.                                                                              
>                                                                              
>                                                                             l
> abel define roomnum 1 "1", add;

. label define roomnum 2 "2", add;

.         label define roomnum 3 "3",
> add;

.         label define roomnum 4 "4", add;

.       label define roomnum 5
> "5", add;

.      label define roomnum 6 "6", add;

.             label define
> roomnum 7 "7", add;

.  label define roomnum 8 "8", add;

.           label define
> roomnum 9 "9", add;

.  label define roomnum 10 "10 or more", add;

.                                                                              
>                                                                              
>                         label define residnum 1 "1", add;

. label define residnum 2 "2", add;

.         label define residnum 3 "3",
> add;

.         label define residnum 4 "4", add;

.      label define residnum 5
> "5", add;

.      label define residnum 6 "6 or more", add;

.                                                                              
>                                                                              
>                                                                              
>         label define residown 1 "Self-purchased ordinary residence", add;

. label define residown 2 "Self-purchased Government built residence",
> add;

.         label define residown 3 "Inheritance or present", add;

.         label
> define residown 4 "Rented publicly owned Government built residence",
> add;

.         label define residown 5 "Rented privately owned government
> built residence", add;

.               label define residown 6 "Rented
> non-government built residence", add;

.            label define residown 7
> "Allocated residence (subsidized provision of housing)", add;

.          label
> define residown 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                  label define timeat 1 "1 year or less", add;

. label define timeat 2 "1-5 years", add;

.         label define timeat 3 "6-10
> years", add;

.  label define timeat 4 "11-15 years", add;

.             label
> define timeat 5 "16-20 years", add;

.           label define timeat 6 "21
> years or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                   label define spacecomp 1 "R
> ather large", add;

. label define spacecomp 2 "Rather small", add;

.         label define spacecomp
> 3 "About the same", add;

.                                                                              
>                                                                              
>                                                    label define spacediff 1 "
> Less than 5", add;

. label define spacediff 2 "btw 5-10", add;

.         label define spacediff
> 3 "btw 10-15", add;

.     label define spacediff 4 "15-20", add;

.         label
> define spacediff 5 "20 or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                        
end of do-file
  - for var *: label values X X
    ------------------------------------------------------------- begin for ---
    - if _caller()<6 {
      for5_0 `0'
      exit
      }
    - version 6.0
    - gettoken piece cmd: 0, parse(" :") quotes
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"var"' != ":" & `"var"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"*"' != ":" & `"*"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var *"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `":"' != ":" & `":"' != "" {
      local for `"`for' `piece'"'
      gettoken piece cmd: cmd, parse(" :") quotes
      }
    - if `"`piece'"' != ":" {
    = if `":"' != ":" {
      error 198
      }
    - local i 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `"var"' != "" & `"var"'!="," {
    - local i = `i' + 1
    = local i = 0 + 1
    - if `i' > 9 {
    = if 1 > 9 {
      di in red "too many lists"
      exit 198
      }
    - gettoken in: for, parse(" ,")
    - if `"`in'"' == "in" {
    = if `"*"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
    - else local from`i' = substr("XYZABCDEF",`i',1)
    = else local from1 = substr("XYZABCDEF",1,1)
    - GetType `"`su'"'
    = GetType `"var"'
      --------------------------------------------------- begin for.GetType ---
      - local typ `"`1'"'
      = local typ `"var"'
      - local l = length(`"`typ'"')
      = local l = length(`"var"')
      - if `l' == 0 { error 198 }
      = if 3 == 0 { error 198 }
      - if substr("varlist",1,max(3,`l')) == `"`typ'"' {
      = if substr("varlist",1,max(3,3)) == `"var"' {
      - ret local type "varlist"
      - }
      - else if substr("numlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("numlist",1,max(3,3)) == `"var"' {
        ret local type "numlist"
        }
      - else if substr("newlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("newlist",1,max(3,3)) == `"var"' {
        ret local type "newlist"
        }
      - else if "any" == `"`typ'"' {
      = else if "any" == `"var"' {
        ret local type "any"
        }
      - else {
        di in red `""`typ'" invalid list type"'
        exit 198
        }
      ----------------------------------------------------- end for.GetType ---
    - local type "`r(type)'"
    = local type "varlist"
    - local j 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `"*"'!="" & `"*"' != "\" & `"*"'!="," {
    - if "`type'" =="any" {
    = if "varlist" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
    - else local su`i' `"`su`i'' `su'"'
    = else local su1 `" *"'
    - gettoken su for: for, parse(" ,")
    - }
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `""'!="" & `""' != "\" & `""'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
    - if "`type'"!="any" {
    = if "varlist"!="any" {
    - if "`type'"=="varlist" {
    = if "varlist"=="varlist" {
    - if "`su`i''" != "" {
    = if " *" != "" {
    - unabbrev `su`i''
    = unabbrev  *
      ------------------------------------------------------ begin unabbrev ---
      - version 6
      - sret clear
      - gettoken list1 0 : 0
      - local 0 `"`list1' `0'"'
      = local 0 `"* "'
      - syntax varlist [, min(string) max(string)]
      - sret local varlist `varlist'
      = sret local varlist county town village superdist cendist dwellnum unit 
> fileid individ houseid sex relate age after birthyear lateyear nation localit
> y formres locality2 marstat student educ major health healthprob employed une
> mpres head industry occup empstat workstudy wsloc locality3 moneysource over6
> 5 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednu
> m housetype PA088 village2 county2 batchid runid FILLER
      - sret local k : word count `varlist'
      = sret local k : word count county town village superdist cendist dwellnu
> m unit fileid individ houseid sex relate age after birthyear lateyear nation 
> locality formres locality2 marstat student educ major health healthprob emplo
> yed unempres head industry occup empstat workstudy wsloc locality3 moneysourc
> e over65 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num dis
> ablednum housetype PA088 village2 county2 batchid runid FILLER
      - global S_1 "`varlist'"
      = global S_1 "county town village superdist cendist dwellnum unit fileid 
> individ houseid sex relate age after birthyear lateyear nation locality formr
> es locality2 marstat student educ major health healthprob employed unempres h
> ead industry occup empstat workstudy wsloc locality3 moneysource over65 resid
> type ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum house
> type PA088 village2 county2 batchid runid FILLER"
      - global S_2 `s(k)'
      = global S_2 53
      - if "`min'"=="" & "`max'"=="" { exit }
      = if ""=="" & ""=="" { exit }
      -------------------------------------------------------- end unabbrev ---
    - local thesu "`s(varlist)'"
    = local thesu "county town village superdist cendist dwellnum unit fileid i
> ndivid houseid sex relate age after birthyear lateyear nation locality formre
> s locality2 marstat student educ major health healthprob employed unempres he
> ad industry occup empstat workstudy wsloc locality3 moneysource over65 residt
> ype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum houset
> ype PA088 village2 county2 batchid runid FILLER"
    - }
    - else local thesu
    - }
    - else if "`type'"=="numlist" {
    = else if "varlist"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
    - else if "`type'"=="newlist" {
    = else if "varlist"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
    - else {
      di in red "type `type' not yet implemented"
      exit 198
      }
    - parse "`thesu'", parse(" ")
    = parse "county town village superdist cendist dwellnum unit fileid individ
>  houseid sex relate age after birthyear lateyear nation locality formres loca
> lity2 marstat student educ major health healthprob employed unempres head ind
> ustry occup empstat workstudy wsloc locality3 moneysource over65 residtype ow
> nhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum housetype PA
> 088 village2 county2 batchid runid FILLER", parse(" ")
    - local su`i'
    = local su1
    - local j 1
    - while "``j''" != "" {
    = while "county" != "" {
    - local su`i'`j' "``j''"
    = local su11 "county"
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while "``j''" != "" {
    = while "town" != "" {
    - local su`i'`j' "``j''"
    = local su12 "town"
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while "``j''" != "" {
    = while "village" != "" {
    - local su`i'`j' "``j''"
    = local su13 "village"
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while "``j''" != "" {
    = while "superdist" != "" {
    - local su`i'`j' "``j''"
    = local su14 "superdist"
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while "``j''" != "" {
    = while "cendist" != "" {
    - local su`i'`j' "``j''"
    = local su15 "cendist"
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while "``j''" != "" {
    = while "dwellnum" != "" {
    - local su`i'`j' "``j''"
    = local su16 "dwellnum"
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while "``j''" != "" {
    = while "unit" != "" {
    - local su`i'`j' "``j''"
    = local su17 "unit"
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while "``j''" != "" {
    = while "fileid" != "" {
    - local su`i'`j' "``j''"
    = local su18 "fileid"
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while "``j''" != "" {
    = while "individ" != "" {
    - local su`i'`j' "``j''"
    = local su19 "individ"
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while "``j''" != "" {
    = while "houseid" != "" {
    - local su`i'`j' "``j''"
    = local su110 "houseid"
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while "``j''" != "" {
    = while "sex" != "" {
    - local su`i'`j' "``j''"
    = local su111 "sex"
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while "``j''" != "" {
    = while "relate" != "" {
    - local su`i'`j' "``j''"
    = local su112 "relate"
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while "``j''" != "" {
    = while "age" != "" {
    - local su`i'`j' "``j''"
    = local su113 "age"
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while "``j''" != "" {
    = while "after" != "" {
    - local su`i'`j' "``j''"
    = local su114 "after"
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while "``j''" != "" {
    = while "birthyear" != "" {
    - local su`i'`j' "``j''"
    = local su115 "birthyear"
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while "``j''" != "" {
    = while "lateyear" != "" {
    - local su`i'`j' "``j''"
    = local su116 "lateyear"
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while "``j''" != "" {
    = while "nation" != "" {
    - local su`i'`j' "``j''"
    = local su117 "nation"
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while "``j''" != "" {
    = while "locality" != "" {
    - local su`i'`j' "``j''"
    = local su118 "locality"
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while "``j''" != "" {
    = while "formres" != "" {
    - local su`i'`j' "``j''"
    = local su119 "formres"
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while "``j''" != "" {
    = while "locality2" != "" {
    - local su`i'`j' "``j''"
    = local su120 "locality2"
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while "``j''" != "" {
    = while "marstat" != "" {
    - local su`i'`j' "``j''"
    = local su121 "marstat"
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while "``j''" != "" {
    = while "student" != "" {
    - local su`i'`j' "``j''"
    = local su122 "student"
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while "``j''" != "" {
    = while "educ" != "" {
    - local su`i'`j' "``j''"
    = local su123 "educ"
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while "``j''" != "" {
    = while "major" != "" {
    - local su`i'`j' "``j''"
    = local su124 "major"
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while "``j''" != "" {
    = while "health" != "" {
    - local su`i'`j' "``j''"
    = local su125 "health"
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while "``j''" != "" {
    = while "healthprob" != "" {
    - local su`i'`j' "``j''"
    = local su126 "healthprob"
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while "``j''" != "" {
    = while "employed" != "" {
    - local su`i'`j' "``j''"
    = local su127 "employed"
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while "``j''" != "" {
    = while "unempres" != "" {
    - local su`i'`j' "``j''"
    = local su128 "unempres"
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while "``j''" != "" {
    = while "head" != "" {
    - local su`i'`j' "``j''"
    = local su129 "head"
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while "``j''" != "" {
    = while "industry" != "" {
    - local su`i'`j' "``j''"
    = local su130 "industry"
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while "``j''" != "" {
    = while "occup" != "" {
    - local su`i'`j' "``j''"
    = local su131 "occup"
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while "``j''" != "" {
    = while "empstat" != "" {
    - local su`i'`j' "``j''"
    = local su132 "empstat"
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while "``j''" != "" {
    = while "workstudy" != "" {
    - local su`i'`j' "``j''"
    = local su133 "workstudy"
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while "``j''" != "" {
    = while "wsloc" != "" {
    - local su`i'`j' "``j''"
    = local su134 "wsloc"
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while "``j''" != "" {
    = while "locality3" != "" {
    - local su`i'`j' "``j''"
    = local su135 "locality3"
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while "``j''" != "" {
    = while "moneysource" != "" {
    - local su`i'`j' "``j''"
    = local su136 "moneysource"
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while "``j''" != "" {
    = while "over65" != "" {
    - local su`i'`j' "``j''"
    = local su137 "over65"
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while "``j''" != "" {
    = while "residtype" != "" {
    - local su`i'`j' "``j''"
    = local su138 "residtype"
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while "``j''" != "" {
    = while "ownhouse" != "" {
    - local su`i'`j' "``j''"
    = local su139 "ownhouse"
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while "``j''" != "" {
    = while "qtype" != "" {
    - local su`i'`j' "``j''"
    = local su140 "qtype"
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while "``j''" != "" {
    = while "hhsize" != "" {
    - local su`i'`j' "``j''"
    = local su141 "hhsize"
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while "``j''" != "" {
    = while "hhrel" != "" {
    - local su`i'`j' "``j''"
    = local su142 "hhrel"
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu6" != "" {
    - local su`i'`j' "``j''"
    = local su143 "hhrelu6"
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu18" != "" {
    - local su`i'`j' "``j''"
    = local su144 "hhrelu18"
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while "``j''" != "" {
    = while "over65num" != "" {
    - local su`i'`j' "``j''"
    = local su145 "over65num"
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while "``j''" != "" {
    = while "disablednum" != "" {
    - local su`i'`j' "``j''"
    = local su146 "disablednum"
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while "``j''" != "" {
    = while "housetype" != "" {
    - local su`i'`j' "``j''"
    = local su147 "housetype"
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while "``j''" != "" {
    = while "PA088" != "" {
    - local su`i'`j' "``j''"
    = local su148 "PA088"
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while "``j''" != "" {
    = while "village2" != "" {
    - local su`i'`j' "``j''"
    = local su149 "village2"
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while "``j''" != "" {
    = while "county2" != "" {
    - local su`i'`j' "``j''"
    = local su150 "county2"
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while "``j''" != "" {
    = while "batchid" != "" {
    - local su`i'`j' "``j''"
    = local su151 "batchid"
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while "``j''" != "" {
    = while "runid" != "" {
    - local su`i'`j' "``j''"
    = local su152 "runid"
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while "``j''" != "" {
    = while "FILLER" != "" {
    - local su`i'`j' "``j''"
    = local su153 "FILLER"
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while "``j''" != "" {
    = while "" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
    - local j = `j' - 1
    = local j = 54 - 1
    - }
    - if `i'>1 {
    = if 1>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
    - else local nj `j'
    = else local nj 53
    - if `"`su'"' == "\" {
    = if `""' == "\" {
      gettoken su for: for
      }
    - }
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `""' != "" & `""'!="," {
      local i = `i' + 1
      if `i' > 9 {
      di in red "too many lists"
      exit 198
      }
      gettoken in: for, parse(" ,")
      if `"`in'"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
      else local from`i' = substr("XYZABCDEF",`i',1)
      GetType `"`su'"'
      local type "`r(type)'"
      local j 0
      gettoken su for: for, parse(" ,")
      while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
      if "`type'"!="any" {
      if "`type'"=="varlist" {
      if "`su`i''" != "" {
      unabbrev `su`i''
      local thesu "`s(varlist)'"
      }
      else local thesu
      }
      else if "`type'"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
      else if "`type'"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
      else {
      di in red "type `type' not yet implemented"
      exit 198
      }
      parse "`thesu'", parse(" ")
      local su`i'
      local j 1
      while "``j''" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
      local j = `j' - 1
      }
      if `i'>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
      else local nj `j'
      if `"`su'"' == "\" {
      gettoken su for: for
      }
      }
    - local ni `i'
    = local ni 1
    - local in
    - local options "Dryrun noHeader noStop Pause"
    - parse `", `for'"'
    = parse `", "'
    - if "`pause'"!="" {
    = if ""!="" {
      local pause more
      }
    - if "`header'"=="noheader" {
    = if ""=="noheader" {
      local qq *
      }
    - if "`dryrun'" != "" {
    = if "" != "" {
      local xeq "*"
      local stop
      }
    - local todo `"`cmd'"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
    = local todo : subinstr local todo `"X"' `"county"', all count(local c)
    - if `c'==0 {
    = if 2==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
      if `c'==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
      local i = `i' + 1
      }
    - local ncmd 1
    - gettoken piece cmd: cmd, parse(" \") quotes
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"label"'!="\" & `"label"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"values"'!="\" & `"values"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `""'!="\" & `""'!="" {
      local cmd1 `"`cmd1' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
    - while `"`piece'"' == "\" {
    = while `""' == "\" {
      local ncmd = `ncmd' + 1
      gettoken piece cmd: cmd, parse(" \") quotes
      while `"`piece'"'!="\" & `"`piece'"'!="" {
      local cmd`ncmd' `"`cmd`ncmd'' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
      }
    - if `"`piece'"' != "" {
    = if `""' != "" {
      error 198
      }
    - local version = string(_caller())
    - local j 1
    - while `j' <= `nj' {
    = while 1 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county county"'

->  label values county county
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county county
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while `j' <= `nj' {
    = while 2 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"town"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values town town"'

->  label values town town
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values town town
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while `j' <= `nj' {
    = while 3 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village village"'

->  label values village village
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village village
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while `j' <= `nj' {
    = while 4 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"superdist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values superdist superdist"'

->  label values superdist superdist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values superdist superdist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while `j' <= `nj' {
    = while 5 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"cendist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values cendist cendist"'

->  label values cendist cendist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values cendist cendist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while `j' <= `nj' {
    = while 6 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"dwellnum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values dwellnum dwellnum"'

->  label values dwellnum dwellnum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values dwellnum dwellnum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while `j' <= `nj' {
    = while 7 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unit"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unit unit"'

->  label values unit unit
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unit unit
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while `j' <= `nj' {
    = while 8 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"fileid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values fileid fileid"'

->  label values fileid fileid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values fileid fileid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while `j' <= `nj' {
    = while 9 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"individ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values individ individ"'

->  label values individ individ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values individ individ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while `j' <= `nj' {
    = while 10 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"houseid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values houseid houseid"'

->  label values houseid houseid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values houseid houseid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while `j' <= `nj' {
    = while 11 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"sex"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values sex sex"'

->  label values sex sex
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values sex sex
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while `j' <= `nj' {
    = while 12 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"relate"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values relate relate"'

->  label values relate relate
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values relate relate
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while `j' <= `nj' {
    = while 13 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"age"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values age age"'

->  label values age age
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values age age
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while `j' <= `nj' {
    = while 14 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"after"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values after after"'

->  label values after after
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values after after
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while `j' <= `nj' {
    = while 15 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"birthyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values birthyear birthyear"'

->  label values birthyear birthyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values birthyear birthyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while `j' <= `nj' {
    = while 16 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"lateyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values lateyear lateyear"'

->  label values lateyear lateyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values lateyear lateyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while `j' <= `nj' {
    = while 17 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"nation"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values nation nation"'

->  label values nation nation
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values nation nation
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while `j' <= `nj' {
    = while 18 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality locality"'

->  label values locality locality
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality locality
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while `j' <= `nj' {
    = while 19 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"formres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values formres formres"'

->  label values formres formres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values formres formres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while `j' <= `nj' {
    = while 20 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality2 locality2"'

->  label values locality2 locality2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality2 locality2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while `j' <= `nj' {
    = while 21 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"marstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values marstat marstat"'

->  label values marstat marstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values marstat marstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while `j' <= `nj' {
    = while 22 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"student"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values student student"'

->  label values student student
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values student student
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while `j' <= `nj' {
    = while 23 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"educ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values educ educ"'

->  label values educ educ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values educ educ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while `j' <= `nj' {
    = while 24 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"major"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values major major"'

->  label values major major
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values major major
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while `j' <= `nj' {
    = while 25 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"health"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values health health"'

->  label values health health
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values health health
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while `j' <= `nj' {
    = while 26 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"healthprob"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values healthprob healthprob"'

->  label values healthprob healthprob
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values healthprob healthprob
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while `j' <= `nj' {
    = while 27 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"employed"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values employed employed"'

->  label values employed employed
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values employed employed
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while `j' <= `nj' {
    = while 28 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unempres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unempres unempres"'

->  label values unempres unempres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unempres unempres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while `j' <= `nj' {
    = while 29 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"head"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values head head"'

->  label values head head
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values head head
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while `j' <= `nj' {
    = while 30 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"industry"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values industry industry"'

->  label values industry industry
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values industry industry
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while `j' <= `nj' {
    = while 31 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"occup"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values occup occup"'

->  label values occup occup
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values occup occup
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while `j' <= `nj' {
    = while 32 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"empstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values empstat empstat"'

->  label values empstat empstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values empstat empstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while `j' <= `nj' {
    = while 33 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"workstudy"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values workstudy workstudy"'

->  label values workstudy workstudy
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values workstudy workstudy
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while `j' <= `nj' {
    = while 34 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"wsloc"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values wsloc wsloc"'

->  label values wsloc wsloc
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values wsloc wsloc
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while `j' <= `nj' {
    = while 35 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality3"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality3 locality3"'

->  label values locality3 locality3
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality3 locality3
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while `j' <= `nj' {
    = while 36 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"moneysource"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values moneysource moneysource"'

->  label values moneysource moneysource
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values moneysource moneysource
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while `j' <= `nj' {
    = while 37 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65 over65"'

->  label values over65 over65
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65 over65
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while `j' <= `nj' {
    = while 38 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"residtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values residtype residtype"'

->  label values residtype residtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values residtype residtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while `j' <= `nj' {
    = while 39 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"ownhouse"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values ownhouse ownhouse"'

->  label values ownhouse ownhouse
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values ownhouse ownhouse
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while `j' <= `nj' {
    = while 40 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"qtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values qtype qtype"'

->  label values qtype qtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values qtype qtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while `j' <= `nj' {
    = while 41 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhsize"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhsize hhsize"'

->  label values hhsize hhsize
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhsize hhsize
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while `j' <= `nj' {
    = while 42 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrel"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrel hhrel"'

->  label values hhrel hhrel
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrel hhrel
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while `j' <= `nj' {
    = while 43 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu6"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu6 hhrelu6"'

->  label values hhrelu6 hhrelu6
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu6 hhrelu6
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while `j' <= `nj' {
    = while 44 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu18"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu18 hhrelu18"'

->  label values hhrelu18 hhrelu18
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu18 hhrelu18
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while `j' <= `nj' {
    = while 45 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65num"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65num over65num"'

->  label values over65num over65num
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65num over65num
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while `j' <= `nj' {
    = while 46 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"disablednum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values disablednum disablednum"'

->  label values disablednum disablednum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values disablednum disablednum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while `j' <= `nj' {
    = while 47 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"housetype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values housetype housetype"'

->  label values housetype housetype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values housetype housetype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while `j' <= `nj' {
    = while 48 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"PA088"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values PA088 PA088"'

->  label values PA088 PA088
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values PA088 PA088
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while `j' <= `nj' {
    = while 49 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village2 village2"'

->  label values village2 village2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village2 village2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while `j' <= `nj' {
    = while 50 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county2 county2"'

->  label values county2 county2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county2 county2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while `j' <= `nj' {
    = while 51 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"batchid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values batchid batchid"'

->  label values batchid batchid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values batchid batchid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while `j' <= `nj' {
    = while 52 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"runid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values runid runid"'

->  label values runid runid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values runid runid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while `j' <= `nj' {
    = while 53 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"FILLER"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values FILLER FILLER"'

->  label values FILLER FILLER
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values FILLER FILLER
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while `j' <= `nj' {
    = while 54 <= 53 {
      local c 1
      while `c' <= `ncmd' {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
      local j = `j' + 1
      }
    --------------------------------------------------------------- end for ---
  - label var birthyear "Actual birthyear (post revolution)"
  - replace birthyear=birthyear+1911
birthyear was byte now int
(436600 real changes made)
  - egen uniqueid=concat(county town village superdist cendist dwellnum unit)
    ------------------------------------------------------------ begin egen ---
    - version 6
    - gettoken type 0 : 0, parse(" =(")
    - gettoken name 0 : 0, parse(" =(")
    - if `"`name'"'=="=" {
    = if `"="'=="=" {
    - local name `"`type'"'
    = local name `"uniqueid"'
    - local type : set type
    - }
    - else {
      gettoken eqsign 0 : 0, parse(" =(")
      if `"`eqsign'"' != "=" {
      error 198
      }
      }
    - confirm new variable `name'
    = confirm new variable uniqueid
    - gettoken fcn 0 : 0, parse(" =(")
    - gettoken args 0 : 0, parse(" ,") match(par)
    - if `"`par'"' != "(" {
    = if `"("' != "(" {
      exit 198
      }
    - if `"`args'"' == "_all" {
    = if `"county town village superdist cendist dwellnum unit"' == "_all" {
      version 7.0
      unab args : _all
      local args : subinstr local args "`_sortindex'" "", all word
      version 6.0
      }
    - syntax [if] [in] [, *]
    - if _by() {
      local byopt "by(`_byvars')"
      local cma ","
      }
    - else if `"`options'"' != "" {
    = else if `""' != "" {
      local cma ","
      }
    - tempvar dummy
    - global EGEN_Varname `name'
    = global EGEN_Varname uniqueid
    - capture noisily _g`fcn' `type' `dummy' = (`args') `if' `in' `cma' `byopt'
>  `options'
    = capture noisily _gconcat float __000001 = (county town village superdist 
> cendist dwellnum unit)     
      ------------------------------------------------------ begin _gconcat ---
      - version 7
      - local strlen = cond("$S_StataSE"=="", "80", "244")
      = local strlen = cond(""=="", "80", "244")
      - version 6.0
      - gettoken type 0 : 0
      - gettoken g 0 : 0
      - gettoken eqs 0 : 0
      - syntax varlist(min=1) [if] [in], [Punct(str) Decode MAXLength(str) Form
> at(str) BY(string)]
      - if `"`by'"' != "" {
      = if `""' != "" {
        _egennoby concat() `"`by'"'
        }
      - tempvar xy
      - gen `xy'=1
      = gen __000002=1
      - if "`format'" != "" {
      = if "" != "" {
        capture format `xy' `format'
        if _rc == 120 {
        noi di in r "Invalid format"
        exit 120
        }
        local format `","`format'""'
        }
      - local plen = length(`"`punct'"')
      = local plen = length(`""')
      - local type "str1"
      - if "`maxleng'" != "" {
      = if "" != "" {
        capture confirm integer n `maxleng'
        if _rc | `maxleng' < 1 | `maxleng' > `strlen' {
        di in r "invalid maxlength( )"
        exit 198
        }
        else {
        local maxleng "maxl(`maxleng')"
        }
        }
      - local decode = "`decode'" == "decode"
      = local decode = "" == "decode"
      - quietly {
      - gen `type' `g' = ""
      = gen str1 __000001 = ""
      - tokenize `varlist'
      = tokenize county town village superdist cendist dwellnum unit
      - while "`1'" != "" {
      = while "county" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable county
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(county) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "town" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable town
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(town) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "village" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable village
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(village) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "superdist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable superdist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(superdist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "cendist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable cendist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(cendist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "dwellnum" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable dwellnum
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(dwellnum) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "unit" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable unit
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(unit) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "" != "" {
        capture confirm string variable `1'
        if _rc {
        local decoded 0
        if `decode' {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
        if !`decoded' {
        replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
        }
        }
        else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
        mac shift
        }
      - replace `g' = trim(substr(`g',1,length(`g') - `plen'))
      = replace __000001 = trim(substr(__000001,1,length(__000001) - 0))
      - }
      - local gtype : type `g'
      = local gtype : type __000001
      - if "`gtype'" == "str`strlen'" {
      = if "str13" == "str80" {
        di in gr "(note: str`strlen' variable created; truncated values possibl
> e)"
        }
      -------------------------------------------------------- end _gconcat ---
    - global EGEN_Varname
    - if _rc { exit _rc }
    - quietly count if missing(`dummy')
    = quietly count if missing(__000001)
    - if r(N) {
      local s = cond(r(N)>1,"s","")
      di in bl "(" r(N) " missing value`s' generated)"
      }
    - rename `dummy' `name'
    = rename __000001 uniqueid
    -------------------------------------------------------------- end egen ---
  - sort uniqueid
  - gen census=1990
  - gen yrsed=0
  - do ~/taiwan/yrsed.do

. #delimit;
delimiter now ;
. replace yrsed=0 if educ==1 & census==1980;
(0 real changes made)

. replace yrsed=1 if educ==2 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==3 & census==1980;
(0 real changes made)

. replace yrsed=8 if educ==4 & census==1980;
(0 real changes made)

. replace yrsed=12 if educ==5 & census==1980;
(0 real changes made)

. replace yrsed=10 if educ==6 & census==1980;
(0 real changes made)

. replace yrsed=14 if educ==7 & census==1980;
(0 real changes made)

. replace yrsed=16 if educ==8 & census==1980;
(0 real changes made)

. replace yrsed=18 if educ==9 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==1 & census==1990;
(136540 real changes made)

. replace yrsed=8 if educ==2 & census==1990;
(93656 real changes made)

. replace yrsed=12 if educ==3 & census==1990;
(34219 real changes made)

. replace yrsed=10 if educ==4 & census==1990;
(48416 real changes made)

. replace yrsed=14 if educ==5 & census==1990;
(18696 real changes made)

. replace yrsed=16 if educ==6 & census==1990;
(11335 real changes made)

. replace yrsed=18 if educ==7 & census==1990;
(911 real changes made)

. replace yrsed=0 if educ==8 & census==1990;
(0 real changes made)

. replace yrsed=1 if educ==9 & census==1990;
(5150 real changes made)

. replace yrsed=1 if educ==10 & census==1990;
(5752 real changes made)

. replace yrsed=2 if educ==11 & census==1990;
(10162 real changes made)

. replace yrsed=2 if educ==12 & census==1990;
(27286 real changes made)

. replace yrsed=4 if educ==1 & census==2000;
(0 real changes made)

. replace yrsed=8 if educ==2 & census==2000;
(0 real changes made)

. replace yrsed=12 if educ==3 & census==2000;
(0 real changes made)

. replace yrsed=10 if educ==4 & census==2000;
(0 real changes made)

. replace yrsed=14 if educ==5 & census==2000;
(0 real changes made)

. replace yrsed=16 if educ==6 & census==2000;
(0 real changes made)

. replace yrsed=17 if educ==7 & census==2000;
(0 real changes made)

. replace yrsed=18 if educ==8 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==9 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==10 & census==2000;
(0 real changes made)

. replace yrsed=1 if educ==11 & census==2000;
(0 real changes made)

. exit;

end of do-file
  - save ~/nta/taiwan/census1990/data1990/pop1990_`i',replace
  = save ~/nta/taiwan/census1990/data1990/pop1990_02,replace
file ~/nta/taiwan/census1990/data1990/pop1990_02.dta saved
  - }
  - clear _all
    ----------------------------------------------------------- begin clear ---
    - version 8
    - drop _all
    - label drop _all
    - matrix drop _all
    - scalar drop _all
    - constraint drop _all
    - eq drop _all
      ------------------------------------------------------------ begin eq ---
      - version 3.1
      - if "$S_eqnum"=="" {
      = if ""=="" {
      - global S_eqnum 0
      - }
      - if "`1'"=="?" | "`1'"=="??" {
      = if "drop"=="?" | "drop"=="??" {
        if "`3'"!="" {
        error 198
        }
        _crceqnm `2'
        local ename "${S_eqeq`r(n_eq)'}"
        if "`1'"=="?" & "`ename'"!= "" {
        local varlist "req ex"
        capture parse "`ename'"
        if _rc {
        di in red "`r(eqname)':" _col(11) "`ename'"
        local varlist "req ex"
        parse "`ename'"
        }
        local ename "`varlist'"
        }
        ret local eq "`ename'"
        ret local eqname "`r(eqname)'"
        global S_1 `return(eq)'
        global S_3 `return(eqname)'
        exit
        }
      - if "`1'"=="dir" | "`1'"=="list" {
      = if "drop"=="dir" | "drop"=="list" {
        local cmd "`1'"
        mac shift
        if "`1'"=="" {
        local 1 "_all"
        }
        _crceqlu `*'
        parse "`r(eqnums)'", parse(" ")
        if "`cmd'"=="dir" {
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}"
        mac shift
        }
        exit
        }
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}:" _col(11) in ye "${S_eqeq`1'}"
        mac shift
        }
        exit
        }
      - if "`1'"=="drop" {
      = if "drop"=="drop" {
      - mac shift
      - if "`*'"=="" {
      = if "_all"=="" {
        error 198
        }
      - local arg "`*'"
      = local arg "_all"
      - _crceqlu `*'
      = _crceqlu _all
        ------------------------------------------------- begin eq._crceqlu ---
        - version 3.1
        - if "`*'" == "" { exit }
        = if "_all" == "" { exit }
        - if "`*'" == "_all" {
        = if "_all" == "_all" {
        - local i 1
        - while `i'<=$S_eqnum {
        = while 1<=0 {
          if "${S_eqnm`i'}"!="" {
          ret local eqnums "`return(eqnums)' `i'"
          }
          local i=`i'+1
          }
        - exit
        --------------------------------------------------- end eq._crceqlu ---
      - parse "`r(eqnums)'", parse(" ")
      = parse "", parse(" ")
      - while "`1'"!="" {
      = while ""!="" {
        _crceqdp `1'
        mac shift
        }
      - if "`arg'"=="_all" {
      = if "_all"=="_all" {
      - global S_eqnum
      - }
      - exit
      -------------------------------------------------------------- end eq ---
    - file close _all
    - postutil clear
    - _return drop _all
    - discard
    ------------------------------------------------------------- end clear ---
  - qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS`i'PSN.txt) clear
  = qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS03PSN.txt) clear
  - compress
county was float now byte
town was float now byte
village was float now int
superdist was float now int
cendist was float now byte
dwellnum was float now int
unit was float now byte
fileid was float now byte
individ was float now int
houseid was float now byte
sex was float now byte
relate was float now byte
age was float now int
after was float now byte
birthyear was float now byte
lateyear was float now byte
nation was float now byte
locality was float now byte
formres was float now byte
locality2 was float now byte
marstat was float now byte
student was float now byte
educ was float now byte
major was float now byte
health was float now byte
healthprob was float now byte
employed was float now byte
unempres was float now byte
head was float now byte
industry was float now int
occup was float now int
empstat was float now byte
workstudy was float now byte
wsloc was float now byte
locality3 was float now int
moneysource was float now byte
over65 was float now byte
residtype was float now byte
ownhouse was float now byte
qtype was float now byte
hhsize was float now int
hhrel was float now byte
hhrelu6 was float now byte
hhrelu18 was float now byte
over65num was float now byte
disablednum was float now byte
housetype was float now byte
PA088 was float now byte
village2 was float now byte
county2 was float now byte
batchid was float now byte
FILLER was float now byte
  - do ~/nta/taiwan/census1990/dofiles/label1990.do

. #delimit;
delimiter now ;
.  label define sex 1 "Male", add;

.         label define sex 2 "Female", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define relate 1 "Household head", add;

. label define relate 2 "Spouse", add;

.         label define relate 3
> "Parent", add;

.             label define relate 4 "Parent's spouse", add;

. label define relate 5 "Grandparents", add;

.             label define
> relate 6 "Child", add;

.                       label define relate 7 "Child's
> spouse", add;

.           label define relate 8 "Grandchildren", add;

.         label
> define relate 9 "Sibling", add;

.               label define relate 10 "Other
> relative", add;

.         label define relate 11 "Employee", add;

.           label define
> relate 12 "Temporary", add;

.                                                                              
>                                                                              
>                                                                              
>            label define after 1 "Before 1912", add;

. label define after 2 "After 1912", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                label define l
> ateyear 1 "Before December 15", add;

. label define lateyear 2 "After December 15", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define nation 1 "Taiwanese", add;

. label define nation 2 "Mainland Chinese", add;

.         label define nation 3
> "American", add;

.     label define nation 4 "Japanese", add;

.    label
> define nation 5 "Southeast Asian", add;

.         label define nation 6 "Other",
> add;

.                                                                              
>                                                                              
>                                                                              
>                                                                         label
>  define formres 1 "Same household", add;

. label define formres 2 "Same village", add;

.         label define formres 3
> "Same town, different village", add;

.    label define formres 4 "Same
> county, different town", add;

.         label define formres 5 "Also Taiwan,
> different county", add;

.          label define formres 6 "In China, not in
> Taiwan", add;

.            label define formres 7 "Outside China/Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                              label define mar
> stat 1 "Single", add;

. label define marstat 2 "Married or partnered", add;

.         label define
> marstat 3 "Divorced or separated", add;

.                label define marstat 4
> "Widowed", add;

.                                                                              
>                                                                              
>                                                                              
>  label define student 1 "Currently studying", add;

. label define student 2 "Graduated", add;

.      label define student 3
> "Drop out", add;

.      label define student 4 "Passed equivalence exam",
> add;

.         label define student 5 "Not in school", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define educ 1 "Elem
> entary school", add;

. label define educ 2 "Junior high schol", add;

.         label define educ 3
> "Senior high school", add;

.   label define educ 4 "Vocational school",
> add;

.         label define educ 5 "Associate College", add;

.             label
> define educ 6 "College", add;

.                label define educ 7 "Graduate
> school", add;

.  label define educ 8 "Illiterate", add;

.          label define
> educ 9 "Self-taught", add;

.  label define educ 10 "Day-Care", add;

. label define educ 11 "Kindergarten", add;

.     label define educ 12
> "Other child-level", add;

.                                                                              
>                                                                              
>                                                                              
>           label define health 1 "No", add;

. label define health 2 "Yes", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define healthprob 1
>  "Multiple impediments", add;

. label define healthprob 2 "Sight impediment", add;

.         label define
> healthprob 3 "Hearing impediment", add;

.               label define healthprob
> 4 "Language impediment", add;

.            label define healthprob 5 "Bodily
> impediment", add;

.          label define healthprob 6 "Intelligence
> impediment", add;

.          label define healthprob 7 "Loss of major
> organ function", add;

.          label define healthprob 8 "Colorblindness",
> add;

.         label define healthprob 9 "Vegetative state or senility", add;

. label define healthprob 10 "Avoids social intersaction", add;

. label define healthprob 11 "Unable to take care of onesself", add;

. label define healthprob 12 "Other", add;

.    label define healthprob 0
> "None, N/A", add;

.                                                                              
>                                                                              
>                                                    label define employed 1 "E
> mployed", add;

. label define employed 2 "Conscripted", add;

.         label define employed
> 3 "Unemployed", add;

.   label define employed 0 "Less than 15 years
> old", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine unempres 1 "Starting to look for a job", add;

. label define unempres 2 "Looking anew for a job", add;

.         label define
> unempres 3 "Pursuing studies", add;

.    label define unempres 4
> "Cooking/ home chores", add;

.    label define unempres 5 "Disabled",
> add;

.         label define unempres 6 "Long illness", add;

.  label define
> unempres 7 "Forbidden to work/imprisoned", add;

.         label define unempres
> 8 "Unwilling to work", add;

.                    label define unempres 9
> "Other", add;

.         label define unempres 0 "Employed or Less than 15
> years old, N/A", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                               label define empstat 1 "Employer", add;

. label define empstat 2 "Self-employed", add;

.         label define empstat 3
> "Private enterprise", add;

.                 label define empstat 4
> "Government", add;

.     label define empstat 5 "Volunteer/ Unpaid", add;

. label define empstat 0 "N/A", add;

.                                                                              
>                                                                              
>                                           label define workstudy 1 "Yes", add
> ;

. label define workstudy 2 "No", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define wsloc 1 "On-site", add
> ;

. label define wsloc 2 "Same village", add;

.         label define wsloc 3
> "Different village", add;

.   label define wsloc 4 "Outside Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine moneysource 1 "Savings", add;

. label define moneysource 2 "Work income", add;

.         label define
> moneysource 3 "Partner", add;

.          label define moneysource 4
> "Children", add;

.          label define moneysource 5 "Other
> relatives/friends", add;

.  label define moneysource 6 "Retirement/
> pensions", add;

.             label define moneysource 7 "Welfare", add;

.         label
> define moneysource 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define residtype 1 "House ", 
> add;

. label define residtype 2 "Apartment", add;

.         label define residtype
> 3 "Other", add;

.                                                                              
>                                                                              
>                                                    label define buildtype 1 "
> Traditional rural type", add;

. label define buildtype 2 "Private courtyard/ duplex type", add;

.         label
> define buildtype 3 "Joined-roof type", add;

.   label define buildtype 4
> "Five or fewer floor apartments", add;

.  label define buildtype 5
> "Six-twelve floor apartments", add;

.     label define buildtype 6 "13 or
> more floor apartments", add;

.    label define buildtype 7 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define inhabited 1 "Someone p
> resent", add;

. label define inhabited 2 "Empty household", add;

.         label define
> inhabited 3 "Other use and nobody present", add;

.                                                                              
>                                                                              
>                                                                              
>                          label define residuse 1 "Use only as home", add;

. label define residuse 2 "Also industrial use", add;

.         label define
> residuse 3 "Also commercial use", add;

.          label define residuse 4 "Also
> other use", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine residage 1 "1912-1945", add;

. label define residage 2 "1946-1960", add;

.         label define residage
> 3 "1961-1970", add;

.    label define residage 4 "1971-1980", add;

.         label
> define residage 5 "1981-1985", add;

.             label define residage 6
> "1986", add;

.         label define residage 7 "1987", add;

.          label define
> residage 8 "1988", add;

.              label define residage 9 "1989", add;

. label define residage 10 "1990", add;

.                                                                              
>                                                                              
>                                                                             l
> abel define roomnum 1 "1", add;

. label define roomnum 2 "2", add;

.         label define roomnum 3 "3",
> add;

.         label define roomnum 4 "4", add;

.       label define roomnum 5
> "5", add;

.      label define roomnum 6 "6", add;

.             label define
> roomnum 7 "7", add;

.  label define roomnum 8 "8", add;

.           label define
> roomnum 9 "9", add;

.  label define roomnum 10 "10 or more", add;

.                                                                              
>                                                                              
>                         label define residnum 1 "1", add;

. label define residnum 2 "2", add;

.         label define residnum 3 "3",
> add;

.         label define residnum 4 "4", add;

.      label define residnum 5
> "5", add;

.      label define residnum 6 "6 or more", add;

.                                                                              
>                                                                              
>                                                                              
>         label define residown 1 "Self-purchased ordinary residence", add;

. label define residown 2 "Self-purchased Government built residence",
> add;

.         label define residown 3 "Inheritance or present", add;

.         label
> define residown 4 "Rented publicly owned Government built residence",
> add;

.         label define residown 5 "Rented privately owned government
> built residence", add;

.               label define residown 6 "Rented
> non-government built residence", add;

.            label define residown 7
> "Allocated residence (subsidized provision of housing)", add;

.          label
> define residown 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                  label define timeat 1 "1 year or less", add;

. label define timeat 2 "1-5 years", add;

.         label define timeat 3 "6-10
> years", add;

.  label define timeat 4 "11-15 years", add;

.             label
> define timeat 5 "16-20 years", add;

.           label define timeat 6 "21
> years or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                   label define spacecomp 1 "R
> ather large", add;

. label define spacecomp 2 "Rather small", add;

.         label define spacecomp
> 3 "About the same", add;

.                                                                              
>                                                                              
>                                                    label define spacediff 1 "
> Less than 5", add;

. label define spacediff 2 "btw 5-10", add;

.         label define spacediff
> 3 "btw 10-15", add;

.     label define spacediff 4 "15-20", add;

.         label
> define spacediff 5 "20 or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                        
end of do-file
  - for var *: label values X X
    ------------------------------------------------------------- begin for ---
    - if _caller()<6 {
      for5_0 `0'
      exit
      }
    - version 6.0
    - gettoken piece cmd: 0, parse(" :") quotes
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"var"' != ":" & `"var"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"*"' != ":" & `"*"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var *"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `":"' != ":" & `":"' != "" {
      local for `"`for' `piece'"'
      gettoken piece cmd: cmd, parse(" :") quotes
      }
    - if `"`piece'"' != ":" {
    = if `":"' != ":" {
      error 198
      }
    - local i 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `"var"' != "" & `"var"'!="," {
    - local i = `i' + 1
    = local i = 0 + 1
    - if `i' > 9 {
    = if 1 > 9 {
      di in red "too many lists"
      exit 198
      }
    - gettoken in: for, parse(" ,")
    - if `"`in'"' == "in" {
    = if `"*"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
    - else local from`i' = substr("XYZABCDEF",`i',1)
    = else local from1 = substr("XYZABCDEF",1,1)
    - GetType `"`su'"'
    = GetType `"var"'
      --------------------------------------------------- begin for.GetType ---
      - local typ `"`1'"'
      = local typ `"var"'
      - local l = length(`"`typ'"')
      = local l = length(`"var"')
      - if `l' == 0 { error 198 }
      = if 3 == 0 { error 198 }
      - if substr("varlist",1,max(3,`l')) == `"`typ'"' {
      = if substr("varlist",1,max(3,3)) == `"var"' {
      - ret local type "varlist"
      - }
      - else if substr("numlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("numlist",1,max(3,3)) == `"var"' {
        ret local type "numlist"
        }
      - else if substr("newlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("newlist",1,max(3,3)) == `"var"' {
        ret local type "newlist"
        }
      - else if "any" == `"`typ'"' {
      = else if "any" == `"var"' {
        ret local type "any"
        }
      - else {
        di in red `""`typ'" invalid list type"'
        exit 198
        }
      ----------------------------------------------------- end for.GetType ---
    - local type "`r(type)'"
    = local type "varlist"
    - local j 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `"*"'!="" & `"*"' != "\" & `"*"'!="," {
    - if "`type'" =="any" {
    = if "varlist" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
    - else local su`i' `"`su`i'' `su'"'
    = else local su1 `" *"'
    - gettoken su for: for, parse(" ,")
    - }
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `""'!="" & `""' != "\" & `""'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
    - if "`type'"!="any" {
    = if "varlist"!="any" {
    - if "`type'"=="varlist" {
    = if "varlist"=="varlist" {
    - if "`su`i''" != "" {
    = if " *" != "" {
    - unabbrev `su`i''
    = unabbrev  *
      ------------------------------------------------------ begin unabbrev ---
      - version 6
      - sret clear
      - gettoken list1 0 : 0
      - local 0 `"`list1' `0'"'
      = local 0 `"* "'
      - syntax varlist [, min(string) max(string)]
      - sret local varlist `varlist'
      = sret local varlist county town village superdist cendist dwellnum unit 
> fileid individ houseid sex relate age after birthyear lateyear nation localit
> y formres locality2 marstat student educ major health healthprob employed une
> mpres head industry occup empstat workstudy wsloc locality3 moneysource over6
> 5 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednu
> m housetype PA088 village2 county2 batchid runid FILLER
      - sret local k : word count `varlist'
      = sret local k : word count county town village superdist cendist dwellnu
> m unit fileid individ houseid sex relate age after birthyear lateyear nation 
> locality formres locality2 marstat student educ major health healthprob emplo
> yed unempres head industry occup empstat workstudy wsloc locality3 moneysourc
> e over65 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num dis
> ablednum housetype PA088 village2 county2 batchid runid FILLER
      - global S_1 "`varlist'"
      = global S_1 "county town village superdist cendist dwellnum unit fileid 
> individ houseid sex relate age after birthyear lateyear nation locality formr
> es locality2 marstat student educ major health healthprob employed unempres h
> ead industry occup empstat workstudy wsloc locality3 moneysource over65 resid
> type ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum house
> type PA088 village2 county2 batchid runid FILLER"
      - global S_2 `s(k)'
      = global S_2 53
      - if "`min'"=="" & "`max'"=="" { exit }
      = if ""=="" & ""=="" { exit }
      -------------------------------------------------------- end unabbrev ---
    - local thesu "`s(varlist)'"
    = local thesu "county town village superdist cendist dwellnum unit fileid i
> ndivid houseid sex relate age after birthyear lateyear nation locality formre
> s locality2 marstat student educ major health healthprob employed unempres he
> ad industry occup empstat workstudy wsloc locality3 moneysource over65 residt
> ype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum houset
> ype PA088 village2 county2 batchid runid FILLER"
    - }
    - else local thesu
    - }
    - else if "`type'"=="numlist" {
    = else if "varlist"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
    - else if "`type'"=="newlist" {
    = else if "varlist"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
    - else {
      di in red "type `type' not yet implemented"
      exit 198
      }
    - parse "`thesu'", parse(" ")
    = parse "county town village superdist cendist dwellnum unit fileid individ
>  houseid sex relate age after birthyear lateyear nation locality formres loca
> lity2 marstat student educ major health healthprob employed unempres head ind
> ustry occup empstat workstudy wsloc locality3 moneysource over65 residtype ow
> nhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum housetype PA
> 088 village2 county2 batchid runid FILLER", parse(" ")
    - local su`i'
    = local su1
    - local j 1
    - while "``j''" != "" {
    = while "county" != "" {
    - local su`i'`j' "``j''"
    = local su11 "county"
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while "``j''" != "" {
    = while "town" != "" {
    - local su`i'`j' "``j''"
    = local su12 "town"
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while "``j''" != "" {
    = while "village" != "" {
    - local su`i'`j' "``j''"
    = local su13 "village"
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while "``j''" != "" {
    = while "superdist" != "" {
    - local su`i'`j' "``j''"
    = local su14 "superdist"
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while "``j''" != "" {
    = while "cendist" != "" {
    - local su`i'`j' "``j''"
    = local su15 "cendist"
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while "``j''" != "" {
    = while "dwellnum" != "" {
    - local su`i'`j' "``j''"
    = local su16 "dwellnum"
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while "``j''" != "" {
    = while "unit" != "" {
    - local su`i'`j' "``j''"
    = local su17 "unit"
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while "``j''" != "" {
    = while "fileid" != "" {
    - local su`i'`j' "``j''"
    = local su18 "fileid"
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while "``j''" != "" {
    = while "individ" != "" {
    - local su`i'`j' "``j''"
    = local su19 "individ"
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while "``j''" != "" {
    = while "houseid" != "" {
    - local su`i'`j' "``j''"
    = local su110 "houseid"
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while "``j''" != "" {
    = while "sex" != "" {
    - local su`i'`j' "``j''"
    = local su111 "sex"
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while "``j''" != "" {
    = while "relate" != "" {
    - local su`i'`j' "``j''"
    = local su112 "relate"
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while "``j''" != "" {
    = while "age" != "" {
    - local su`i'`j' "``j''"
    = local su113 "age"
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while "``j''" != "" {
    = while "after" != "" {
    - local su`i'`j' "``j''"
    = local su114 "after"
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while "``j''" != "" {
    = while "birthyear" != "" {
    - local su`i'`j' "``j''"
    = local su115 "birthyear"
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while "``j''" != "" {
    = while "lateyear" != "" {
    - local su`i'`j' "``j''"
    = local su116 "lateyear"
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while "``j''" != "" {
    = while "nation" != "" {
    - local su`i'`j' "``j''"
    = local su117 "nation"
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while "``j''" != "" {
    = while "locality" != "" {
    - local su`i'`j' "``j''"
    = local su118 "locality"
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while "``j''" != "" {
    = while "formres" != "" {
    - local su`i'`j' "``j''"
    = local su119 "formres"
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while "``j''" != "" {
    = while "locality2" != "" {
    - local su`i'`j' "``j''"
    = local su120 "locality2"
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while "``j''" != "" {
    = while "marstat" != "" {
    - local su`i'`j' "``j''"
    = local su121 "marstat"
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while "``j''" != "" {
    = while "student" != "" {
    - local su`i'`j' "``j''"
    = local su122 "student"
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while "``j''" != "" {
    = while "educ" != "" {
    - local su`i'`j' "``j''"
    = local su123 "educ"
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while "``j''" != "" {
    = while "major" != "" {
    - local su`i'`j' "``j''"
    = local su124 "major"
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while "``j''" != "" {
    = while "health" != "" {
    - local su`i'`j' "``j''"
    = local su125 "health"
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while "``j''" != "" {
    = while "healthprob" != "" {
    - local su`i'`j' "``j''"
    = local su126 "healthprob"
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while "``j''" != "" {
    = while "employed" != "" {
    - local su`i'`j' "``j''"
    = local su127 "employed"
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while "``j''" != "" {
    = while "unempres" != "" {
    - local su`i'`j' "``j''"
    = local su128 "unempres"
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while "``j''" != "" {
    = while "head" != "" {
    - local su`i'`j' "``j''"
    = local su129 "head"
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while "``j''" != "" {
    = while "industry" != "" {
    - local su`i'`j' "``j''"
    = local su130 "industry"
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while "``j''" != "" {
    = while "occup" != "" {
    - local su`i'`j' "``j''"
    = local su131 "occup"
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while "``j''" != "" {
    = while "empstat" != "" {
    - local su`i'`j' "``j''"
    = local su132 "empstat"
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while "``j''" != "" {
    = while "workstudy" != "" {
    - local su`i'`j' "``j''"
    = local su133 "workstudy"
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while "``j''" != "" {
    = while "wsloc" != "" {
    - local su`i'`j' "``j''"
    = local su134 "wsloc"
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while "``j''" != "" {
    = while "locality3" != "" {
    - local su`i'`j' "``j''"
    = local su135 "locality3"
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while "``j''" != "" {
    = while "moneysource" != "" {
    - local su`i'`j' "``j''"
    = local su136 "moneysource"
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while "``j''" != "" {
    = while "over65" != "" {
    - local su`i'`j' "``j''"
    = local su137 "over65"
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while "``j''" != "" {
    = while "residtype" != "" {
    - local su`i'`j' "``j''"
    = local su138 "residtype"
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while "``j''" != "" {
    = while "ownhouse" != "" {
    - local su`i'`j' "``j''"
    = local su139 "ownhouse"
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while "``j''" != "" {
    = while "qtype" != "" {
    - local su`i'`j' "``j''"
    = local su140 "qtype"
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while "``j''" != "" {
    = while "hhsize" != "" {
    - local su`i'`j' "``j''"
    = local su141 "hhsize"
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while "``j''" != "" {
    = while "hhrel" != "" {
    - local su`i'`j' "``j''"
    = local su142 "hhrel"
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu6" != "" {
    - local su`i'`j' "``j''"
    = local su143 "hhrelu6"
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu18" != "" {
    - local su`i'`j' "``j''"
    = local su144 "hhrelu18"
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while "``j''" != "" {
    = while "over65num" != "" {
    - local su`i'`j' "``j''"
    = local su145 "over65num"
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while "``j''" != "" {
    = while "disablednum" != "" {
    - local su`i'`j' "``j''"
    = local su146 "disablednum"
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while "``j''" != "" {
    = while "housetype" != "" {
    - local su`i'`j' "``j''"
    = local su147 "housetype"
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while "``j''" != "" {
    = while "PA088" != "" {
    - local su`i'`j' "``j''"
    = local su148 "PA088"
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while "``j''" != "" {
    = while "village2" != "" {
    - local su`i'`j' "``j''"
    = local su149 "village2"
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while "``j''" != "" {
    = while "county2" != "" {
    - local su`i'`j' "``j''"
    = local su150 "county2"
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while "``j''" != "" {
    = while "batchid" != "" {
    - local su`i'`j' "``j''"
    = local su151 "batchid"
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while "``j''" != "" {
    = while "runid" != "" {
    - local su`i'`j' "``j''"
    = local su152 "runid"
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while "``j''" != "" {
    = while "FILLER" != "" {
    - local su`i'`j' "``j''"
    = local su153 "FILLER"
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while "``j''" != "" {
    = while "" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
    - local j = `j' - 1
    = local j = 54 - 1
    - }
    - if `i'>1 {
    = if 1>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
    - else local nj `j'
    = else local nj 53
    - if `"`su'"' == "\" {
    = if `""' == "\" {
      gettoken su for: for
      }
    - }
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `""' != "" & `""'!="," {
      local i = `i' + 1
      if `i' > 9 {
      di in red "too many lists"
      exit 198
      }
      gettoken in: for, parse(" ,")
      if `"`in'"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
      else local from`i' = substr("XYZABCDEF",`i',1)
      GetType `"`su'"'
      local type "`r(type)'"
      local j 0
      gettoken su for: for, parse(" ,")
      while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
      if "`type'"!="any" {
      if "`type'"=="varlist" {
      if "`su`i''" != "" {
      unabbrev `su`i''
      local thesu "`s(varlist)'"
      }
      else local thesu
      }
      else if "`type'"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
      else if "`type'"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
      else {
      di in red "type `type' not yet implemented"
      exit 198
      }
      parse "`thesu'", parse(" ")
      local su`i'
      local j 1
      while "``j''" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
      local j = `j' - 1
      }
      if `i'>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
      else local nj `j'
      if `"`su'"' == "\" {
      gettoken su for: for
      }
      }
    - local ni `i'
    = local ni 1
    - local in
    - local options "Dryrun noHeader noStop Pause"
    - parse `", `for'"'
    = parse `", "'
    - if "`pause'"!="" {
    = if ""!="" {
      local pause more
      }
    - if "`header'"=="noheader" {
    = if ""=="noheader" {
      local qq *
      }
    - if "`dryrun'" != "" {
    = if "" != "" {
      local xeq "*"
      local stop
      }
    - local todo `"`cmd'"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
    = local todo : subinstr local todo `"X"' `"county"', all count(local c)
    - if `c'==0 {
    = if 2==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
      if `c'==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
      local i = `i' + 1
      }
    - local ncmd 1
    - gettoken piece cmd: cmd, parse(" \") quotes
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"label"'!="\" & `"label"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"values"'!="\" & `"values"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `""'!="\" & `""'!="" {
      local cmd1 `"`cmd1' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
    - while `"`piece'"' == "\" {
    = while `""' == "\" {
      local ncmd = `ncmd' + 1
      gettoken piece cmd: cmd, parse(" \") quotes
      while `"`piece'"'!="\" & `"`piece'"'!="" {
      local cmd`ncmd' `"`cmd`ncmd'' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
      }
    - if `"`piece'"' != "" {
    = if `""' != "" {
      error 198
      }
    - local version = string(_caller())
    - local j 1
    - while `j' <= `nj' {
    = while 1 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county county"'

->  label values county county
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county county
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while `j' <= `nj' {
    = while 2 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"town"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values town town"'

->  label values town town
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values town town
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while `j' <= `nj' {
    = while 3 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village village"'

->  label values village village
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village village
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while `j' <= `nj' {
    = while 4 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"superdist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values superdist superdist"'

->  label values superdist superdist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values superdist superdist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while `j' <= `nj' {
    = while 5 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"cendist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values cendist cendist"'

->  label values cendist cendist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values cendist cendist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while `j' <= `nj' {
    = while 6 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"dwellnum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values dwellnum dwellnum"'

->  label values dwellnum dwellnum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values dwellnum dwellnum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while `j' <= `nj' {
    = while 7 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unit"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unit unit"'

->  label values unit unit
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unit unit
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while `j' <= `nj' {
    = while 8 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"fileid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values fileid fileid"'

->  label values fileid fileid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values fileid fileid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while `j' <= `nj' {
    = while 9 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"individ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values individ individ"'

->  label values individ individ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values individ individ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while `j' <= `nj' {
    = while 10 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"houseid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values houseid houseid"'

->  label values houseid houseid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values houseid houseid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while `j' <= `nj' {
    = while 11 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"sex"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values sex sex"'

->  label values sex sex
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values sex sex
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while `j' <= `nj' {
    = while 12 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"relate"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values relate relate"'

->  label values relate relate
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values relate relate
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while `j' <= `nj' {
    = while 13 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"age"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values age age"'

->  label values age age
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values age age
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while `j' <= `nj' {
    = while 14 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"after"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values after after"'

->  label values after after
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values after after
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while `j' <= `nj' {
    = while 15 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"birthyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values birthyear birthyear"'

->  label values birthyear birthyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values birthyear birthyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while `j' <= `nj' {
    = while 16 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"lateyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values lateyear lateyear"'

->  label values lateyear lateyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values lateyear lateyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while `j' <= `nj' {
    = while 17 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"nation"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values nation nation"'

->  label values nation nation
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values nation nation
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while `j' <= `nj' {
    = while 18 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality locality"'

->  label values locality locality
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality locality
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while `j' <= `nj' {
    = while 19 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"formres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values formres formres"'

->  label values formres formres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values formres formres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while `j' <= `nj' {
    = while 20 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality2 locality2"'

->  label values locality2 locality2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality2 locality2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while `j' <= `nj' {
    = while 21 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"marstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values marstat marstat"'

->  label values marstat marstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values marstat marstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while `j' <= `nj' {
    = while 22 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"student"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values student student"'

->  label values student student
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values student student
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while `j' <= `nj' {
    = while 23 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"educ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values educ educ"'

->  label values educ educ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values educ educ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while `j' <= `nj' {
    = while 24 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"major"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values major major"'

->  label values major major
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values major major
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while `j' <= `nj' {
    = while 25 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"health"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values health health"'

->  label values health health
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values health health
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while `j' <= `nj' {
    = while 26 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"healthprob"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values healthprob healthprob"'

->  label values healthprob healthprob
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values healthprob healthprob
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while `j' <= `nj' {
    = while 27 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"employed"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values employed employed"'

->  label values employed employed
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values employed employed
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while `j' <= `nj' {
    = while 28 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unempres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unempres unempres"'

->  label values unempres unempres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unempres unempres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while `j' <= `nj' {
    = while 29 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"head"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values head head"'

->  label values head head
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values head head
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while `j' <= `nj' {
    = while 30 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"industry"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values industry industry"'

->  label values industry industry
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values industry industry
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while `j' <= `nj' {
    = while 31 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"occup"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values occup occup"'

->  label values occup occup
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values occup occup
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while `j' <= `nj' {
    = while 32 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"empstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values empstat empstat"'

->  label values empstat empstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values empstat empstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while `j' <= `nj' {
    = while 33 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"workstudy"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values workstudy workstudy"'

->  label values workstudy workstudy
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values workstudy workstudy
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while `j' <= `nj' {
    = while 34 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"wsloc"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values wsloc wsloc"'

->  label values wsloc wsloc
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values wsloc wsloc
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while `j' <= `nj' {
    = while 35 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality3"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality3 locality3"'

->  label values locality3 locality3
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality3 locality3
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while `j' <= `nj' {
    = while 36 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"moneysource"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values moneysource moneysource"'

->  label values moneysource moneysource
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values moneysource moneysource
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while `j' <= `nj' {
    = while 37 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65 over65"'

->  label values over65 over65
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65 over65
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while `j' <= `nj' {
    = while 38 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"residtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values residtype residtype"'

->  label values residtype residtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values residtype residtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while `j' <= `nj' {
    = while 39 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"ownhouse"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values ownhouse ownhouse"'

->  label values ownhouse ownhouse
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values ownhouse ownhouse
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while `j' <= `nj' {
    = while 40 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"qtype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values qtype qtype"'

->  label values qtype qtype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values qtype qtype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while `j' <= `nj' {
    = while 41 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhsize"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhsize hhsize"'

->  label values hhsize hhsize
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhsize hhsize
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while `j' <= `nj' {
    = while 42 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrel"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrel hhrel"'

->  label values hhrel hhrel
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrel hhrel
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while `j' <= `nj' {
    = while 43 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu6"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu6 hhrelu6"'

->  label values hhrelu6 hhrelu6
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu6 hhrelu6
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while `j' <= `nj' {
    = while 44 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"hhrelu18"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values hhrelu18 hhrelu18"'

->  label values hhrelu18 hhrelu18
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values hhrelu18 hhrelu18
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while `j' <= `nj' {
    = while 45 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"over65num"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values over65num over65num"'

->  label values over65num over65num
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values over65num over65num
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while `j' <= `nj' {
    = while 46 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"disablednum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values disablednum disablednum"'

->  label values disablednum disablednum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values disablednum disablednum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while `j' <= `nj' {
    = while 47 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"housetype"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values housetype housetype"'

->  label values housetype housetype
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values housetype housetype
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while `j' <= `nj' {
    = while 48 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"PA088"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values PA088 PA088"'

->  label values PA088 PA088
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values PA088 PA088
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while `j' <= `nj' {
    = while 49 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village2 village2"'

->  label values village2 village2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village2 village2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while `j' <= `nj' {
    = while 50 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county2 county2"'

->  label values county2 county2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county2 county2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while `j' <= `nj' {
    = while 51 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"batchid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values batchid batchid"'

->  label values batchid batchid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values batchid batchid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while `j' <= `nj' {
    = while 52 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"runid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values runid runid"'

->  label values runid runid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values runid runid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while `j' <= `nj' {
    = while 53 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"FILLER"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values FILLER FILLER"'

->  label values FILLER FILLER
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values FILLER FILLER
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while `j' <= `nj' {
    = while 54 <= 53 {
      local c 1
      while `c' <= `ncmd' {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
      local j = `j' + 1
      }
    --------------------------------------------------------------- end for ---
  - label var birthyear "Actual birthyear (post revolution)"
  - replace birthyear=birthyear+1911
birthyear was byte now int
(1377934 real changes made)
  - egen uniqueid=concat(county town village superdist cendist dwellnum unit)
    ------------------------------------------------------------ begin egen ---
    - version 6
    - gettoken type 0 : 0, parse(" =(")
    - gettoken name 0 : 0, parse(" =(")
    - if `"`name'"'=="=" {
    = if `"="'=="=" {
    - local name `"`type'"'
    = local name `"uniqueid"'
    - local type : set type
    - }
    - else {
      gettoken eqsign 0 : 0, parse(" =(")
      if `"`eqsign'"' != "=" {
      error 198
      }
      }
    - confirm new variable `name'
    = confirm new variable uniqueid
    - gettoken fcn 0 : 0, parse(" =(")
    - gettoken args 0 : 0, parse(" ,") match(par)
    - if `"`par'"' != "(" {
    = if `"("' != "(" {
      exit 198
      }
    - if `"`args'"' == "_all" {
    = if `"county town village superdist cendist dwellnum unit"' == "_all" {
      version 7.0
      unab args : _all
      local args : subinstr local args "`_sortindex'" "", all word
      version 6.0
      }
    - syntax [if] [in] [, *]
    - if _by() {
      local byopt "by(`_byvars')"
      local cma ","
      }
    - else if `"`options'"' != "" {
    = else if `""' != "" {
      local cma ","
      }
    - tempvar dummy
    - global EGEN_Varname `name'
    = global EGEN_Varname uniqueid
    - capture noisily _g`fcn' `type' `dummy' = (`args') `if' `in' `cma' `byopt'
>  `options'
    = capture noisily _gconcat float __000001 = (county town village superdist 
> cendist dwellnum unit)     
      ------------------------------------------------------ begin _gconcat ---
      - version 7
      - local strlen = cond("$S_StataSE"=="", "80", "244")
      = local strlen = cond(""=="", "80", "244")
      - version 6.0
      - gettoken type 0 : 0
      - gettoken g 0 : 0
      - gettoken eqs 0 : 0
      - syntax varlist(min=1) [if] [in], [Punct(str) Decode MAXLength(str) Form
> at(str) BY(string)]
      - if `"`by'"' != "" {
      = if `""' != "" {
        _egennoby concat() `"`by'"'
        }
      - tempvar xy
      - gen `xy'=1
      = gen __000002=1
      - if "`format'" != "" {
      = if "" != "" {
        capture format `xy' `format'
        if _rc == 120 {
        noi di in r "Invalid format"
        exit 120
        }
        local format `","`format'""'
        }
      - local plen = length(`"`punct'"')
      = local plen = length(`""')
      - local type "str1"
      - if "`maxleng'" != "" {
      = if "" != "" {
        capture confirm integer n `maxleng'
        if _rc | `maxleng' < 1 | `maxleng' > `strlen' {
        di in r "invalid maxlength( )"
        exit 198
        }
        else {
        local maxleng "maxl(`maxleng')"
        }
        }
      - local decode = "`decode'" == "decode"
      = local decode = "" == "decode"
      - quietly {
      - gen `type' `g' = ""
      = gen str1 __000001 = ""
      - tokenize `varlist'
      = tokenize county town village superdist cendist dwellnum unit
      - while "`1'" != "" {
      = while "county" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable county
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(county) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "town" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable town
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(town) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "village" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable village
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(village) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "superdist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable superdist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(superdist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "cendist" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable cendist
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(cendist) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "dwellnum" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable dwellnum
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(dwellnum) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "unit" != "" {
      - capture confirm string variable `1'
      = capture confirm string variable unit
      - if _rc {
      - local decoded 0
      - if `decode' {
      = if 0 {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
      - if !`decoded' {
      = if !0 {
      - replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
      = replace __000001 = __000001 + string(unit) + `""'  
      - }
      - }
      - else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
      - mac shift
      - }
      - while "`1'" != "" {
      = while "" != "" {
        capture confirm string variable `1'
        if _rc {
        local decoded 0
        if `decode' {
        tempvar dcdd
        capture decode `1', gen(`dcdd') `maxleng'
        if _rc == 0 {
        replace `dcdd' = string(`1'`format') if `dcdd' == ""
        replace `g' = `g' + `dcdd' + `"`punct'"' `if' `in'
        local decoded 1
        }
        capture drop `dcdd'
        }
        if !`decoded' {
        replace `g' = `g' + string(`1'`format') + `"`punct'"' `if' `in'
        }
        }
        else {
        replace `g' = `g' + `1' + `"`punct'"' `if' `in'
        }
        mac shift
        }
      - replace `g' = trim(substr(`g',1,length(`g') - `plen'))
      = replace __000001 = trim(substr(__000001,1,length(__000001) - 0))
      - }
      - local gtype : type `g'
      = local gtype : type __000001
      - if "`gtype'" == "str`strlen'" {
      = if "str14" == "str80" {
        di in gr "(note: str`strlen' variable created; truncated values possibl
> e)"
        }
      -------------------------------------------------------- end _gconcat ---
    - global EGEN_Varname
    - if _rc { exit _rc }
    - quietly count if missing(`dummy')
    = quietly count if missing(__000001)
    - if r(N) {
      local s = cond(r(N)>1,"s","")
      di in bl "(" r(N) " missing value`s' generated)"
      }
    - rename `dummy' `name'
    = rename __000001 uniqueid
    -------------------------------------------------------------- end egen ---
  - sort uniqueid
  - gen census=1990
  - gen yrsed=0
  - do ~/taiwan/yrsed.do

. #delimit;
delimiter now ;
. replace yrsed=0 if educ==1 & census==1980;
(0 real changes made)

. replace yrsed=1 if educ==2 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==3 & census==1980;
(0 real changes made)

. replace yrsed=8 if educ==4 & census==1980;
(0 real changes made)

. replace yrsed=12 if educ==5 & census==1980;
(0 real changes made)

. replace yrsed=10 if educ==6 & census==1980;
(0 real changes made)

. replace yrsed=14 if educ==7 & census==1980;
(0 real changes made)

. replace yrsed=16 if educ==8 & census==1980;
(0 real changes made)

. replace yrsed=18 if educ==9 & census==1980;
(0 real changes made)

. replace yrsed=4 if educ==1 & census==1990;
(411878 real changes made)

. replace yrsed=8 if educ==2 & census==1990;
(259735 real changes made)

. replace yrsed=12 if educ==3 & census==1990;
(143707 real changes made)

. replace yrsed=10 if educ==4 & census==1990;
(173938 real changes made)

. replace yrsed=14 if educ==5 & census==1990;
(87097 real changes made)

. replace yrsed=16 if educ==6 & census==1990;
(56254 real changes made)

. replace yrsed=18 if educ==7 & census==1990;
(5429 real changes made)

. replace yrsed=0 if educ==8 & census==1990;
(0 real changes made)

. replace yrsed=1 if educ==9 & census==1990;
(12793 real changes made)

. replace yrsed=1 if educ==10 & census==1990;
(5901 real changes made)

. replace yrsed=2 if educ==11 & census==1990;
(42387 real changes made)

. replace yrsed=2 if educ==12 & census==1990;
(96751 real changes made)

. replace yrsed=4 if educ==1 & census==2000;
(0 real changes made)

. replace yrsed=8 if educ==2 & census==2000;
(0 real changes made)

. replace yrsed=12 if educ==3 & census==2000;
(0 real changes made)

. replace yrsed=10 if educ==4 & census==2000;
(0 real changes made)

. replace yrsed=14 if educ==5 & census==2000;
(0 real changes made)

. replace yrsed=16 if educ==6 & census==2000;
(0 real changes made)

. replace yrsed=17 if educ==7 & census==2000;
(0 real changes made)

. replace yrsed=18 if educ==8 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==9 & census==2000;
(0 real changes made)

. replace yrsed=0 if educ==10 & census==2000;
(0 real changes made)

. replace yrsed=1 if educ==11 & census==2000;
(0 real changes made)

. exit;

end of do-file
  - save ~/nta/taiwan/census1990/data1990/pop1990_`i',replace
  = save ~/nta/taiwan/census1990/data1990/pop1990_03,replace
file ~/nta/taiwan/census1990/data1990/pop1990_03.dta saved
  - }
  - clear _all
    ----------------------------------------------------------- begin clear ---
    - version 8
    - drop _all
    - label drop _all
    - matrix drop _all
    - scalar drop _all
    - constraint drop _all
    - eq drop _all
      ------------------------------------------------------------ begin eq ---
      - version 3.1
      - if "$S_eqnum"=="" {
      = if ""=="" {
      - global S_eqnum 0
      - }
      - if "`1'"=="?" | "`1'"=="??" {
      = if "drop"=="?" | "drop"=="??" {
        if "`3'"!="" {
        error 198
        }
        _crceqnm `2'
        local ename "${S_eqeq`r(n_eq)'}"
        if "`1'"=="?" & "`ename'"!= "" {
        local varlist "req ex"
        capture parse "`ename'"
        if _rc {
        di in red "`r(eqname)':" _col(11) "`ename'"
        local varlist "req ex"
        parse "`ename'"
        }
        local ename "`varlist'"
        }
        ret local eq "`ename'"
        ret local eqname "`r(eqname)'"
        global S_1 `return(eq)'
        global S_3 `return(eqname)'
        exit
        }
      - if "`1'"=="dir" | "`1'"=="list" {
      = if "drop"=="dir" | "drop"=="list" {
        local cmd "`1'"
        mac shift
        if "`1'"=="" {
        local 1 "_all"
        }
        _crceqlu `*'
        parse "`r(eqnums)'", parse(" ")
        if "`cmd'"=="dir" {
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}"
        mac shift
        }
        exit
        }
        while "`1'"!="" {
        di in gr "${S_eqnm`1'}:" _col(11) in ye "${S_eqeq`1'}"
        mac shift
        }
        exit
        }
      - if "`1'"=="drop" {
      = if "drop"=="drop" {
      - mac shift
      - if "`*'"=="" {
      = if "_all"=="" {
        error 198
        }
      - local arg "`*'"
      = local arg "_all"
      - _crceqlu `*'
      = _crceqlu _all
        ------------------------------------------------- begin eq._crceqlu ---
        - version 3.1
        - if "`*'" == "" { exit }
        = if "_all" == "" { exit }
        - if "`*'" == "_all" {
        = if "_all" == "_all" {
        - local i 1
        - while `i'<=$S_eqnum {
        = while 1<=0 {
          if "${S_eqnm`i'}"!="" {
          ret local eqnums "`return(eqnums)' `i'"
          }
          local i=`i'+1
          }
        - exit
        --------------------------------------------------- end eq._crceqlu ---
      - parse "`r(eqnums)'", parse(" ")
      = parse "", parse(" ")
      - while "`1'"!="" {
      = while ""!="" {
        _crceqdp `1'
        mac shift
        }
      - if "`arg'"=="_all" {
      = if "_all"=="_all" {
      - global S_eqnum
      - }
      - exit
      -------------------------------------------------------------- end eq ---
    - file close _all
    - postutil clear
    - _return drop _all
    - discard
    ------------------------------------------------------------- end clear ---
  - qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS`i'PSN.txt) clear
  = qui infile using ~/nta/taiwan/census1990/dctfiles/pop1990.dct, using(~/nta/
> taiwan/census1990/pop1990_raw/y79hS04PSN.txt) clear
  - compress
county was float now byte
town was float now byte
village was float now byte
superdist was float now int
cendist was float now byte
dwellnum was float now int
unit was float now byte
fileid was float now byte
individ was float now int
houseid was float now byte
sex was float now byte
relate was float now byte
age was float now byte
after was float now byte
birthyear was float now byte
lateyear was float now byte
nation was float now byte
locality was float now byte
formres was float now byte
locality2 was float now byte
marstat was float now byte
student was float now byte
educ was float now byte
major was float now byte
health was float now byte
healthprob was float now byte
employed was float now byte
unempres was float now byte
head was float now byte
industry was float now int
occup was float now int
empstat was float now byte
workstudy was float now byte
wsloc was float now byte
locality3 was float now int
moneysource was float now byte
over65 was float now byte
residtype was float now byte
ownhouse was float now byte
qtype was float now byte
hhsize was float now int
hhrel was float now byte
hhrelu6 was float now byte
hhrelu18 was float now byte
over65num was float now byte
disablednum was float now byte
housetype was float now byte
PA088 was float now byte
village2 was float now byte
county2 was float now byte
batchid was float now byte
FILLER was float now byte
  - do ~/nta/taiwan/census1990/dofiles/label1990.do

. #delimit;
delimiter now ;
.  label define sex 1 "Male", add;

.         label define sex 2 "Female", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define relate 1 "Household head", add;

. label define relate 2 "Spouse", add;

.         label define relate 3
> "Parent", add;

.             label define relate 4 "Parent's spouse", add;

. label define relate 5 "Grandparents", add;

.             label define
> relate 6 "Child", add;

.                       label define relate 7 "Child's
> spouse", add;

.           label define relate 8 "Grandchildren", add;

.         label
> define relate 9 "Sibling", add;

.               label define relate 10 "Other
> relative", add;

.         label define relate 11 "Employee", add;

.           label define
> relate 12 "Temporary", add;

.                                                                              
>                                                                              
>                                                                              
>            label define after 1 "Before 1912", add;

. label define after 2 "After 1912", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                label define l
> ateyear 1 "Before December 15", add;

. label define lateyear 2 "After December 15", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>     label define nation 1 "Taiwanese", add;

. label define nation 2 "Mainland Chinese", add;

.         label define nation 3
> "American", add;

.     label define nation 4 "Japanese", add;

.    label
> define nation 5 "Southeast Asian", add;

.         label define nation 6 "Other",
> add;

.                                                                              
>                                                                              
>                                                                              
>                                                                         label
>  define formres 1 "Same household", add;

. label define formres 2 "Same village", add;

.         label define formres 3
> "Same town, different village", add;

.    label define formres 4 "Same
> county, different town", add;

.         label define formres 5 "Also Taiwan,
> different county", add;

.          label define formres 6 "In China, not in
> Taiwan", add;

.            label define formres 7 "Outside China/Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                              label define mar
> stat 1 "Single", add;

. label define marstat 2 "Married or partnered", add;

.         label define
> marstat 3 "Divorced or separated", add;

.                label define marstat 4
> "Widowed", add;

.                                                                              
>                                                                              
>                                                                              
>  label define student 1 "Currently studying", add;

. label define student 2 "Graduated", add;

.      label define student 3
> "Drop out", add;

.      label define student 4 "Passed equivalence exam",
> add;

.         label define student 5 "Not in school", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define educ 1 "Elem
> entary school", add;

. label define educ 2 "Junior high schol", add;

.         label define educ 3
> "Senior high school", add;

.   label define educ 4 "Vocational school",
> add;

.         label define educ 5 "Associate College", add;

.             label
> define educ 6 "College", add;

.                label define educ 7 "Graduate
> school", add;

.  label define educ 8 "Illiterate", add;

.          label define
> educ 9 "Self-taught", add;

.  label define educ 10 "Day-Care", add;

. label define educ 11 "Kindergarten", add;

.     label define educ 12
> "Other child-level", add;

.                                                                              
>                                                                              
>                                                                              
>           label define health 1 "No", add;

. label define health 2 "Yes", add;

.                                                                              
>                                                                              
>                                                                              
>                                                     label define healthprob 1
>  "Multiple impediments", add;

. label define healthprob 2 "Sight impediment", add;

.         label define
> healthprob 3 "Hearing impediment", add;

.               label define healthprob
> 4 "Language impediment", add;

.            label define healthprob 5 "Bodily
> impediment", add;

.          label define healthprob 6 "Intelligence
> impediment", add;

.          label define healthprob 7 "Loss of major
> organ function", add;

.          label define healthprob 8 "Colorblindness",
> add;

.         label define healthprob 9 "Vegetative state or senility", add;

. label define healthprob 10 "Avoids social intersaction", add;

. label define healthprob 11 "Unable to take care of onesself", add;

. label define healthprob 12 "Other", add;

.    label define healthprob 0
> "None, N/A", add;

.                                                                              
>                                                                              
>                                                    label define employed 1 "E
> mployed", add;

. label define employed 2 "Conscripted", add;

.         label define employed
> 3 "Unemployed", add;

.   label define employed 0 "Less than 15 years
> old", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine unempres 1 "Starting to look for a job", add;

. label define unempres 2 "Looking anew for a job", add;

.         label define
> unempres 3 "Pursuing studies", add;

.    label define unempres 4
> "Cooking/ home chores", add;

.    label define unempres 5 "Disabled",
> add;

.         label define unempres 6 "Long illness", add;

.  label define
> unempres 7 "Forbidden to work/imprisoned", add;

.         label define unempres
> 8 "Unwilling to work", add;

.                    label define unempres 9
> "Other", add;

.         label define unempres 0 "Employed or Less than 15
> years old, N/A", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                               label define empstat 1 "Employer", add;

. label define empstat 2 "Self-employed", add;

.         label define empstat 3
> "Private enterprise", add;

.                 label define empstat 4
> "Government", add;

.     label define empstat 5 "Volunteer/ Unpaid", add;

. label define empstat 0 "N/A", add;

.                                                                              
>                                                                              
>                                           label define workstudy 1 "Yes", add
> ;

. label define workstudy 2 "No", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define wsloc 1 "On-site", add
> ;

. label define wsloc 2 "Same village", add;

.         label define wsloc 3
> "Different village", add;

.   label define wsloc 4 "Outside Taiwan", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine moneysource 1 "Savings", add;

. label define moneysource 2 "Work income", add;

.         label define
> moneysource 3 "Partner", add;

.          label define moneysource 4
> "Children", add;

.          label define moneysource 5 "Other
> relatives/friends", add;

.  label define moneysource 6 "Retirement/
> pensions", add;

.             label define moneysource 7 "Welfare", add;

.         label
> define moneysource 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define residtype 1 "House ", 
> add;

. label define residtype 2 "Apartment", add;

.         label define residtype
> 3 "Other", add;

.                                                                              
>                                                                              
>                                                    label define buildtype 1 "
> Traditional rural type", add;

. label define buildtype 2 "Private courtyard/ duplex type", add;

.         label
> define buildtype 3 "Joined-roof type", add;

.   label define buildtype 4
> "Five or fewer floor apartments", add;

.  label define buildtype 5
> "Six-twelve floor apartments", add;

.     label define buildtype 6 "13 or
> more floor apartments", add;

.    label define buildtype 7 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                           label define inhabited 1 "Someone p
> resent", add;

. label define inhabited 2 "Empty household", add;

.         label define
> inhabited 3 "Other use and nobody present", add;

.                                                                              
>                                                                              
>                                                                              
>                          label define residuse 1 "Use only as home", add;

. label define residuse 2 "Also industrial use", add;

.         label define
> residuse 3 "Also commercial use", add;

.          label define residuse 4 "Also
> other use", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                     label def
> ine residage 1 "1912-1945", add;

. label define residage 2 "1946-1960", add;

.         label define residage
> 3 "1961-1970", add;

.    label define residage 4 "1971-1980", add;

.         label
> define residage 5 "1981-1985", add;

.             label define residage 6
> "1986", add;

.         label define residage 7 "1987", add;

.          label define
> residage 8 "1988", add;

.              label define residage 9 "1989", add;

. label define residage 10 "1990", add;

.                                                                              
>                                                                              
>                                                                             l
> abel define roomnum 1 "1", add;

. label define roomnum 2 "2", add;

.         label define roomnum 3 "3",
> add;

.         label define roomnum 4 "4", add;

.       label define roomnum 5
> "5", add;

.      label define roomnum 6 "6", add;

.             label define
> roomnum 7 "7", add;

.  label define roomnum 8 "8", add;

.           label define
> roomnum 9 "9", add;

.  label define roomnum 10 "10 or more", add;

.                                                                              
>                                                                              
>                         label define residnum 1 "1", add;

. label define residnum 2 "2", add;

.         label define residnum 3 "3",
> add;

.         label define residnum 4 "4", add;

.      label define residnum 5
> "5", add;

.      label define residnum 6 "6 or more", add;

.                                                                              
>                                                                              
>                                                                              
>         label define residown 1 "Self-purchased ordinary residence", add;

. label define residown 2 "Self-purchased Government built residence",
> add;

.         label define residown 3 "Inheritance or present", add;

.         label
> define residown 4 "Rented publicly owned Government built residence",
> add;

.         label define residown 5 "Rented privately owned government
> built residence", add;

.               label define residown 6 "Rented
> non-government built residence", add;

.            label define residown 7
> "Allocated residence (subsidized provision of housing)", add;

.          label
> define residown 8 "Other", add;

.                                                                              
>                                                                              
>                                                                              
>                                  label define timeat 1 "1 year or less", add;

. label define timeat 2 "1-5 years", add;

.         label define timeat 3 "6-10
> years", add;

.  label define timeat 4 "11-15 years", add;

.             label
> define timeat 5 "16-20 years", add;

.           label define timeat 6 "21
> years or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                   label define spacecomp 1 "R
> ather large", add;

. label define spacecomp 2 "Rather small", add;

.         label define spacecomp
> 3 "About the same", add;

.                                                                              
>                                                                              
>                                                    label define spacediff 1 "
> Less than 5", add;

. label define spacediff 2 "btw 5-10", add;

.         label define spacediff
> 3 "btw 10-15", add;

.     label define spacediff 4 "15-20", add;

.         label
> define spacediff 5 "20 or more", add;

.                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                                                              
>                                        
end of do-file
  - for var *: label values X X
    ------------------------------------------------------------- begin for ---
    - if _caller()<6 {
      for5_0 `0'
      exit
      }
    - version 6.0
    - gettoken piece cmd: 0, parse(" :") quotes
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"var"' != ":" & `"var"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `"*"' != ":" & `"*"' != "" {
    - local for `"`for' `piece'"'
    = local for `" var *"'
    - gettoken piece cmd: cmd, parse(" :") quotes
    - }
    - while `"`piece'"' != ":" & `"`piece'"' != "" {
    = while `":"' != ":" & `":"' != "" {
      local for `"`for' `piece'"'
      gettoken piece cmd: cmd, parse(" :") quotes
      }
    - if `"`piece'"' != ":" {
    = if `":"' != ":" {
      error 198
      }
    - local i 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `"var"' != "" & `"var"'!="," {
    - local i = `i' + 1
    = local i = 0 + 1
    - if `i' > 9 {
    = if 1 > 9 {
      di in red "too many lists"
      exit 198
      }
    - gettoken in: for, parse(" ,")
    - if `"`in'"' == "in" {
    = if `"*"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
    - else local from`i' = substr("XYZABCDEF",`i',1)
    = else local from1 = substr("XYZABCDEF",1,1)
    - GetType `"`su'"'
    = GetType `"var"'
      --------------------------------------------------- begin for.GetType ---
      - local typ `"`1'"'
      = local typ `"var"'
      - local l = length(`"`typ'"')
      = local l = length(`"var"')
      - if `l' == 0 { error 198 }
      = if 3 == 0 { error 198 }
      - if substr("varlist",1,max(3,`l')) == `"`typ'"' {
      = if substr("varlist",1,max(3,3)) == `"var"' {
      - ret local type "varlist"
      - }
      - else if substr("numlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("numlist",1,max(3,3)) == `"var"' {
        ret local type "numlist"
        }
      - else if substr("newlist",1,max(3,`l')) == `"`typ'"' {
      = else if substr("newlist",1,max(3,3)) == `"var"' {
        ret local type "newlist"
        }
      - else if "any" == `"`typ'"' {
      = else if "any" == `"var"' {
        ret local type "any"
        }
      - else {
        di in red `""`typ'" invalid list type"'
        exit 198
        }
      ----------------------------------------------------- end for.GetType ---
    - local type "`r(type)'"
    = local type "varlist"
    - local j 0
    - gettoken su for: for, parse(" ,")
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `"*"'!="" & `"*"' != "\" & `"*"'!="," {
    - if "`type'" =="any" {
    = if "varlist" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
    - else local su`i' `"`su`i'' `su'"'
    = else local su1 `" *"'
    - gettoken su for: for, parse(" ,")
    - }
    - while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
    = while `""'!="" & `""' != "\" & `""'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
    - if "`type'"!="any" {
    = if "varlist"!="any" {
    - if "`type'"=="varlist" {
    = if "varlist"=="varlist" {
    - if "`su`i''" != "" {
    = if " *" != "" {
    - unabbrev `su`i''
    = unabbrev  *
      ------------------------------------------------------ begin unabbrev ---
      - version 6
      - sret clear
      - gettoken list1 0 : 0
      - local 0 `"`list1' `0'"'
      = local 0 `"* "'
      - syntax varlist [, min(string) max(string)]
      - sret local varlist `varlist'
      = sret local varlist county town village superdist cendist dwellnum unit 
> fileid individ houseid sex relate age after birthyear lateyear nation localit
> y formres locality2 marstat student educ major health healthprob employed une
> mpres head industry occup empstat workstudy wsloc locality3 moneysource over6
> 5 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednu
> m housetype PA088 village2 county2 batchid runid FILLER
      - sret local k : word count `varlist'
      = sret local k : word count county town village superdist cendist dwellnu
> m unit fileid individ houseid sex relate age after birthyear lateyear nation 
> locality formres locality2 marstat student educ major health healthprob emplo
> yed unempres head industry occup empstat workstudy wsloc locality3 moneysourc
> e over65 residtype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num dis
> ablednum housetype PA088 village2 county2 batchid runid FILLER
      - global S_1 "`varlist'"
      = global S_1 "county town village superdist cendist dwellnum unit fileid 
> individ houseid sex relate age after birthyear lateyear nation locality formr
> es locality2 marstat student educ major health healthprob employed unempres h
> ead industry occup empstat workstudy wsloc locality3 moneysource over65 resid
> type ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum house
> type PA088 village2 county2 batchid runid FILLER"
      - global S_2 `s(k)'
      = global S_2 53
      - if "`min'"=="" & "`max'"=="" { exit }
      = if ""=="" & ""=="" { exit }
      -------------------------------------------------------- end unabbrev ---
    - local thesu "`s(varlist)'"
    = local thesu "county town village superdist cendist dwellnum unit fileid i
> ndivid houseid sex relate age after birthyear lateyear nation locality formre
> s locality2 marstat student educ major health healthprob employed unempres he
> ad industry occup empstat workstudy wsloc locality3 moneysource over65 residt
> ype ownhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum houset
> ype PA088 village2 county2 batchid runid FILLER"
    - }
    - else local thesu
    - }
    - else if "`type'"=="numlist" {
    = else if "varlist"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
    - else if "`type'"=="newlist" {
    = else if "varlist"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
    - else {
      di in red "type `type' not yet implemented"
      exit 198
      }
    - parse "`thesu'", parse(" ")
    = parse "county town village superdist cendist dwellnum unit fileid individ
>  houseid sex relate age after birthyear lateyear nation locality formres loca
> lity2 marstat student educ major health healthprob employed unempres head ind
> ustry occup empstat workstudy wsloc locality3 moneysource over65 residtype ow
> nhouse qtype hhsize hhrel hhrelu6 hhrelu18 over65num disablednum housetype PA
> 088 village2 county2 batchid runid FILLER", parse(" ")
    - local su`i'
    = local su1
    - local j 1
    - while "``j''" != "" {
    = while "county" != "" {
    - local su`i'`j' "``j''"
    = local su11 "county"
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while "``j''" != "" {
    = while "town" != "" {
    - local su`i'`j' "``j''"
    = local su12 "town"
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while "``j''" != "" {
    = while "village" != "" {
    - local su`i'`j' "``j''"
    = local su13 "village"
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while "``j''" != "" {
    = while "superdist" != "" {
    - local su`i'`j' "``j''"
    = local su14 "superdist"
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while "``j''" != "" {
    = while "cendist" != "" {
    - local su`i'`j' "``j''"
    = local su15 "cendist"
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while "``j''" != "" {
    = while "dwellnum" != "" {
    - local su`i'`j' "``j''"
    = local su16 "dwellnum"
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while "``j''" != "" {
    = while "unit" != "" {
    - local su`i'`j' "``j''"
    = local su17 "unit"
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while "``j''" != "" {
    = while "fileid" != "" {
    - local su`i'`j' "``j''"
    = local su18 "fileid"
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while "``j''" != "" {
    = while "individ" != "" {
    - local su`i'`j' "``j''"
    = local su19 "individ"
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while "``j''" != "" {
    = while "houseid" != "" {
    - local su`i'`j' "``j''"
    = local su110 "houseid"
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while "``j''" != "" {
    = while "sex" != "" {
    - local su`i'`j' "``j''"
    = local su111 "sex"
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while "``j''" != "" {
    = while "relate" != "" {
    - local su`i'`j' "``j''"
    = local su112 "relate"
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while "``j''" != "" {
    = while "age" != "" {
    - local su`i'`j' "``j''"
    = local su113 "age"
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while "``j''" != "" {
    = while "after" != "" {
    - local su`i'`j' "``j''"
    = local su114 "after"
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while "``j''" != "" {
    = while "birthyear" != "" {
    - local su`i'`j' "``j''"
    = local su115 "birthyear"
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while "``j''" != "" {
    = while "lateyear" != "" {
    - local su`i'`j' "``j''"
    = local su116 "lateyear"
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while "``j''" != "" {
    = while "nation" != "" {
    - local su`i'`j' "``j''"
    = local su117 "nation"
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while "``j''" != "" {
    = while "locality" != "" {
    - local su`i'`j' "``j''"
    = local su118 "locality"
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while "``j''" != "" {
    = while "formres" != "" {
    - local su`i'`j' "``j''"
    = local su119 "formres"
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while "``j''" != "" {
    = while "locality2" != "" {
    - local su`i'`j' "``j''"
    = local su120 "locality2"
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while "``j''" != "" {
    = while "marstat" != "" {
    - local su`i'`j' "``j''"
    = local su121 "marstat"
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while "``j''" != "" {
    = while "student" != "" {
    - local su`i'`j' "``j''"
    = local su122 "student"
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while "``j''" != "" {
    = while "educ" != "" {
    - local su`i'`j' "``j''"
    = local su123 "educ"
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while "``j''" != "" {
    = while "major" != "" {
    - local su`i'`j' "``j''"
    = local su124 "major"
    - local j = `j' + 1
    = local j = 24 + 1
    - }
    - while "``j''" != "" {
    = while "health" != "" {
    - local su`i'`j' "``j''"
    = local su125 "health"
    - local j = `j' + 1
    = local j = 25 + 1
    - }
    - while "``j''" != "" {
    = while "healthprob" != "" {
    - local su`i'`j' "``j''"
    = local su126 "healthprob"
    - local j = `j' + 1
    = local j = 26 + 1
    - }
    - while "``j''" != "" {
    = while "employed" != "" {
    - local su`i'`j' "``j''"
    = local su127 "employed"
    - local j = `j' + 1
    = local j = 27 + 1
    - }
    - while "``j''" != "" {
    = while "unempres" != "" {
    - local su`i'`j' "``j''"
    = local su128 "unempres"
    - local j = `j' + 1
    = local j = 28 + 1
    - }
    - while "``j''" != "" {
    = while "head" != "" {
    - local su`i'`j' "``j''"
    = local su129 "head"
    - local j = `j' + 1
    = local j = 29 + 1
    - }
    - while "``j''" != "" {
    = while "industry" != "" {
    - local su`i'`j' "``j''"
    = local su130 "industry"
    - local j = `j' + 1
    = local j = 30 + 1
    - }
    - while "``j''" != "" {
    = while "occup" != "" {
    - local su`i'`j' "``j''"
    = local su131 "occup"
    - local j = `j' + 1
    = local j = 31 + 1
    - }
    - while "``j''" != "" {
    = while "empstat" != "" {
    - local su`i'`j' "``j''"
    = local su132 "empstat"
    - local j = `j' + 1
    = local j = 32 + 1
    - }
    - while "``j''" != "" {
    = while "workstudy" != "" {
    - local su`i'`j' "``j''"
    = local su133 "workstudy"
    - local j = `j' + 1
    = local j = 33 + 1
    - }
    - while "``j''" != "" {
    = while "wsloc" != "" {
    - local su`i'`j' "``j''"
    = local su134 "wsloc"
    - local j = `j' + 1
    = local j = 34 + 1
    - }
    - while "``j''" != "" {
    = while "locality3" != "" {
    - local su`i'`j' "``j''"
    = local su135 "locality3"
    - local j = `j' + 1
    = local j = 35 + 1
    - }
    - while "``j''" != "" {
    = while "moneysource" != "" {
    - local su`i'`j' "``j''"
    = local su136 "moneysource"
    - local j = `j' + 1
    = local j = 36 + 1
    - }
    - while "``j''" != "" {
    = while "over65" != "" {
    - local su`i'`j' "``j''"
    = local su137 "over65"
    - local j = `j' + 1
    = local j = 37 + 1
    - }
    - while "``j''" != "" {
    = while "residtype" != "" {
    - local su`i'`j' "``j''"
    = local su138 "residtype"
    - local j = `j' + 1
    = local j = 38 + 1
    - }
    - while "``j''" != "" {
    = while "ownhouse" != "" {
    - local su`i'`j' "``j''"
    = local su139 "ownhouse"
    - local j = `j' + 1
    = local j = 39 + 1
    - }
    - while "``j''" != "" {
    = while "qtype" != "" {
    - local su`i'`j' "``j''"
    = local su140 "qtype"
    - local j = `j' + 1
    = local j = 40 + 1
    - }
    - while "``j''" != "" {
    = while "hhsize" != "" {
    - local su`i'`j' "``j''"
    = local su141 "hhsize"
    - local j = `j' + 1
    = local j = 41 + 1
    - }
    - while "``j''" != "" {
    = while "hhrel" != "" {
    - local su`i'`j' "``j''"
    = local su142 "hhrel"
    - local j = `j' + 1
    = local j = 42 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu6" != "" {
    - local su`i'`j' "``j''"
    = local su143 "hhrelu6"
    - local j = `j' + 1
    = local j = 43 + 1
    - }
    - while "``j''" != "" {
    = while "hhrelu18" != "" {
    - local su`i'`j' "``j''"
    = local su144 "hhrelu18"
    - local j = `j' + 1
    = local j = 44 + 1
    - }
    - while "``j''" != "" {
    = while "over65num" != "" {
    - local su`i'`j' "``j''"
    = local su145 "over65num"
    - local j = `j' + 1
    = local j = 45 + 1
    - }
    - while "``j''" != "" {
    = while "disablednum" != "" {
    - local su`i'`j' "``j''"
    = local su146 "disablednum"
    - local j = `j' + 1
    = local j = 46 + 1
    - }
    - while "``j''" != "" {
    = while "housetype" != "" {
    - local su`i'`j' "``j''"
    = local su147 "housetype"
    - local j = `j' + 1
    = local j = 47 + 1
    - }
    - while "``j''" != "" {
    = while "PA088" != "" {
    - local su`i'`j' "``j''"
    = local su148 "PA088"
    - local j = `j' + 1
    = local j = 48 + 1
    - }
    - while "``j''" != "" {
    = while "village2" != "" {
    - local su`i'`j' "``j''"
    = local su149 "village2"
    - local j = `j' + 1
    = local j = 49 + 1
    - }
    - while "``j''" != "" {
    = while "county2" != "" {
    - local su`i'`j' "``j''"
    = local su150 "county2"
    - local j = `j' + 1
    = local j = 50 + 1
    - }
    - while "``j''" != "" {
    = while "batchid" != "" {
    - local su`i'`j' "``j''"
    = local su151 "batchid"
    - local j = `j' + 1
    = local j = 51 + 1
    - }
    - while "``j''" != "" {
    = while "runid" != "" {
    - local su`i'`j' "``j''"
    = local su152 "runid"
    - local j = `j' + 1
    = local j = 52 + 1
    - }
    - while "``j''" != "" {
    = while "FILLER" != "" {
    - local su`i'`j' "``j''"
    = local su153 "FILLER"
    - local j = `j' + 1
    = local j = 53 + 1
    - }
    - while "``j''" != "" {
    = while "" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
    - local j = `j' - 1
    = local j = 54 - 1
    - }
    - if `i'>1 {
    = if 1>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
    - else local nj `j'
    = else local nj 53
    - if `"`su'"' == "\" {
    = if `""' == "\" {
      gettoken su for: for
      }
    - }
    - while `"`su'"' != "" & `"`su'"'!="," {
    = while `""' != "" & `""'!="," {
      local i = `i' + 1
      if `i' > 9 {
      di in red "too many lists"
      exit 198
      }
      gettoken in: for, parse(" ,")
      if `"`in'"' == "in" {
      local from`i' "`su'"
      gettoken in for: for, parse(" ,")
      gettoken su for: for, parse(" ,")
      }
      else local from`i' = substr("XYZABCDEF",`i',1)
      GetType `"`su'"'
      local type "`r(type)'"
      local j 0
      gettoken su for: for, parse(" ,")
      while `"`su'"'!="" & `"`su'"' != "\" & `"`su'"'!="," {
      if "`type'" =="any" {
      local j = `j' + 1
      local su`i'`j' `"`su'"'
      }
      else local su`i' `"`su`i'' `su'"'
      gettoken su for: for, parse(" ,")
      }
      if "`type'"!="any" {
      if "`type'"=="varlist" {
      if "`su`i''" != "" {
      unabbrev `su`i''
      local thesu "`s(varlist)'"
      }
      else local thesu
      }
      else if "`type'"=="numlist" {
      numlist "`su`i''", min(0)
      local thesu "`r(numlist)'"
      }
      else if "`type'"=="newlist" {
      Fixnew `su`i''
      local thesu "`r(newlist)'"
      }
      else {
      di in red "type `type' not yet implemented"
      exit 198
      }
      parse "`thesu'", parse(" ")
      local su`i'
      local j 1
      while "``j''" != "" {
      local su`i'`j' "``j''"
      local j = `j' + 1
      }
      local j = `j' - 1
      }
      if `i'>1 {
      if `j' != `nj' {
      di in red "lists have unequal number of elements"
      exit 198
      }
      }
      else local nj `j'
      if `"`su'"' == "\" {
      gettoken su for: for
      }
      }
    - local ni `i'
    = local ni 1
    - local in
    - local options "Dryrun noHeader noStop Pause"
    - parse `", `for'"'
    = parse `", "'
    - if "`pause'"!="" {
    = if ""!="" {
      local pause more
      }
    - if "`header'"=="noheader" {
    = if ""=="noheader" {
      local qq *
      }
    - if "`dryrun'" != "" {
    = if "" != "" {
      local xeq "*"
      local stop
      }
    - local todo `"`cmd'"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
    = local todo : subinstr local todo `"X"' `"county"', all count(local c)
    - if `c'==0 {
    = if 2==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'1'"', all count(lo
> cal c)
      if `c'==0 {
      di in red `"`from`i'' not in command"'
      exit 198
      }
      local i = `i' + 1
      }
    - local ncmd 1
    - gettoken piece cmd: cmd, parse(" \") quotes
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"label"'!="\" & `"label"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"values"'!="\" & `"values"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `"X"'!="\" & `"X"'!="" {
    - local cmd1 `"`cmd1' `piece'"'
    = local cmd1 `" label values X X"'
    - gettoken piece cmd: cmd, parse(" \") quotes
    - }
    - while `"`piece'"'!="\" & `"`piece'"'!="" {
    = while `""'!="\" & `""'!="" {
      local cmd1 `"`cmd1' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
    - while `"`piece'"' == "\" {
    = while `""' == "\" {
      local ncmd = `ncmd' + 1
      gettoken piece cmd: cmd, parse(" \") quotes
      while `"`piece'"'!="\" & `"`piece'"'!="" {
      local cmd`ncmd' `"`cmd`ncmd'' `piece'"'
      gettoken piece cmd: cmd, parse(" \") quotes
      }
      }
    - if `"`piece'"' != "" {
    = if `""' != "" {
      error 198
      }
    - local version = string(_caller())
    - local j 1
    - while `j' <= `nj' {
    = while 1 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"county"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values county county"'

->  label values county county
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values county county
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 1 + 1
    - }
    - while `j' <= `nj' {
    = while 2 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"town"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values town town"'

->  label values town town
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values town town
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 2 + 1
    - }
    - while `j' <= `nj' {
    = while 3 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"village"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values village village"'

->  label values village village
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values village village
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 3 + 1
    - }
    - while `j' <= `nj' {
    = while 4 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"superdist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values superdist superdist"'

->  label values superdist superdist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values superdist superdist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 4 + 1
    - }
    - while `j' <= `nj' {
    = while 5 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"cendist"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values cendist cendist"'

->  label values cendist cendist
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values cendist cendist
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 5 + 1
    - }
    - while `j' <= `nj' {
    = while 6 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"dwellnum"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values dwellnum dwellnum"'

->  label values dwellnum dwellnum
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values dwellnum dwellnum
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 6 + 1
    - }
    - while `j' <= `nj' {
    = while 7 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"unit"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values unit unit"'

->  label values unit unit
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values unit unit
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 7 + 1
    - }
    - while `j' <= `nj' {
    = while 8 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"fileid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values fileid fileid"'

->  label values fileid fileid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values fileid fileid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 8 + 1
    - }
    - while `j' <= `nj' {
    = while 9 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"individ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values individ individ"'

->  label values individ individ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values individ individ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 9 + 1
    - }
    - while `j' <= `nj' {
    = while 10 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"houseid"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values houseid houseid"'

->  label values houseid houseid
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values houseid houseid
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 10 + 1
    - }
    - while `j' <= `nj' {
    = while 11 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"sex"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values sex sex"'

->  label values sex sex
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values sex sex
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 11 + 1
    - }
    - while `j' <= `nj' {
    = while 12 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"relate"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values relate relate"'

->  label values relate relate
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values relate relate
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 12 + 1
    - }
    - while `j' <= `nj' {
    = while 13 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"age"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values age age"'

->  label values age age
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values age age
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 13 + 1
    - }
    - while `j' <= `nj' {
    = while 14 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"after"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values after after"'

->  label values after after
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values after after
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 14 + 1
    - }
    - while `j' <= `nj' {
    = while 15 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"birthyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values birthyear birthyear"'

->  label values birthyear birthyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values birthyear birthyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 15 + 1
    - }
    - while `j' <= `nj' {
    = while 16 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"lateyear"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values lateyear lateyear"'

->  label values lateyear lateyear
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values lateyear lateyear
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 16 + 1
    - }
    - while `j' <= `nj' {
    = while 17 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"nation"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values nation nation"'

->  label values nation nation
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values nation nation
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 17 + 1
    - }
    - while `j' <= `nj' {
    = while 18 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality locality"'

->  label values locality locality
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality locality
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 18 + 1
    - }
    - while `j' <= `nj' {
    = while 19 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"formres"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values formres formres"'

->  label values formres formres
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values formres formres
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 19 + 1
    - }
    - while `j' <= `nj' {
    = while 20 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"locality2"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values locality2 locality2"'

->  label values locality2 locality2
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values locality2 locality2
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 20 + 1
    - }
    - while `j' <= `nj' {
    = while 21 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"marstat"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values marstat marstat"'

->  label values marstat marstat
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values marstat marstat
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 21 + 1
    - }
    - while `j' <= `nj' {
    = while 22 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"student"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values student student"'

->  label values student student
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values student student
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 22 + 1
    - }
    - while `j' <= `nj' {
    = while 23 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"educ"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values educ educ"'

->  label values educ educ
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label values educ educ
    - }
    - `pause'
    = 
    - local c = `c' + 1
    = local c = 1 + 1
    - }
    - while `c' <= `ncmd' {
    = while 2 <= 1 {
      local todo `"`cmd`c''"'
      local i 1
      while `i' <= `ni' {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
      `qq' di _n `"-> `todo'"'
      if "`stop'"=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
      else {
      version `version': `xeq' `todo'
      }
      `pause'
      local c = `c' + 1
      }
    - local j = `j' + 1
    = local j = 23 + 1
    - }
    - while `j' <= `nj' {
    = while 24 <= 53 {
    - local c 1
    - while `c' <= `ncmd' {
    = while 1 <= 1 {
    - local todo `"`cmd`c''"'
    = local todo `" label values X X"'
    - local i 1
    - while `i' <= `ni' {
    = while 1 <= 1 {
    - local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
    = local todo : subinstr local todo `"X"' `"major"', all
    - local i = `i' + 1
    = local i = 1 + 1
    - }
    - while `i' <= `ni' {
    = while 2 <= 1 {
      local todo : subinstr local todo `"`from`i''"' `"`su`i'`j''"', all
      local i = `i' + 1
      }
    - `qq' di _n `"-> `todo'"'
    =  di _n `"->  label values major major"'

->  label values major major
    - if "`stop'"=="nostop" {
    = if ""=="nostop" {
      version `version': capture noisily `todo'
      if _rc {
      if _rc==1 { exit 1 }
      di in ye "->  " in blue "r(" _rc "); "
      }
      }
    - else {
    - version `version': `xeq' `todo'
    = version 8.2:   label