Data Cart

Your data extract

0 variables
0 samples
View Cart

Codes and Frequencies



Loading Frequency Data...

Can't find the category you are looking for? Try the Detailed codes

Explore how IPUMS created this variable

Download


      class Chsurv : public Editor {

public:
  Chsurv(VarPointer varInfo) : Editor(varInfo) {}
  void edit() {

    long a = getRecoded();
    switch (dataSet) {
    case dataset_id::br1960a: {
      if (BR1960A_0402() == 1 || BR1960A_0402() == 3 || BR1960A_0402() == 5)
        a = 99;
    } break;
    case dataset_id::br1980a: {
      if (BR1980A_0455() < 98 && BR1980A_0456() < 98)
        a = BR1980A_0455() + BR1980A_0456();
      else
        a = 98;
      if (BR1980A_0455() == 99 && BR1980A_0456() == 99)
        a = 99;
      if (a > 30 && a < 98)
        a = 30;
    } break;
    case dataset_id::co1993a: {
      if (CO1993A_0432() < 98 && CO1993A_0433() < 98)
        a = CO1993A_0432() + CO1993A_0433();
      else
        a = 98;
      if (CO1993A_0432() == 99 && CO1993A_0433() == 99)
        a = 99;
      if (a > 30 && a < 98)
        a = 30;
    } break;
    case dataset_id::ke1989a: {
      if (KE1989A_0417() < 98 && KE1989A_0418() < 98 && KE1989A_0419() < 98 &&
          KE1989A_0420() < 98)
        a = KE1989A_0417() + KE1989A_0418() + KE1989A_0419() + KE1989A_0420();
      else
        a = 98;
      if (KE1989A_0417() == 99 && KE1989A_0418() == 99 &&
          KE1989A_0419() == 99 && KE1989A_0420() == 99)
        a = 99;
      if (a > 30 && a < 98)
        a = 30;
      if (a == 99 && KE1989A_0429() == 0)
        a = 0;
    } break;
    case dataset_id::vn1989a: {
      if (VN1989A_0421() < 98 && VN1989A_0422() < 98)
        a = VN1989A_0422() - VN1989A_0421();
      else
        a = 98;
      if (VN1989A_0421() == 99 && VN1989A_0421() == 99)
        a = 99;
      if (a > 30 && a < 98)
        a = 30;
      if (a < 0)
        a = 98;
    } break;
    case dataset_id::vn1999a: {
      if (VN1999A_0436() < 98 && VN1999A_0437() < 98)
        a = VN1999A_0437.getSourceDataAsLong() -
            VN1999A_0436.getSourceDataAsLong();
      else
        a = 98;
      if (VN1999A_0436() == 99 && VN1999A_0437() == 99)
        a = 99;
      if (a > 13 && a < 98)
        a = 13;
      if (a < 0)
        a = 98;
    } break;
    case dataset_id::kh1998a: {
      a = KH1998A_0422() + KH1998A_0423();
      if (a > 10)
        a = 10;
      if (KH1998A_0422() == 99 || KH1998A_0423() == 99)
        a = 99;
    } break;
    case dataset_id::ug2002a: {
      if (UG2002A_0490() == 99 || UG2002A_0491() == 99)
        a = 99;
      else
        a = UG2002A_0490.getSourceDataAsLong() +
            UG2002A_0491.getSourceDataAsLong();
      if (a > 18 && a != 99)
        a = 18;
    } break;
    case dataset_id::rw1991a: {
      a = 99;
      if (RW1991A_0430() < 98 && RW1991A_0431() < 98)
        a = RW1991A_0430() + RW1991A_0431();
      if (RW1991A_0430() == 98 || RW1991A_0431() == 98)
        a = 98;
    } break;
    case dataset_id::rw2002a: {
      a = 99;
      if (RW2002A_0431() < 98 && RW2002A_0432() < 98)
        a = RW2002A_0431() + RW2002A_0432();
      if (RW2002A_0431() == 98 || RW2002A_0432() == 98)
        a = 98;
    } break;
    case dataset_id::cn1990a: {
      a = CN1990A_0418() + CN1990A_0419();
      if (CN1990A_0418() == 9 || CN1990A_0419() == 9 || a > 9)
        a = 9;
      if (CN1990A_0418() == 99 || CN1990A_0419() == 99)
        a = 99;
    } break;
    case dataset_id::iq1997a: {
      a = IQ1997A_0414() + IQ1997A_0415();
      if (IQ1997A_0414() == 11 || IQ1997A_0415() == 11 || a > 11)
        a = 11;
      if (IQ1997A_0414() == 98 || IQ1997A_0415() == 98)
        a = 98;
      if (IQ1997A_0414() == 99 || IQ1997A_0415() == 99)
        a = 99;
    } break;
    case dataset_id::gn1996a: {
      a = GN1996A_0425() + GN1996A_0426();
      if (a > 10)
        a = 10;
      if (GN1996A_0425() == 98 || GN1996A_0426() == 98)
        a = 98;
      if (GN1996A_0425() == 99 || GN1996A_0426() == 99)
        a = 99;
    } break;
    case dataset_id::za2007a: {
      a = ZA2007A_0465() + ZA2007A_0468();
      if (a > 30)
        a = 30;
      if (ZA2007A_0465() == 99 || ZA2007A_0468() == 99)
        a = 99;
    } break;
    case dataset_id::np2001a: {
      a = NP2001A_0426() + NP2001A_0427() + NP2001A_0428() + NP2001A_0429();
      if (a > 30)
        a = 30;
      if (NP2001A_0426() == 98 || NP2001A_0427() == 98 ||
          NP2001A_0428() == 98 || NP2001A_0429() == 98)
        a = 98;
      if (NP2001A_0426() == 99)
        a = 99;
    } break;
    case dataset_id::pk1973a: {
      a = 99;
      if (PK1973A_0424() < 99 && PK1973A_0426() < 99)
        a = PK1973A_0424() + PK1973A_0426();
      if (a > 30 && a < 99)
        a = 30;
    } break;
    case dataset_id::sn2002a: {
      a = 99;
      if (SN2002A_0451() < 98 && SN2002A_0452() < 98)
        a = SN2002A_0451() + SN2002A_0452();
      if (a > 10 && a < 98)
        a = 10;
      if (SN2002A_0451() == 98 || SN2002A_0452() == 98)
        a = 98;
    } break;
    case dataset_id::tz1988a: {
      a = TZ1988A_0419() + TZ1988A_0420() + TZ1988A_0421() + TZ1988A_0430();
      if (a > 30)
        a = 30;
      if (TZ1988A_0419() == 98 || TZ1988A_0420() == 98 ||
          TZ1988A_0421() == 98 || TZ1988A_0430() == 98)
        a = 98;
      if (TZ1988A_0419() == 99)
        a = 99;
    } break;
    case dataset_id::kh2008a: {
      a = KH2008A_0431() + KH2008A_0432();
      if (a > 30)
        a = 30;
      if (KH2008A_0431() == 98 || KH2008A_0432() == 98)
        a = 98;
      if (KH2008A_0431() == 99)
        a = 99;
    } break;
    case dataset_id::ir2006a: {
      if (IR2006A_0436() < 98 && IR2006A_0437() < 98)
        a = IR2006A_0436() + IR2006A_0437();
      else
        a = 98;
      if (IR2006A_0433() != 1)
        a = 99;
    } break;
    case dataset_id::mw1987a: {
      a = MW1987A_0425() + MW1987A_0426();
      if (MW1987A_0425() == 99)
        a = 99;
    } break;
    case dataset_id::mw1998a: {
      a = MW1998A_0424() + MW1998A_0425();
      if (MW1998A_0424() == 99)
        a = 99;
    } break;
    case dataset_id::vn2009a: {
      a = VN2009A_0428() + VN2009A_0429();
      if (VN2009A_0428() == 98 || VN2009A_0429() == 98)
        a = 98;
      if (VN2009A_0428() == 99)
        a = 99;
    } break;
    case dataset_id::sv1992a: {
      a = SV1992A_0417() - SV1992A_0448();
      if (SV1992A_0417() == 98)
        a = 98;
      if (SV1992A_0417() == 99 || SV1992A_0448() == 99)
        a = 99;
      if (a < 0)
        a = 98;
    } break;
    case dataset_id::sv2007a: {
      a = SV2007A_0459() + SV2007A_0460() - SV2007A_0462();
      if (a > 12 && a < 98)
        a = 12;
      if (a < 0)
        a = 98;
      if (SV2007A_0459() == 98 || SV2007A_0460() == 98 || SV2007A_0462() == 98)
        a = 98;
      if (SV2007A_0459() == 99 || SV2007A_0460() == 99 || SV2007A_0462() == 99)
        a = 99;
    } break;
    case dataset_id::id1976a: {
      a = ID1976A_0456() - ID1976A_0459();
      if (a > 23 && a < 98)
        a = 23;
      if (ID1976A_0456() == 98 || ID1976A_0459() == 98)
        a = 98;
      if (ID1976A_0456() == 99 || ID1976A_0459() == 99)
        a = 99;
    } break;
    case dataset_id::id1995a: {
      a = ID1995A_0469() - ID1995A_0467() - ID1995A_0468();
      if (ID1995A_0469() == 99 || ID1995A_0467() == 99 || ID1995A_0468() == 99)
        a = 99;
    } break;
    case dataset_id::ma1982a: {
      a = MA1982A_0412() + MA1982A_0413();
      if (a > 10 && a < 99)
        a = 10;
      if (MA1982A_0412() == 99 || MA1982A_0413() == 99)
        a = 99;
    } break;
    case dataset_id::ma1994a: {
      a = MA1994A_0415() + MA1994A_0416() + MA1994A_0417();
      if (a > 10 && a < 98)
        a = 10;
      if (MA1994A_0415() == 98 || MA1994A_0416() == 98 || MA1994A_0417() == 98)
        a = 98;
      if (MA1994A_0415() == 99 || MA1994A_0416() == 99 || MA1994A_0417() == 99)
        a = 99;
    } break;
    case dataset_id::ma2004a: {
      a = MA2004A_0412() + MA2004A_0413();
      if (a > 13 && a < 98)
        a = 13;
      if (MA2004A_0412() == 98 || MA2004A_0413() == 98)
        a = 98;
      if (MA2004A_0412() == 99 || MA2004A_0413() == 99)
        a = 99;
    } break;
    case dataset_id::tr2000a: {
      a = TR2000A_0414() + TR2000A_0415();
      if (a > 10 && a < 98)
        a = 10;
      if (TR2000A_0414() == 98 || TR2000A_0415() == 98)
        a = 98;
      if (TR2000A_0414() == 99 || TR2000A_0415() == 99)
        a = 99;
    } break;
    case dataset_id::uy1985a: {
      a = UY1985A_0424() - UY1985A_0429();
      if (UY1985A_0424() == 98 || UY1985A_0429() == 98)
        a = 98;
      if (UY1985A_0424() == 99 || UY1985A_0429() == 99)
        a = 99;
    } break;
    case dataset_id::ht1982a: {
      if (HT1982A_0427() < 98 && HT1982A_0431() < 98)
        a = HT1982A_0427() - HT1982A_0431();
      else
        a = 98;
      if (HT1982A_0427() == 99 && HT1982A_0431() == 99)
        a = 99;
      if (a < 0)
        a = 98;
    } break;
    case dataset_id::bf1996a: {
      a = BF1996A_0429() + BF1996A_0428();
      if (BF1996A_0428() == 98 || BF1996A_0429() == 98)
        a = 98;
      if (BF1996A_0428() == 99 || BF1996A_0429() == 99)
        a = 99;
    } break;
    case dataset_id::bf2006a: {
      a = BF2006A_0432() + BF2006A_0433();
      if (BF2006A_0432() == 98 || BF2006A_0433() == 98)
        a = 98;
      if (BF2006A_0432() == 99 || BF2006A_0433() == 99)
        a = 99;
    } break;
    case dataset_id::do1981a: {
      a = 99;
      if (DO1981A_0451() > 0 && DO1981A_0451() < 98 &&
          (DO1981A_0452() > 0 && DO1981A_0452() < 98))
        a = DO1981A_0451() + DO1981A_0452() - DO1981A_0462() - DO1981A_0463();
      if (DO1981A_0451() > 0 && DO1981A_0451() < 98 && DO1981A_0452() == 0)
        a = DO1981A_0451() - DO1981A_0462();
      if (DO1981A_0452() > 0 && DO1981A_0452() < 98 && DO1981A_0451() == 0)
        a = DO1981A_0452() - DO1981A_0463();
      if (DO1981A_0451() == 98 || DO1981A_0452() == 98 ||
          DO1981A_0462() == 98 || DO1981A_0463() == 98)
        a = 98;
      if (a > 15 && a < 98)
        a = 15;
    } break;
    case dataset_id::ml2009a: {
      if (ML2009A_0438() < 98 && ML2009A_0439() < 98)
        a = ML2009A_0438() + ML2009A_0439();
      else
        a = 98;
      if (ML2009A_0438() == 99 && ML2009A_0439() == 99)
        a = 99;
      if (a > 12 && a < 98)
        a = 12;
    } break;
    case dataset_id::ng2006a: {
      if (NG2006A_0492() < 98 && NG2006A_0493() < 98 && NG2006A_0494() < 98 &&
          NG2006A_0495() < 98)
        a = NG2006A_0492() + NG2006A_0493() + NG2006A_0494() + NG2006A_0495();
      else
        a = 98;
      if (NG2006A_0492() == 99 && NG2006A_0493() == 99 &&
          NG2006A_0494() == 99 && NG2006A_0495() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::ng2007a: {
      if (NG2007A_0486() < 98 && NG2007A_0487() < 98 && NG2007A_0488() < 98 &&
          NG2007A_0489() < 98)
        a = NG2007A_0486() + NG2007A_0487() + NG2007A_0488() + NG2007A_0489();
      else
        a = 98;
      if (NG2007A_0486() == 99 && NG2007A_0487() == 99 &&
          NG2007A_0488() == 99 && NG2007A_0489() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::zm1990a: {
      if (ZM1990A_0436() < 99 && ZM1990A_0437() < 99 && ZM1990A_0438() < 9 &&
          ZM1990A_0439() < 9)
        a = ZM1990A_0436() + ZM1990A_0437() + ZM1990A_0438() + ZM1990A_0439();
      else
        a = 98;
      if (ZM1990A_0436() == 99 && ZM1990A_0437() == 99 && ZM1990A_0438() == 9 &&
          ZM1990A_0439() == 9)
        a = 99;
      if (ZM1990A_0432() == 2)
        a = 99;
      if (a > 9 && a < 98)
        a = 9;
    } break;
    case dataset_id::zm2010a: {
      if (ZM2010A_0456() < 99 && ZM2010A_0457() < 99 && ZM2010A_0458() < 99 &&
          ZM2010A_0459() < 99)
        a = ZM2010A_0456() + ZM2010A_0457() + ZM2010A_0458() + ZM2010A_0459();
      else
        a = 98;
      if (ZM2010A_0456() == 99 && ZM2010A_0457() == 99 &&
          ZM2010A_0458() == 99 && ZM2010A_0459() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::mz1997a: {
      if (MZ1997A_0446() < 98 && MZ1997A_0447() < 98)
        a = MZ1997A_0446() + MZ1997A_0447();
      if (MZ1997A_0446() == 98 || MZ1997A_0447() == 98)
        a = 98;
      if (MZ1997A_0446() == 0 && MZ1997A_0447() == 0 || MZ1997A_0446() == 99 ||
          MZ1997A_0447() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::mz2007a: {
      if (MZ2007A_0458() < 98 && MZ2007A_0459() < 98)
        a = MZ2007A_0458() + MZ2007A_0459();
      if (MZ2007A_0458() == 98 || MZ2007A_0459() == 98)
        a = 98;
      if (MZ2007A_0458() == 0 && MZ2007A_0459() == 0 || MZ2007A_0458() == 99 ||
          MZ2007A_0459() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::et1984a: {
      if (ET1984A_0422() >= 0 && ET1984A_0422() < 98 && ET1984A_0423() >= 0 &&
          ET1984A_0423() < 98 && ET1984A_0424() >= 0 && ET1984A_0424() < 98 &&
          ET1984A_0425() >= 0 && ET1984A_0425() < 98)
        a = ET1984A_0422() + ET1984A_0423() + ET1984A_0424() + ET1984A_0425();
      if (ET1984A_0422() == 98 || ET1984A_0423() == 98 ||
          ET1984A_0424() == 98 || ET1984A_0425() == 98)
        a = 98;
      if (ET1984A_0422() == 0 && ET1984A_0423() == 0 && ET1984A_0424() == 0 &&
          ET1984A_0425() == 0)
        a = 99;
      if (ET1984A_0422() == 99 || ET1984A_0423() == 99 ||
          ET1984A_0424() == 99 || ET1984A_0425() == 99)
        a = 99;
      if (a > 9 && a < 98)
        a = 9;
    } break;
    case dataset_id::et1994a: {
      if (ET1994A_0423() >= 0 && ET1994A_0423() < 98 && ET1994A_0424() >= 0 &&
          ET1994A_0424() < 98 && ET1994A_0425() >= 0 && ET1994A_0425() < 98 &&
          ET1994A_0426() >= 0 && ET1994A_0426() < 98)
        a = ET1994A_0423() + ET1994A_0424() + ET1994A_0425() + ET1994A_0426();
      if (ET1994A_0423() == 98 || ET1994A_0424() == 98 ||
          ET1994A_0425() == 98 || ET1994A_0426() == 98)
        a = 98;
      if (ET1994A_0423() == 0 && ET1994A_0424() == 0 && ET1994A_0425() == 0 &&
          ET1994A_0426() == 0)
        a = 99;
      if (ET1994A_0423() == 99 || ET1994A_0424() == 99 ||
          ET1994A_0425() == 99 || ET1994A_0426() == 99)
        a = 99;
      if (a > 8 && a < 98)
        a = 8;
    } break;
    case dataset_id::et2007a: {
      if (ET2007A_0424() >= 0 && ET2007A_0424() < 98 && ET2007A_0425() >= 0 &&
          ET2007A_0425() < 98 && ET2007A_0426() >= 0 && ET2007A_0426() < 98 &&
          ET2007A_0427() >= 0 && ET2007A_0427() < 98)
        a = ET2007A_0424() + ET2007A_0425() + ET2007A_0426() + ET2007A_0427();
      if (ET2007A_0424() == 98 || ET2007A_0425() == 98 ||
          ET2007A_0426() == 98 || ET2007A_0427() == 98)
        a = 98;
      if (ET2007A_0424() == 0 && ET2007A_0425() == 0 && ET2007A_0426() == 0 &&
          ET2007A_0427() == 0)
        a = 99;
      if (ET2007A_0424() == 99 || ET2007A_0425() == 99 ||
          ET2007A_0426() == 99 || ET2007A_0427() == 99)
        a = 99;
      if (a > 9 && a < 98)
        a = 9;
    } break;
    case dataset_id::py1982a: {
      if (PY1982A_0416() >= 0 && PY1982A_0416() < 98 && PY1982A_0419() >= 0 &&
          PY1982A_0419() < 98)
        a = PY1982A_0416() + PY1982A_0419();
      if (PY1982A_0416() == 98 || PY1982A_0419() == 98)
        a = 98;
      if (PY1982A_0416() == 0 && PY1982A_0419() == 0 && PY1982A_0422() == 0)
        a = 99;
      if (PY1982A_0416() == 99 || PY1982A_0419() == 99)
        a = 99;
      if (a > 8 && a < 98)
        a = 8;
    } break;
    case dataset_id::py1992a: {
      if (PY1992A_0434() >= 0 && PY1992A_0434() < 16 && PY1992A_0435() >= 0 &&
          PY1992A_0435() < 9)
        a = PY1992A_0434() - PY1992A_0435();
      if (PY1992A_0434() == 16 || PY1992A_0434() == 98 || PY1992A_0435() == 9 ||
          PY1992A_0435() == 98)
        a = 98;
      if (PY1992A_0434() == 0 || PY1992A_0434() == 99 || PY1992A_0435() == 99)
        a = 99;
      if (a < 0)
        a = 98;
    } break;
    case dataset_id::ir2011a: {
      if (IR2011A_0447() < 98 && IR2011A_0448() < 98)
        a = IR2011A_0447() + IR2011A_0448();
      if (IR2011A_0447() < 98 && IR2011A_0448() == 99)
        a = IR2011A_0447();
      if (IR2011A_0447() == 99 && IR2011A_0448() < 98)
        a = IR2011A_0448();
      if (IR2011A_0447() == 98 || IR2011A_0448() == 98)
        a = 98;
      if (IR2011A_0447() == 99 && IR2011A_0448() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::bw1981a: {
      if (BW1981A_0417() < 98 && BW1981A_0418() < 98)
        a = BW1981A_0417() + BW1981A_0418();
      else
        a = 98;
      if (BW1981A_0417() == 99 && BW1981A_0418() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::bw1991a: {
      if (BW1991A_0434() < 98 && BW1991A_0435() < 98)
        a = BW1991A_0434() + BW1991A_0435();
      else
        a = 98;
      if (BW1991A_0434() == 99 && BW1991A_0435() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::bw2001a: {
      if (BW2001A_0428() < 97 && BW2001A_0429() < 97 && BW2001A_0430() < 97 &&
          BW2001A_0431() < 97)
        a = BW2001A_0428() + BW2001A_0429() + BW2001A_0430() + BW2001A_0431();
      else
        a = 98;
      if (BW2001A_0428() == 99 && BW2001A_0429() == 99 &&
          BW2001A_0430() == 99 && BW2001A_0431() == 99)
        a = 99;
      if (a > 7 && a < 98)
        a = 7;
    } break;
    case dataset_id::bw2011a: {
      if (BW2011A_0486() < 98 && BW2011A_0487() < 98)
        a = BW2011A_0486() + BW2011A_0487();
      else
        a = 98;
      if (BW2011A_0486() == 99 && BW2011A_0487() == 99)
        a = 99;
      if (a > 10 && a < 98)
        a = 10;
    } break;
    case dataset_id::is1901a: {
      if (CHBORN() == 99 | CHBORN() == 0)
        a = 99;
    } break;
    case dataset_id::is1910a: {
      if (CHBORN() == 99 | CHBORN() == 0)
        a = 99;
    } break;
    case dataset_id::uk1911a: {
      if (CHBORN() == 99 | CHBORN() == 0)
        a = 99;
    } break;
    case dataset_id::uy1985x: {
      a = UY1985X_0424() - UY1985X_0429();
      if (UY1985X_0424() == 98 || UY1985X_0429() == 98)
        a = 98;
      if (UY1985X_0424() == 99 || UY1985X_0429() == 99)
        a = 99;
      if (a < 0)
        a = 0;
    } break;
    case dataset_id::bj1992a: {
      if (BJ1992A_0429() < 98 && BJ1992A_0430() < 98)
        a = BJ1992A_0429() + BJ1992A_0430();
      if (BJ1992A_0429() == 9 || BJ1992A_0430() == 9 || a > 9)
        a = 9;
      if (BJ1992A_0429() == 98 || BJ1992A_0430() == 98)
        a = 98;
      if (BJ1992A_0429() == 99 || BJ1992A_0430() == 99)
        a = 99;
    } break;
    case dataset_id::hn1974a: {
      if (HN1974A_0423() < 98 && HN1974A_0424() < 98)
        a = HN1974A_0423() + HN1974A_0424();
      if (HN1974A_0423() == 12 || HN1974A_0424() == 12 || a > 12)
        a = 12;
      if (HN1974A_0423() == 98 || HN1974A_0424() == 98)
        a = 98;
      if (HN1974A_0423() == 99 || HN1974A_0424() == 99)
        a = 99;
    } break;
    case dataset_id::ls1996a: {
      if (LS1996A_0427() < 99 && LS1996A_0428() < 99 && LS1996A_0429() < 99 &&
          LS1996A_0430() < 99)
        a = LS1996A_0427() + LS1996A_0428() + LS1996A_0429() + LS1996A_0430();
      if (a > 7 && a < 98)
        a = 7;
      if (LS1996A_0427() == 99 && LS1996A_0428() == 99 &&
          LS1996A_0429() == 99 && LS1996A_0430() == 99)
        a = 99;
    } break;
    case dataset_id::pg1980a: {
      if (PG1980A_0442() < 8 && PG1980A_0443() < 8 && PG1980A_0444() < 8 &&
          PG1980A_0445() < 8)
        a = PG1980A_0444() + PG1980A_0445() + PG1980A_0442() + PG1980A_0443();
      if (a > 5 && a < 23)
        a = 5;
      if (PG1980A_0442() == 8 || PG1980A_0443() == 8 || PG1980A_0444() == 8 ||
          PG1980A_0445() == 8)
        a = 98;
      if (PG1980A_0442() == 9 && PG1980A_0443() == 9 && PG1980A_0444() == 9 &&
          PG1980A_0445() == 9)
        a = 99;
    } break;
    case dataset_id::pg2000a: {
      if (PG2000A_0432() < 98 && PG2000A_0433() < 98 && PG2000A_0434() < 98 &&
          PG2000A_0435() < 98)
        a = PG2000A_0432() + PG2000A_0433() + PG2000A_0434() + PG2000A_0435();
      if (a > 7 && a < 98)
        a = 7;
      if (PG2000A_0432() == 98 || PG2000A_0433() == 98 ||
          PG2000A_0434() == 98 || PG2000A_0435() == 98)
        a = 98;
      if (PG2000A_0432() == 99 && PG2000A_0433() == 99 &&
          PG2000A_0434() == 99 && PG2000A_0435() == 99)
        a = 99;
    } break;
    case dataset_id::rw2012a: {
      if (RW2012A_0453() < 98 && RW2012A_0454() < 98)
        a = RW2012A_0453() + RW2012A_0454();
      if (RW2012A_0453() == 10 || RW2012A_0454() == 10 || a > 10)
        a = 10;
      if (RW2012A_0453() == 98 || RW2012A_0454() == 98)
        a = 98;
      if (RW2012A_0453() == 99 || RW2012A_0454() == 99)
        a = 99;
    } break;
    case dataset_id::zw2012a: {
      a = 98;
      if (ZW2012A_0440() < 98 && ZW2012A_0441() < 98 && ZW2012A_0442() < 98 &&
          ZW2012A_0443() < 98)
        a = ZW2012A_0440() + ZW2012A_0441() + ZW2012A_0442() + ZW2012A_0443();
      if (a > 6 && a < 98)
        a = 6;
      if (ZW2012A_0440() == 98 || ZW2012A_0441() == 98 ||
          ZW2012A_0442() == 98 || ZW2012A_0443() == 98)
        a = 98;
      if (ZW2012A_0440() == 99 && ZW2012A_0441() == 99 &&
          ZW2012A_0442() == 99 && ZW2012A_0443() == 99)
        a = 99;
    } break;
    case dataset_id::kh2004a: {
      a = KH2004A_0429() + KH2004A_0430();
      if (a > 8)
        a = 8;
      if (KH2004A_0429() == 99 || KH2004A_0430() == 99)
        a = 99;
    } break;
    case dataset_id::kh2013a: {
      a = KH2013A_0443() + KH2013A_0444();
      if (a > 8)
        a = 8;
      if (KH2013A_0443() == 99 || KH2013A_0444() == 99)
        a = 99;
    } break;
    case dataset_id::la2005a: {
      a = LA2005A_0424() + LA2005A_0425() + LA2005A_0426() + LA2005A_0427();
      if (a > 5)
        a = 5;
      if (LA2005A_0424() == 99 || LA2005A_0425() == 99 ||
          LA2005A_0426() == 99 || LA2005A_0427() == 99)
        a = 99;
    } break;
    case dataset_id::np2011a: {
      a = NP2011A_0430() + NP2011A_0431() + NP2011A_0432() + NP2011A_0433();
      if (a > 6)
        a = 6;
      if (NP2011A_0430() == 99 || NP2011A_0431() == 99 ||
          NP2011A_0432() == 99 || NP2011A_0433() == 99)
        a = 99;
    } break;
    case dataset_id::tg1960a: {
      a = TG1960A_0416() + TG1960A_0417();
      if (TG1960A_0406() == 1 || TG1960A_0408() < 10)
        a = 99;
    } break;
    case dataset_id::mm2014a: {
      if (MM2014A_0431() < 99 && MM2014A_0432() < 99 && MM2014A_0433() < 99 &&
          MM2014A_0434() < 99)
        a = MM2014A_0431() + MM2014A_0432() + MM2014A_0433() + MM2014A_0434();
      if (MM2014A_0431() == 99 && MM2014A_0432() == 99 &&
          MM2014A_0433() == 99 && MM2014A_0434() == 99)
        a = 99;
      if (a > 9 && a < 99)
        a = 9;
    } break;
    case dataset_id::sr2004a: {
      if (SR2004A_0413() < 98 && SR2004A_0414() < 98)
        a = SR2004A_0413() + SR2004A_0414();
      else
        a = 98;
      if (SR2004A_0413() == 99 && SR2004A_0414() == 99)
        a = 99;
      if (a > 7 && a < 98)
        a = 7;
    } break;
    case dataset_id::sn2013a: {
      if (SN2013A_0487() < 99 && SN2013A_0488() < 99)
        a = SN2013A_0487() + SN2013A_0488();
      if (SN2013A_0487() == 99 && SN2013A_0488() == 99)
        a = 99;
      if (a > 10 && a < 99)
        a = 10;
    } break;
    case dataset_id::kh2019a: {
      a = KH2019A_0447() + KH2019A_0448();
      if (a > 10)
        a = 10;
      if (KH2019A_0447() == 98 || KH2019A_0447() == 98)
        a = 98;
      if (KH2019A_0447() == 99 || KH2019A_0448() == 99)
        a = 99;
    } break;
    case dataset_id::la1995a: {
      a = LA1995A_0426() + LA1995A_0427() + LA1995A_0428() + LA1995A_0429();
      if (a > 5)
        a = 5;
      if (LA1995A_0426() == 98 || LA1995A_0427() == 98 ||
          LA1995A_0428() == 98 || LA1995A_0429() == 98)
        a = 98;
      if (LA1995A_0426() == 99 || LA1995A_0427() == 99 ||
          LA1995A_0428() == 99 || LA1995A_0429() == 99)
        a = 99;
    } break;
    case dataset_id::la2015a: {
      a = LA2015A_0440() + LA2015A_0441() + LA2015A_0442() + LA2015A_0443();
      if (a > 6)
        a = 6;
      if (LA2015A_0440() == 98 || LA2015A_0441() == 98 ||
          LA2015A_0442() == 98 || LA2015A_0443() == 98)
        a = 98;
      if (LA2015A_0440() == 99 || LA2015A_0441() == 99 ||
          LA2015A_0442() == 99 || LA2015A_0443() == 99)
        a = 99;
    } break;
    case dataset_id::vn2019a: {
      a = VN2019A_0459() + VN2019A_0460() + VN2019A_0461() + VN2019A_0462();
      if (a > 5)
        a = 5;
      if (VN2019A_0459() == 98 || VN2019A_0460() == 98 ||
          VN2019A_0461() == 98 || VN2019A_0462() == 98)
        a = 98;
      if (VN2019A_0459() == 99 || VN2019A_0460() == 99 ||
          VN2019A_0461() == 99 || VN2019A_0462() == 99)
        a = 99;
    } break;
    }
    if (a == 0 && CHBORN() == 0)
      a = 99;
    if (a > 30 && a != 99)
      a = 98;

    setData(a);
  }
};