/**
 * Checks/unchecks all rows
 *
 * @param   string   the form name
 * @param   boolean  whether to check or to uncheck the element
 * @param   string   basename of the element
 * @param   integer  min element count
 * @param   integer  max element count
 *
 * @return  boolean  always true
 */
// modified 2004-05-08 by Michael Keck <mail_at_michaelkeck_dot_de>
// - set the other checkboxes (if available) too
function setCheckboxesRange(the_form, do_check, basename, min, max)
{
    for (var i = min; i < max; i++) {
        if (typeof(document.forms[the_form].elements[basename + i]) != 'undefined') {
            document.forms[the_form].elements[basename + i].checked = do_check;
        }
        if (typeof(document.forms[the_form].elements[basename + i + 'r']) != 'undefined') {
            document.forms[the_form].elements[basename + i + 'r'].checked = do_check;
        }
    }

    return true;
} // end of the 'setCheckboxesRange()' function

/*
Checks passed form object - test to see if it is a valid float.
If not, it is forced to 'forceval'.
*/
function chk4num(thisobj,forceval) {
	floatValue=parseFloat(thisobj.value);
	if ((thisobj.value.length==0) || (thisobj.value==null)) {
		thisobj.value=forceval;
      return true;
	} else if ( isNaN(floatValue) ) {
		thisobj.value=forceval;
      return true;
   } else {
   	return false;
   }

}

/**
 * This array is used to remember mark status of rows in browse mode
 */
var marked_row = new Array;


/**
 * Sets/unsets the pointer and marker in browse mode
 *
 * @param   object    the table row
 * @param   integer  the row number
 * @param   string    the action calling this script (over, out or click)
 * @param   string    the default background color
 * @param   string    the color to use for mouseover
 * @param   string    the color to use for marking a row
 *
 * @return  boolean  whether pointer is set or not
 */
function setPointerNew(theRow, theRowNum, theAction, theDefaultColor, thePointerColor, theMarkColor)
{
    var theCells = null;

    // 1. Pointer and mark feature are disabled or the browser can't get the
    //    row -> exits
    if ((thePointerColor == '' && theMarkColor == '')
        || typeof(theRow.style) == 'undefined') {
        return false;
    }

    // 2. Gets the current row and exits if the browser can't get it
    if (typeof(document.getElementsByTagName) != 'undefined') {
        theCells = theRow.getElementsByTagName('td');
    }
    else if (typeof(theRow.cells) != 'undefined') {
        theCells = theRow.cells;
    }
    else {
        return false;
    }

    // 3. Gets the current color...
    var rowCellsCnt  = theCells.length;
    var domDetect    = null;
    var currentColor = null;
    var newColor     = null;
    // 3.1 ... with DOM compatible browsers except Opera that does not return
    //         valid values with "getAttribute"
    if (typeof(window.opera) == 'undefined'
        && typeof(theCells[0].getAttribute) != 'undefined') {
        currentColor = theCells[0].getAttribute('bgcolor');
        domDetect    = true;
    }
    // 3.2 ... with other browsers
    else {
        currentColor = theCells[0].style.backgroundColor;
        domDetect    = false;
    } // end 3

    // 3.3 ... Opera changes colors set via HTML to rgb(r,g,b) format so fix it
    if (currentColor.indexOf("rgb") >= 0)
    {
        var rgbStr = currentColor.slice(currentColor.indexOf('(') + 1,
                                     currentColor.indexOf(')'));
        var rgbValues = rgbStr.split(",");
        currentColor = "#";
        var hexChars = "0123456789ABCDEF";
        for (var i = 0; i < 3; i++)
        {
            var v = rgbValues[i].valueOf();
            currentColor += hexChars.charAt(v/16) + hexChars.charAt(v%16);
        }
    }

    // 4. Defines the new color
    // 4.1 Current color is the default one
    if (currentColor == ''
        || currentColor.toLowerCase() == theDefaultColor.toLowerCase()) {
        if (theAction == 'over' && thePointerColor != '') {
            newColor              = thePointerColor;
        }
        else if (theAction == 'click' && theMarkColor != '') {
            newColor              = theMarkColor;
            marked_row[theRowNum] = true;
            // Garvin: deactivated onclick marking of the checkbox because it's also executed
            // when an action (like edit/delete) on a single item is performed. Then the checkbox
            // would get deactived, even though we need it activated. Maybe there is a way
            // to detect if the row was clicked, and not an item therein...
            // document.getElementById('id_rows_to_delete' + theRowNum).checked = true;
        }
    }
    // 4.1.2 Current color is the pointer one
    else if (currentColor.toLowerCase() == thePointerColor.toLowerCase()
             && (typeof(marked_row[theRowNum]) == 'undefined' || !marked_row[theRowNum])) {
        if (theAction == 'out') {
            newColor              = theDefaultColor;
        }
        else if (theAction == 'click' && theMarkColor != '') {
            newColor              = theMarkColor;
            marked_row[theRowNum] = true;
            // document.getElementById('id_rows_to_delete' + theRowNum).checked = true;
        }
    }
    // 4.1.3 Current color is the marker one
    else if (currentColor.toLowerCase() == theMarkColor.toLowerCase()) {
        if (theAction == 'click') {
            newColor              = (thePointerColor != '')
                                  ? thePointerColor
                                  : theDefaultColor;
            marked_row[theRowNum] = (typeof(marked_row[theRowNum]) == 'undefined' || !marked_row[theRowNum])
                                  ? true
                                  : null;
            // document.getElementById('id_rows_to_delete' + theRowNum).checked = false;
        }
    } // end 4

    // 5. Sets the new color...
    if (newColor) {
        var c = null;
        // 5.1 ... with DOM compatible browsers except Opera
        if (domDetect) {
            for (c = 0; c < rowCellsCnt; c++) {
                theCells[c].setAttribute('bgcolor', newColor, 0);
            } // end for
        }
        // 5.2 ... with other browsers
        else {
            for (c = 0; c < rowCellsCnt; c++) {
                theCells[c].style.backgroundColor = newColor;
            }
        }
    } // end 5

    return true;
} // end of the 'setPointerNew()' function

function openurl(theurl,thename,features) {
	n=(thename!=''?thename:'');
	f=(features!=''?features:'');
	window.open(theurl,n,f);
} // end of openurl

function openwin(title,txt,h,w) {
		var l=screen.width/2-w/2;
		var t=screen.height/2-h/2;
		var newin=window.open('','newind','top=' + t + ',left=' + l + ',height=' + h + ',width=' +  w + ',toolbar=0,menubar=0,scrollbars=1,resizable=0,location=0,directories=0,status=0');
		newin.document.write("<head>");
		newin.document.write("<title>" + title + "</title>");
		newin.document.write("<style type='text/css'>");
		newin.document.write("<!--");
		newin.document.write("TD,LI,LO,P,BODY,INPUT,SELECT { font-family : Verdana, Arial, Tahoma, Helvetica; font-size : 10pt; color : #000000; text-decoration : none; }");
		newin.document.write("TH { font-family : Verdana, Arial, Tahoma, Helvetica; font-size : 10pt; font-weight : normal; color : #000000; background: #D3DCE3; }");
		newin.document.write(".small { font-family : Arial, Tahoma, Helvetica; font-size : 9pt; color : #ffffff; text-decoration : none; }");
		newin.document.write("A.small { color : #ffffff; text-decoration : none; }");
		newin.document.write("A:VISITED.small { color : #ffffff; text-decoration : none; }");
		newin.document.write("A:HOVER.small { color : #ffffff; text-decoration : underline; }");
		newin.document.write("//-->");
		newin.document.write("</style>");
		newin.document.write("</head>");
		newin.document.write("<body bgcolor='black'>");
		newin.document.write("<p align=center><a span class='small' href='' onClick='self.close()'>[ Click to close ]</a></p>");
		newin.document.write("<table border=0 cellpadding=5>");
		newin.document.write("<tr><td bgcolor='ccffcc' align=left valign=middle>");
		newin.document.write(txt);
		newin.document.write("</td></tr>");
		newin.document.write("</table>");
		newin.document.write("<p align=center><a span class='small' href='' onClick='self.close()'>[ Click to close ]</a></p>");
} // end of openwin

function selectAll(form_name,select_name) {
	for (optionindex=0; optionindex<document.forms[form_name].elements[select_name].options.length; optionindex++) {
		document.forms[form_name].elements[select_name].options[optionindex].selected = true;
	}
	return true;
}

function unselectAll(form_name,select_name) {
	for (optionindex=0; optionindex<document.forms[form_name].elements[select_name].options.length; optionindex++) {
		document.forms[form_name].elements[select_name].options[optionindex].selected = false;
	}
	return true;
}

function clearlist(form_name,select_name) {
	for (optionindex=0; optionindex<document.forms[form_name].elements[select_name].options.length; optionindex++) {
		document.forms[form_name].elements[select_name].options[optionindex].selected = false;
	}
	return true;
}

function helpopwin(title,txt,h,w) {
		var l=screen.width/2-w/2;
		var t=screen.height/2-h/2;
		var newin=window.open('common/helpopwin.php?title=' + title + '&txt=' + txt,'newind','top=' + t + ',left=' + l + ',height=' + h + ',width=' +  w + ',toolbar=0,menubar=0,scrollbars=1,resizable=0,location=0,directories=0,status=0', 'replace=true');
} // end of helpopwin

function NewURL(formname, idname)
{
  	var val = document.forms[formname].elements[idname].value;
  	location.replace(val);
	//alert(val);
  	return true;
	if (typeof(document.forms[the_form].elements[basename]) != 'undefined') {
      document.forms[the_form].elements[basename].checked = do_check;
  }
  if (typeof(document.forms[the_form].elements[basename + i + 'r']) != 'undefined') {
      document.forms[the_form].elements[basename].checked = do_check;
  }

  return true;
} // end of the 'NewURL()' function

function loading() {
	var h=225;
	var w=250;
	//var t = (screen.height/2-h/2)
	var t = 10;
	var l = (screen.width/2-w/2);
	var l = 10;
	doc=window.open( 'loading.php' , '' , 'top=' + t + ',left=' + l + ',height=' + h + ',width=' +  w + ',toolbar=0,menubar=0,scrollbars=0,resizable=0,location=0,directories=0,status=0,titlebar=no', replace=true );
} // end of loading

function jump2url(objSelect){
	if (objSelect.selectedIndex<=0) {
		return false;
	} else {
		var objOpt = objSelect.options[objSelect.selectedIndex];
		window.location.href=objOpt.value;
	}
}

function textLimit(field, maxlen) {
	if (field.value.length > maxlen)
	field.value = field.value.substring(0, maxlen);
}

// toggles display visibility of 'var'
function ToggleByID(obj,txt) {
	var theObj = document.getElementById(obj);
	var theOpenOrCloseTxt = document.getElementById(obj + '_OpenOrClose');
	cdisplay=theObj.style.display;
	if (cdisplay=='none') {
		theObj.style.display="block";
		theOpenOrCloseTxt.innerHTML = "<font color=red><b>HIDE&nbsp;"+txt+"</b></font>";
	} else {
		theObj.style.display="none";
		theOpenOrCloseTxt.innerHTML = "<b>SHOW&nbsp;"+txt+"</b>";
	}
} // ToggleByID