{ ************************************************************************* }
  { Table 9.18 and Table 9.19 }

      T918ColA = default;
      T918ColB = default;
      T918ColC = default;

      if S556 in 1:4 | S558 = 1 | S557 in 1,2 | S559 in 1,2 | S560 in 1:3 then
        T918ColA = 1;
        xtab(T918, rweight);
        xtab(T919, rweight);
        T918ColA = default;
      endif;

      if S556 in 1:4 then
        T918ColB = 1;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;
      if S558 = 1 then
        T918ColB = 2;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;
      if S557 in 1,2 then
        T918ColB = 3;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;

      T918ColB = 4;
      xtab(T918, rweight);
      xtab(T919, rweight);

      if months in 36:71 then
        if S559 in 1,2 then
          T918ColB = 5;
          xtab(T918, rweight);
          xtab(T919, rweight);
        endif;
        T918ColB = 6;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;

      if months in 0:59 then
        if S560 in 1:3 then
          T918ColB = 7;
          xtab(T918, rweight);
          xtab(T919, rweight);
        endif;
        T918ColB = 8;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;
      T918ColB = default;

      if months in 0:59 & S560 in 1:3 then
        if S561 = 1 then
          T918ColC = 1;
          xtab(T918, rweight);
          xtab(T919, rweight);
        endif;
        T918ColC = 2;
        xtab(T918, rweight);
        xtab(T919, rweight);
      endif;

  { ************************************************************************* }