/*
Crosshair routine
Released into the public domain by John Kaster and Jeff Overcash, 2000
Please submit any enhancements back to the CodeCentral repository
*/

function getobj( id )
{
  /* return document.all( id ); // only works with IE 4 and above */
  return document.getElementById(id);
  /* return self.document[ id ]; */
}
function crosshairCol(p_in_Col, p_in_sColor) {
	var r, c;
	var obj;
	r = 0;
	id = 'RC' + r + '_' + p_in_Col;
	obj = getobj( id );
	while (obj)
	{
	  obj.bgColor = sColor;
	  r++;
	  id = 'RC' + r + '_' + p_in_Col;
	  obj = getobj( id );
  }
}
function crosshairRow(iRow, sColor) 
{
	var r, c;
	var obj;
	c = 0;
	id = 'RC' + iRow + '_' + c;
//alert ('id='+ id);
	obj = getobj( id );
	while (obj)
	{
	  obj.bgColor = sColor;
	  //obj.bgColor = 'black';
	  c++;
	  id = 'RC' + iRow + '_' + c;
//alert('id2=' + id);
	  obj = getobj( id );
    }
 }
function crosshair(iRow,iCol,sColor)
{
  var r, c;
  var obj;

  if ( iRow && iCol ) // Crosshair
  {
    for ( r = 0; r <= iRow; r++ )
    {
      id = 'RC' + r + '_' + iCol;
	  obj = getobj( id );
      if (obj)
        obj.bgColor = sColor;
    }

    for ( c = 0; c <= iCol; c++ )
    {
      id = 'RC' + iRow + '_' + c;
      obj = getobj( id );
      if (obj)
        obj.bgColor = sColor;
    }
  }
  else if ( iRow == 0 ) // Doing the whole column
  {
	crosshairCol(iCol, sColor);
  }
  else if ( iCol == 0 ) // Doing the whole row
  {
	crosshairRow(iRow, sColor);
  }
}