Закрепить строку и столбец в таблице на странице

function funcFixTable ()
{
if (document.readyState != 'complete') {TMR = setTimeout (funcFixTable, 10); return}
if (self.TMR) clearTimeout (TMR);
 
var doc = document,
    tbl = doc.getElementsByTagName ('TABLE') [0],
    fCs = tbl.getAttribute ('colsfix'),
    fRs = tbl.getAttribute ('rowsfix');
 
if (!fCs && !fRs) return; 
 
var bod = doc.body,
    tCL = tbl.cloneNode (1);
with (tCL.style)
   position = 'relative',
   visibility = 'visible';
bod.scrollTop = bod.scrollLeft = 0;
 
var t = l = 0; while (tbl.offsetParent)
   l += tbl.offsetLeft, t += tbl.offsetTop, tbl = tbl.offsetParent;
 
with (tCL)
   style.margin = t + 'px ' + l + 'px',
   removeAttribute ('rowsfix'),
   removeAttribute ('colsfix'); 
 
with (bod.style) overflow = 'hidden', margin = padding = 0;
 
with (bod)
   {
   var bcH = clientHeight,
       bcW = clientWidth; 
   removeChild (doc.getElementsByTagName ('TABLE') [0]);
   }
 
var div = doc.createElement ('DIV');
var mcs  = 'position: relative; background-color: white; overflow: scroll; width: ';
    mcs += bcW + 'px; height: ' + bcH + 'px; top: 0; left: 0; z-index: 233';
div.style.cssText = mcs;
 
var nTB = div.appendChild (tCL),
    sDV = bod.appendChild (div),
    dcW = sDV.clientWidth,
    dcH = sDV.clientHeight;
 
if (fRs) 
   {
   var h = 0, obj = nTB.rows [fRs];
   while (obj != nTB.offsetParent) h += obj.offsetTop, obj = obj.offsetParent;
 
   var div = doc.createElement ('DIV'),
       mcs  = 'background-color: white; position: absolute; top: 0; left: 0; ';
       mcs += 'overflow: hidden; width: ' + dcW + 'px; height: ' + h + 'px; z-index: 234';
   div.style.cssText = mcs; div.id = 'mROW'; sDV.ddddd = 1;
 
   var z = nTB.cloneNode (1); z.style.marginTop = t + 'px';
   div.appendChild (z);
   bod.appendChild (div);
   }
 
if (fCs) 
   {
   var w = 0, obj = nTB.rows [0].cells [fCs];
   while (obj != nTB.offsetParent) w += obj.offsetLeft, obj = obj.offsetParent;
   var div = doc.createElement ('DIV'),
       mcs  = 'background-color: white; position: absolute; top: 0; left: 0; ';
       mcs += 'overflow: hidden; width: ' + w + 'px; height: ' + dcH + 'px; z-index: 234';
   div.style.cssText = mcs; div.id = 'mCOL'; sDV.ddddd = (sDV.ddddd) ? 3 : 2;
 
   var z = nTB.cloneNode (1); z.style.marginTop = t + 'px';
   div.appendChild (z);
   bod.appendChild (div);
   }
 
if (fCs && fRs)
   {
   var div = doc.createElement ('DIV'),
       mcs  = 'background-color: white; position: absolute; top: 0; left: 0; ';
       mcs += 'overflow: hidden; width: ' + w + 'px; height: ' + h + 'px; z-index: 235';
   div.style.cssText = mcs;
   var z = nTB.cloneNode (1); z.style.marginTop = t + 'px';
   div.appendChild (z);
   bod.appendChild (div);
   }
 
sDV.onscroll = function ()
   {
   if (sDV.ddddd % 2)
      {
      var obj1 = document.getElementById ('mROW').getElementsByTagName ('TABLE') [0];
      obj1.style.left = -this.scrollLeft + 'px';
      }
   if (sDV.ddddd > 1)
      {
      var obj2 = document.getElementById ('mCOL').getElementsByTagName ('TABLE') [0];
      obj2.style.top = -this.scrollTop + 'px';
      }
   }
}