var get=function(t){
return document.getElementsByTagName(t);}
String.prototype.data=function(){ 
	var txt=this;
	var r=/[\+\-]?[\d]*[\.]?[\d]+/g;
	 return txt.match(r);
}

var gt=function(tag){
return document.getElementsByTagName(tag);}

var gd=function(id){
return document.getElementById(id);}

function read(t,r,c){
var tb=get('table')[t];
var ro=tb.rows[r];
return (ro.cells[c].innerHTML);}

function write(t,r,c,data){
var tb=get('table')[t];
var ro=tb.rows[r];
ro.cells[c].innerHTML=data;
}

function convert_col_unit(col,topOffset,bottomOffset,factor,decimal)
{
var cnt=get('tr').length;
var k=cnt+1-bottomOffset;


if(document.getElementById('chkComma').checked)
{
	do{ var c=new Tcell(0,k-2,col)
	    var x=addCommas((c.value()*factor).toFixed(decimal))
	    c.settext(x)
	    k--;
	}while(k-topOffset-1)
}
else
{
	do{ var c=new Tcell(0,k-2,col)
	    var x=(c.value()*factor).toFixed(decimal)
	    c.settext(x)
	    k--;
	}while(k-topOffset-1)
}
}

function Selector(id)
{
    this.index=index;
    this.value=value;
    this.text=text;
    this.reset=reset;
    function index(){
        var s=document.getElementById(id);
        return s.selectedIndex;
    }
    function value(){
        var s=document.getElementById(id);
	return s.value;
    }
    function text(){
        var s=document.getElementById(id);
	return s.options[s.selectedIndex].text;
    }
    function reset(){
        document.getElementById(id).selectedIndex=0;
    }
}

function clearChildNodes(id)
{
    var t=document.getElementById(id)
    var c=t.childNodes
    var n=c.length-1
    if(n>1){
    do{
    t.removeChild(c[n])
    n--;
    }while(n+1)
    }
}

function addCommas(nStr)
{
	nStr += '';
	var x = nStr.split('.');
	var x1 = x[0];
	var x2 = x.length > 1 ? '.' + x[1] : '';
	var rgx = /(\d+)(\d{3})/;
	while (rgx.test(x1)) {
		x1 = x1.replace(rgx, '$1' + ',' + '$2');
	}
	return x1 + x2;
}

function numOrdA(a, b){ return (a-b); }	//Prevent alphanumeric sorting
function numOrdD(a, b){ return (b-a); }	//Prevent alphanumeric sorting
