// JavaScript Document
function padl() {
	var strRes = '';
	args=padl.arguments;
	for (i=1;i<=args[2]-args[0].length;i++) {
		strRes=strRes+args[1];
	}
	strRes=strRes+args[0];
	return strRes;
}

function ltrim() {
	var strRes = ''; 
	var logEnd = false;
	args=ltrim.arguments;
	for (i=0;i<args[0].length;i++) {
		if ((args[0].charAt(i)!=' ') || (logEnd)) {strRes=strRes+args[0].charAt(i); logEnd=true;}
	}
	return strRes;
}
function comPasswd() { // Double Check the matching of two fields to make a password update
var strPass1, strPass2;
var	logMatch;
	args=comPasswd.arguments;
	logMatch = true;
	if (args[0] == args[1]) {
		if (args[0] == '') {alert ('Password can not be blank');logMatch = false;}
	}
	else {alert ('Password must be the same');logMatch = false;}
return logMatch
}

function fndString() {
	var intResult,strLen;
	intResult=-1;
	args=fndString.arguments;
	strLen=eval(args[1]+'.length');
	for (var i=0;i<strLen;i++) {
		if (eval(args[1]+'['+i+']')==args[0]){intResult=i}
	}
return intResult;
}
function genField() { // Generates a select based in an array previously defined. Var. (select:name, array of values:name, array of visible options:name, selected:name)
	var intLen,strType,strField,strName,strOption,strRange,strValue,strSize,strScope,className;
	args = genField.arguments;
	strField = '';
	strType = args[0];
	(args[1]!='')?strName = ' name="'+args[1]+'"':strName = args[2]+'[3]';
	strOption = args[2]+'[0]';
	strRange = args[2]+'[1]';
	strValue = args[2]+'[2]';		
        className = args[5];
	switch (strType) {
		case 'tex':
			(args[3]!='')?strSize=' size="'+args[3]+'"':strSize='';
			strField = '<input tabindex="1" class="'+className+'" type="text" '+strName+' value="'+args[2]+'"'+strSize+'>';
			break;
		case 'sel':
			intLen = eval(args[2]+'[0].length');
			(args[3]!='')?strSize=' size="'+args[3]+'"':strSize='';
			(args[4].toUpperCase()=='M')?strScope=' multiple':strScope='';
			strField = '<select tabindex="1" class="'+className+'" '+strName+strSize+strScope+'>';
			for (i=0;i<intLen;i++){
				if (fndString(eval(strOption+'['+i+']'),strValue)> -1) {
					strField = strField +'<option value ="'+eval(strOption+'['+i+']')+'" selected>'+eval(strRange+'['+i+']')+'</option>' }
				else {
					strField = strField +'<option value ="'+eval(strOption+'['+i+']')+'">'+eval(strRange+'['+i+']')+'</option>'};
			}
			strField = strField+'</select>';
			break;
		case 'rad':
			intLen = eval(args[2]+'[0].length');
			for (i=0;i<intLen;i++){
				if (i!=0) {
					strField = strField +'&nbsp;&nbsp;';
				}
				if (fndString(eval(strOption+'['+i+']'),strValue)> -1) {
					strField = strField +'<input tabindex="1" class="'+className+'" type="radio" '+strName+' value ="'+eval(strOption+'['+i+']')+'" checked>'+eval(strRange+'['+i+']') }
				else {
					strField = strField +'<input tabindex="1" class="'+className+'" type="radio" '+strName+' value ="'+eval(strOption+'['+i+']')+'"	>'+eval(strRange+'['+i+']') }
			}
			break;
		case 'chb':
			intLen = eval(args[2]+'[0].length');
			if (args[1] == '') {
			for (i=0;i<intLen;i++) {
				if (i!=0) {
					strField = strField +'<br>';
				}
				if (fndString(eval(strOption+'['+i+']'),strValue)> -1) {
					strField = strField +'<input tabindex="1" class="'+className+'" type="checkbox" name ="'+eval(strName+'['+i+']')+'" value="'+eval(strOption+'['+i+']')+'" checked>'+eval(strRange+'['+i+']') }
				else {
					strField = strField +'<input tabindex="1" class="'+className+'" type="checkbox" name ="'+eval(strName+'['+i+']')+'" value="'+eval(strOption+'['+i+']')+'">'+eval(strRange+'['+i+']') }
				}					
			}
			else {

				if (fndString(eval(strOption+'[0]'),strValue)> -1) {
					strField = strField +'<input tabindex="1" class="'+className+'" type="checkbox" '+strName+' value="'+eval(strOption+'[0]')+'" checked>'+eval(strRange+'[0]') }
				else {
					strField = strField +'<input tabindex="1" class="'+className+'" type="checkbox" '+strName+' value="'+eval(strOption+'[0]')+'">'+eval(strRange+'[0]') }
			}
			break;
	}
	return strField
}

// Added on 30/04/2007 --- uses some functions at DHTML.js

//Display or Hide an element
function display() {
var sMod, sId, sNam;
	args = display.arguments;
	sNam = args[0];
	sMod = args[1];
	obj = getElem('ID',sNam,'');
	if (sMod.toUpperCase() == 'ON')
		obj.style.display = 'block';
	else
		obj.style.display = 'none';
}

// Update the information in an element
function update() {
var sNam, sVal;
	args = update.arguments;
	sNam = args[0];
	sVal = args[1];
	obj = getElem('ID',sNam,'');
	obj.value = sVal;
}
// Open (Pop up) new window
function popUp(popurl,popname,popdetails)
{
	newwindow=window.open(popurl,popname,popdetails);
	if (window.focus) {newwindow.focus()}
}