{ ************************************************************************* }
  { Table 6.2 - part 2 of 2 (women) and Table 6.3.1 }

  { Generic logic to determine age at first *marriage* for NFHS-4 }
  if S308C in 500:1500 then
    v511x = int((S308C - V011) / 12);
  elseif S309 in 0:96 then
    v511x = S309;
  else
    v511x = notappl;
  endif;
  recode v511x => T602Col;
          <15  => 1;    { Thus marriage dates before birth are included }
         15-17 => 2;
         18-19 => 3;
           20  => 4;
         21-24 => 5;
               => default;
  endrecode;
  NevrMar = (V501 = 0);

  xtab(T602, rweight);

  { Marriage }
  if v511x = notappl | v511x > 30 then
    MedAcum = 30;
  elseif v511x < 8 then
    MedAcum = 8;
  else    
    MedAcum = v511x;
  endif;
  xtab(T602m1, rweight);
  if V012 >= 20 then
    xtab(T6031m, rweight);
  endif;

  { Cohabitation (= DHS marriage) }
  if V511 = notappl | V511 > 30 then
    MedAcum = 30;
  elseif V511 < 8 then
    MedAcum = 8;
  else    
    MedAcum = V511;
  endif;
  xtab(T602m2, rweight);