function GetAJAXInstance() {
	if (window.XMLHttpRequest) {return new XMLHttpRequest();}
	else if (window.ActiveXObject) {
		try {return new ActiveXObject('Msxml2.XMLHTTP');}
		catch (e) {
			try {return new ActiveXObject('Microsoft.XMLHTTP');}
			catch (e) {}
		}
	}
	return false;
}

function ParseXML(code,onerror) {
	if (!code) {
		if (onerror) {onerror(null,'No XML code supplied, probably the web service has not been found');}
		return;
	}
	if (window.ActiveXObject) {
		var xmldoc = new ActiveXObject('Microsoft.XMLDOM');
		xmldoc.async = 'false';
		xmldoc.loadXML(code);
		if (xmldoc.parseError.errorCode != 0) {
			if (onerror) {onerror(code,xmldoc.parseError.reason);}
			return null;
		}
		return xmldoc;
	} else {
		var xmldoc = new DOMParser().parseFromString(code,'text/xml');
		if (xmldoc.documentElement.tagName == 'parsererror') {
			if (onerror) {
				var xmlerror = new XMLSerializer().serializeToString(xmldoc);
				var re = />([\s\S]*?)Location:([\s\S]*?)Line Number (\d+), Column (\d+):<sourcetext>([\s\S]*?)(?:\-*\^)/;
				re.test(xmlerror);
				onerror(code,RegExp.$1);
			}
			return null;
		}
		return xmldoc;
	}
}

function jsAJAXLoader() {
	if (isNaN(jsAJAXLoader.count)) {jsAJAXLoader.count = 0;}
	this.index = jsAJAXLoader.count;
	this.name = "jsAJAXLoader" + (jsAJAXLoader.count++);
 	this.obj = this.name + "Object";
 	eval(this.obj + " = this")

	this.Busy = false;
	this.LoadBuffer = new Array();

	this.GetLoader = jsAJAXGetLoader;
	this.StartLoad = jsAJAXLoaderStartLoad;
	this.CheckBuffer = jsAJAXLoaderCheckBuffer;
	this.EndLoad = jsAJAXLoaderEndLoad;
	
}

function jsAJAXGetLoader(page,onendload,data) {
	return new jsAJAXLoaderData(this,page,onendload,data);
}

function jsAJAXLoaderStartLoad(data) {
	this.LoadBuffer = this.LoadBuffer.concat(data);
	this.CheckBuffer();
}

function jsAJAXLoaderCheckBuffer() {
	if (this.LoadBuffer.length > 0) {
		if (this.Busy) {
			setTimeout(this.obj + '.CheckBuffer()',100);
			return;
		} else {
			this.Busy = true;
			var current = this.LoadBuffer[0];
			var oname = this.obj;
			var page = current.Page;
			this.Loader = GetAJAXInstance();
			if (this.Loader) {
				var varstxt = '';
				for (var i=0;i<current.VarNames.length;i++) {
					var value = (i < current.VarValues.length) ? current.VarValues[i] : null;
					if (value) {
						if (varstxt != '') {varstxt += '&';}
						varstxt += escape(current.VarNames[i]) + '=' + escape(value);
					}
				}
				this.Loader.onreadystatechange = function() {eval(oname + '.EndLoad()');}
				this.Loader.open('POST',page,true);
				this.Loader.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
				this.Loader.setRequestHeader('Content-length',(varstxt) ? varstxt.length : 0);
				this.Loader.setRequestHeader('Connection','close');
				this.Loader.send(varstxt);
			} else {
				this.Busy = false;
				if (current.OnEndLoad) {current.OnEndLoad(null,current.EndLoadData);}
			}
		}
	}
}

function jsAJAXLoaderEndLoad() {
	if ((this.Loader)&&(this.Loader.readyState)) {
		if ((this.Loader.readyState == 4)&&(this.LoadBuffer.length > 0)) {
			var txt = (this.Loader.status == 200) ? this.Loader.responseText : null;
			var current = this.LoadBuffer[0];
			if (current.OnEndLoad) {current.OnEndLoad(txt,current.EndLoadData);}
			this.LoadBuffer.splice(0,1);
			this.Loader = null;
			this.Busy = false;
			this.CheckBuffer();
		}
	}
}

function jsAJAXLoaderData(parent,page,onendload,data) {

	if (isNaN(jsAJAXLoaderData.count)) {jsAJAXLoaderData.count = 0;}
	this.index = jsAJAXLoaderData.count;
	this.name = "jsAJAXLoaderData" + (jsAJAXLoaderData.count++);
 	this.obj = this.name + "Object";
 	eval(this.obj + " = this")
	
	this.Parent = parent;
	this.Page = page;
	this.OnEndLoad = onendload;
	this.EndLoadData = data;

	this.VarNames = new Array();
	this.VarValues = new Array();

	this.Load = jsAJAXLoaderDataLoad;
	this.AddVar = jsAJAXLoaderDataAddVar;
	this.GetValue = jsAJAXLoaderDataGetValue;
	this.ClearVars = jsAJAXLoaderDataClearVars;
}

function jsAJAXLoaderDataLoad() {this.Parent.StartLoad(this);}

function jsAJAXLoaderDataAddVar(varname,varvalue) {
	for (var i=0;i<this.VarNames.length;i++) {
		if (this.VarNames[i] == varname) {
			this.VarValues[i] = varvalue;
			return;
		}		
	}
	this.VarNames = this.VarNames.concat(varname);
	this.VarValues = this.VarValues.concat(varvalue);
}

function jsAJAXLoaderDataGetValue(name) {
	if (name) {
		for (var i=0;i<this.VarNames.length;i++) {
			if (this.VarNames[i] == name) {return (i < this.VarValues.length) ? this.VarValues[i] : null;}
		}
	}
	return null;
}

function jsAJAXLoaderDataClearVars() {
	this.VarNames = new Array();
	this.VarValues = new Array();
}

var BooleanControl = 0;
var IntegerControl = 1;
var RealControl = 2;
var TextControl = 3;
var DateControl = 4;
var HourControl = 5;
var FileControl = 6;
var OptionsControl = 7;
var PasswordControl = 8;
var LongTextControl = 9;
var TimeControl = 10;
var IPControl = 11;
var ARGBControl = 12;
var OptionTreeControl = 13;
var MutableControl = 14;

function CollapsableTitle(nameex,namecol,descex,desccol,showup,hidebottom,reldivid,onexpand,oncollapse,refobj) {
	if (isNaN(CollapsableTitle.count)) {CollapsableTitle.count = 0;}
	this.index = CollapsableTitle.count;
	this.name = "CollapsableTitle" + (CollapsableTitle.count++);
 	this.obj = this.name + "Object";
 	eval(this.obj + " = this")
	
	this.NameExpanded = nameex;
	this.NameCollapsed = namecol;
	this.DescriptionExpanded = descex;
	this.DescriptionCollapsed = desccol;
	this.ShowBorderUp = showup;
	this.HideBorderBottom = hidebottom;
	this.RelatedDivId = reldivid;
	this.OnExpand = onexpand;
	this.OnCollapse = oncollapse;
	this.ReferenceObject = refobj;
	this.Expanded = true;
	
	this.Expand = CollapsableTitleExpand;
	this.GetHTML = CollapsableTitleGetHTML;
	this.Clicked = CollapsableTitleClicked;
	this.Collapse = CollapsableTitleCollapse;
}

function CollapsableTitleExpand() {
	if (!this.Expanded) {
		var div = document.getElementById(this.name + 'Div');
		if (div) {
			div.alt = (this.DescriptionExpanded) ? this.DescriptionExpanded : '';
			div.title = (this.DescriptionExpanded) ? this.DescriptionExpanded : '';
			if (this.HideBorderBottom) {div.style.borderBottom = '1px solid #F79422';}
		}
		var img = document.getElementById(this.name + 'ExpandIcon');
		if (img) {img.src = '../img/tree-less.gif';}
		var ndiv = document.getElementById(this.name + 'NameDiv');
		if (ndiv) {ndiv.innerHTML = this.NameExpanded;}
		var rdiv = document.getElementById(this.RelatedDivId);
		if (rdiv) {rdiv.style.display = '';}

		this.Expanded = true;
		if (this.OnExpand) {this.OnExpand(this.ReferenceObject);}
	}
}

function CollapsableTitleGetHTML() {
	var html = '<div id="' + this.name + 'Div" class="propertiestitle text3b" style="height:20px;line-height:19px;' +
		'cursor:hand;cursor:pointer;' + ((this.ShowBorderUp) ? 'border-top:1px solid #F79422;' : '') + 'border-bottom:1px solid #F79422;" ' +
		'alt="' + ((this.DescriptionExpanded) ? this.DescriptionExpanded : '') + '" title="' + ((this.DescriptionExpanded) ?
		this.DescriptionExpanded : '') + '" ' + 'onclick="' + this.obj + '.Clicked();">' +
		'<div style="margin-left:5px;width:20px;text-align:center;float:left;">' +
		'<img id="' + this.name + 'ExpandIcon" src="../img/tree-less.gif" alt="" title="" style="margin-top:6px;" /></div>' +
		'<div id="' + this.name + 'NameDiv" style="float-left;">' + this.NameExpanded + '</div>' +
		'</div>';
	return html;
}

function CollapsableTitleClicked() {
	if (this.Expanded) {this.Collapse();} else {this.Expand();}
}

function CollapsableTitleCollapse() {
	if (this.Expanded) {
		var div = document.getElementById(this.name + 'Div');
		if (div) {
			div.alt = (this.DescriptionCollapsed) ? this.DescriptionCollapsed : '';
			div.title = (this.DescriptionCollapsed) ? this.DescriptionCollapsed : '';
			if (this.HideBorderBottom) {div.style.borderBottom = '0px';}
		}
		var img = document.getElementById(this.name + 'ExpandIcon');
		if (img) {img.src = '../img/tree-plus.gif';}
		var ndiv = document.getElementById(this.name + 'NameDiv');
		if (ndiv) {ndiv.innerHTML = this.NameCollapsed;}
		var rdiv = document.getElementById(this.RelatedDivId);
		if (rdiv) {rdiv.style.display = 'none';}

		this.Expanded = false;
		if (this.OnCollapse) {this.OnCollapse(this.ReferenceObject);}
	}
}

function Floating(header,body,footer) {
	
	this.Header = header;
	this.Body = body;
	this.Footer = footer;
	
	this.GetHTML = FloatingGetHTML;
	this.BuildDiv = FloatingBuildDiv;
	this.Destroy = FloatingDestroy;
}

function FloatingGetHTML() {
	var html = '<div class="floatingtl"></div><div class="floatingt"></div><div class="floatingtr"></div>' +
		'<div class="floatingr"></div><div class="floatingl"></div><div class="floatingbl"></div>' +
		'<div class="floatingb"></div><div class="floatingbr"></div><div class="floatingc">';
	if (this.Header) {html += this.Header.GetHTML();}
	if (this.Body) {html += this.Body.GetHTML();}
	if (this.Footer) {html += this.Footer.GetHTML((this.Body) ? true : false);}
	html += '</div>';
	return html;
}

function FloatingBuildDiv(id,cssclass,pdiv) {
	this.MainDiv = document.createElement('DIV');
	if (id) {this.MainDiv.id = id;}
	this.MainDiv.className = 'floating' + ((cssclass) ? ' ' + cssclass : '');
	this.MainDiv.innerHTML = this.GetHTML();
	if (pdiv) {pdiv.appendChild(this.MainDiv);}
	else {document.body.appendChild(this.MainDiv);}
	return this.MainDiv;
}

function FloatingDestroy() {
	if (this.MainDiv) {
		if (this.MainDiv.parentNode) {this.MainDiv.parentNode.removeChild(this.MainDiv);}
		this.MainDiv = null;
	}
}

function FloatingHeader(idtitle,title,idsubtitle,subtitle) {
	
	this.IdTitle = idtitle;
	this.Title = title;
	this.IdSubtitle = idsubtitle;
	this.Subtitle = subtitle;
	
	this.GetHTML = FloatingHeaderGetHTML;
	
}

function FloatingHeaderGetHTML() {
	var html = '';
	var putsep = false;
	if ((this.IdTitle)||(this.Title)) {
		html += '<div' + ((this.IdTitle) ? ' id="' + this.IdTitle + '"' : '') + ' class="floatingtitle title2">' +
			((this.Title) ? this.Title : '') + '</div>';
		putsep = true;
	}
	if ((this.IdSubtitle)||(this.Subtitle)) {
		html += '<div' + ((this.IdSubtitle) ? ' id="' + this.IdSubtitle + '"' : '') + ' class="floatingsubtitle text3b">' +
			((this.Subtitle) ? this.Subtitle : '') + '</div>';
		putsep = true;
	}
	if (putsep) {html += '<div class="floatingsep"></div>';}
	return html;
}

function FloatingBody(controls,addhtml,twocolumns,fixedheight,addpos) {
	
	this.Controls = controls;
	this.AdditionalHTML = addhtml;
	this.TwoColumns = twocolumns;
	this.FixedHeight = fixedheight;
	this.AdditionalPosition = (addpos) ? addpos : 'BOTTOM';
	
	this.GetHTML = FloatingBodyGetHTML;
	
}

function FloatingBodyGetHTML() {
	var html = '<div class="floatingcontent"' + ((this.FixedHeight) ? ' style="height:' + this.FixedHeight + ';"' : '') + '>';
	if ((this.AdditionalHTML)&&(this.AdditionalPosition == 'TOP')) {html += this.AdditionalHTML;}
	if ((this.Controls)&&(this.Controls.length)) {
		var twoopen = false;
		for (var i=0;i<this.Controls.length;i++) {
			if (this.TwoColumns) {
				if (i % 2 == 0) {
					html += '<div class="floatingrow" style="';
					if (i == 0) {html += 'margin-top:20px;';}
					if (i >= this.Controls.length - 2) {html += 'margin-bottom:20px;';}
					html += '">';
					twoopen = true;
				}
				html += '<div class="floatingcol"' +
					((this.Controls[i].Description) ? ' alt="' + this.Controls[i].Description + '" title="' + this.Controls[i].Description + '"' : '') +
					'>';
			}
			html += this.Controls[i].GetHTML((i == 0),(i == this.Controls.length - 1),this.TwoColumns);
			if (this.TwoColumns) {
				html += '</div>';
				if ((twoopen)&&(i % 2 != 0)) {html += '</div>'; twoopen = false;}
			}
		}
		if (twoopen) {html += '</div>';}
	}	
	if ((this.AdditionalHTML)&&(this.AdditionalPosition == 'BOTTOM')) {html += this.AdditionalHTML;}
	html += '</div>';
	return html;
}

function FloatingFooter(leftbuttons,rightbuttons,iderror) {
	
	this.LeftButtons = leftbuttons;
	this.RightButtons = rightbuttons;
	this.IdError = iderror;
	
	this.GetHTML = FloatingFooterGetHTML;
	
}

function FloatingFooterGetHTML(showsep) {
	var html = '';
	if (showsep) {html += '<div class="floatingsep"></div>';}
	html += '<div class="floatingfooter">';
	if ((this.LeftButtons)&&(this.LeftButtons.length)) {
		html += '<div class="floatingbuttonsl">';
		for (var i=0;i<this.LeftButtons.length;i++) {html += this.LeftButtons[i].GetHTML();}
		html += '</div>';
	}
	if (this.IdError) {
		var left = ((this.LeftButtons)&&(this.LeftButtons.length)) ? 10 + (this.LeftButtons.length * 20) : 5;
		var right = ((this.RightButtons)&&(this.RightButtons.length)) ? this.RightButtons.length * 20 : 5;
		html += '<div id="' + this.IdError + '" class="floatingerror texterror" style="margin-left:' + left + 'px;right:' + right + 'px;"></div>';
	}
	if ((this.RightButtons)&&(this.RightButtons.length)) {
		html += '<div class="floatingbuttons">';
		for (var i=0;i<this.RightButtons.length;i++) {html += this.RightButtons[i].GetHTML();}
		html += '</div>';
	}
	html += '</div>';
	return html;
}

function FormControl(id,name,type,value,description,must,limit,options,onchange,height,addctrlhtml) {
	this.Id = id;
	this.Name = name;
	this.Type = type;
	this.Value = value;
	this.Description = description;
	this.Must = must;
	this.Limit = limit;
	this.Options = options;
	this.OnChange = onchange;
	this.Height = height;
	this.Multiple = false;
	this.AdditionalControlHTML = addctrlhtml;
	
	if (this.Value == '*EMPTY*') {this.Value = null;}
	else if (this.Value == '*MULTIPLE*') {this.Value = null; this.Multiple = true;}
	
	this.GetHTML = FormControlGetHTML;
	this.GetControlHTML = FormControlGetControlHTML;
}

function FormControlGetHTML(isfirst,islast,dontputdiv,readonly) {
	var html = '';
	if (!dontputdiv) {
		html += '<div class="floatingrow" style="';
		if (isfirst) {html += 'margin-top:20px;';}
		if (islast) {html += 'margin-bottom:20px;';}
		if (this.Height) {html += 'height:' + this.Height + ';';}
		else if (this.Type == LongTextControl) {html += 'height:50px;';}
		else if (this.Type == OptionTreeControl) {html += 'height:auto;';}
		html += '" alt="' + ((this.Description) ? this.Description : '') + '" title="' + ((this.Description) ? this.Description : '') + '">';
	}
	html += '<div class="floatingtext ' + ((this.Must) ? 'text3b' : 'text3') + '">' + this.Name + '</div>' +
		'<div' + ((this.Type == MutableControl) ? ' id="' + this.Id + '"' : '') + ' class="floatingcontrol">' +
		'<div>' +
		((this.Type == MutableControl) ? ((this.Value) ? this.Value : '') : this.GetControlHTML(readonly)) +
		'</div>' +
		((this.AdditionalControlHTML) ? '<div>' + this.AdditionalControlHTML + '</div>' : '') +
		'</div>';
	if (!dontputdiv) {html += '</div>';}
	return html;
}

function FormControlGetControlHTML(readonly) {
	var html = '';
	if (readonly) {
		if (this.Type == BooleanControl) {
			var text = (this.Value == null) ? '' : ((this.Value == true) ? 'Sí' : 'No');
			html += '<input type="text" class="text3" style="width:50px;text-align:center;" value="' + text + '" readonly="true" />';
		} else if ((this.Type == IntegerControl)||(this.Type == RealControl)) {
			html += '<input type="text" class="text3" style="width:70px;text-align:center;" value="' + ((this.Value) ?
				this.Value : '') + '" readonly="true" />';
		} else if (this.Type == TextControl) {
			html += '<input type="text" class="text3" style="width:90%;" value="' + ((this.Value) ? this.Value : '') + '" readonly="true" />';
		} else if (this.Type == DateControl) {
			html += '<input type="text" class="text3" style="width:70px;text-align:center;" value="' +
				((this.Value) ? this.Value : '') + '" readonly="true" />';
		} else if (this.Type == HourControl) {
			html += '<input type="text" class="text3" style="width:70px;text-align:center;" value="' +
				((this.Value) ? this.Value : '') + '" readoly="true" />';
		} else if (this.Type == OptionsControl) {
			var text = '';
			if ((this.Value)&&(this.Options)&&(this.Options.length)) {
				for (var i=0;i<this.Options.length;i++) {
					var otext = this.Options[i][0],ovalue = this.Options[i][1];
					if (this.Value == ovalue) {text = otext;}
				}
			}
			html += '<input type="text" class="text3" style="width:150px;" value="' + text + '" readonly="true" />';
		} else if (this.Type == PasswordControl) {
			html += '<input type="text" class="text3" style="width:90%;" value="********" readonly="true" />';
		} else if (this.Type == LongTextControl) {
			html += '<textarea class="text3" style="width:90%;height:40px;" readonly="true">' +
				((this.Value) ? this.Value : '') + '</textarea>';
		} else if (this.Type == TimeControl) {
			html += '<input type="text" class="text3" style="width:80px;text-align:center;" value="' +
				((this.Value) ? this.Value : '') + '" readonly="true" />';
		} else if (this.Type == IPControl) {
			html += '<input type="text" class="text3" style="width:100px;text-align:center;" value="' +
				((this.Value) ? this.Value : '') + '" readonly="true" />';
		} else if (this.Type == ARGBControl) {
			html += '<input type="text" class="text3" style="width:80px;text-align:center;" value="' +
				((this.Value) ? this.Value : '') + '" readonly="true" />';
		} else if (this.Type == OptionTreeControl) {
			html += '<input type="text" class="text3" style="width:150px;" value="' + ((this.Value) ? this.Value : '') + '" readonly="true" />';
		}
	} else {
		if (this.Type == BooleanControl) {
			html += '<select id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') + '"' +
				((this.OnChange) ? ' onchange="' + this.OnChange + '"' : '') + ' style="width:50px;">';
			if ((!this.Must)||(this.Multiple)) {html += '<option value=""' + ((this.Value == null) ? ' selected="true"' : '') + '></option>';}
			html += '<option value="1"' + ((this.Value == true) ? ' selected="true"' : '') + '>Sí</option>';
			html += '<option value="0"' + ((this.Value == false) ? ' selected="true"' : '') + '>No</option>';
			html += '</select>';
		} else if ((this.Type == IntegerControl)||(this.Type == RealControl)) {
			html += '<input type="text" id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') +
				'" style="width:70px;text-align:center;"' + ((this.Limit) ? ' maxlength="' + this.Limit + '"' : '') + ' value="' +
				((this.Value) ? this.Value : '') + '"' + ((this.OnChange) ? ' onchange="' + this.OnChange + '"' : '') +
				' onkeypress="return CheckControlKeyPressed(event,' + this.Type + ');" />';
		} else if (this.Type == TextControl) {
			html += '<input type="text" id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') + '"' +
				((this.Limit) ? ' maxlength="' + this.Limit + '"' : '') + ' value="' + ((this.Value) ? this.Value : '') + '"' +
				((this.OnChange) ? ' onchange="' + this.OnChange + '"' : '') + ' onkeypress="return CheckControlKeyPressed(event,' +
				this.Type + ');" />';
		} else if (this.Type == DateControl) {
			var cal = new jsCalendar(this.Id,this.Value,'return CheckControlKeyPressed(event,' + this.Type + ');',
				((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : null);
			html += cal.GetInnerHTML();
		} else if (this.Type == HourControl) {
			var cname = 'calendar text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '');
			var tedit = new jsTimeEdit(this.Id,this.Value,cname,'80px','return CheckControlKeyPressed(event,' + this.Type + ');',true,this.OnChange);
			html += tedit.GetHTML();
		} else if (this.Type == FileControl) {
			// TODO
		} else if (this.Type == OptionsControl) {
			html += '<select id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') + '"' +
				((this.OnChange) ? ' onchange="' + this.OnChange + '"' : '') + '>';
			if ((!this.Must)||(this.Multiple)) {html += '<option value=""' + ((this.Value == null) ? ' selected="true"' : '') + '></option>';}
			if ((this.Options)&&(this.Options.length)) {
				for (var i=0;i<this.Options.length;i++) {
					var otext = this.Options[i][0],ovalue = this.Options[i][1];
					html += '<option value="' + ovalue + '"' + ((this.Value == ovalue) ? ' selected="true"' : '') + '>' + otext + '</option>';
				}
			}
			html += '</select>';
		} else if (this.Type == PasswordControl) {
			html += '<input type="password" id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') +
				'" style="width:120px;"' + ((this.Limit) ? ' maxlength="' + this.Limit + '"' : '') + ' value="' + ((this.Value) ?
				this.Value : '') + '"' + ((this.OnChange) ? ' onchange="' + this.OnChange + '"' : '') + ' onkeypress="return ' +
				'CheckControlKeyPressed(event,' + this.Type + ');" />';
		} else if (this.Type == LongTextControl) {
			html += '<textarea id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') + '"' +
				((this.Limit) ? ' maxlength="' + this.Limit + '"' : '') + ((this.OnChange) ? ' onchange="' + this.OnChange +
				'"' : '') + ' onkeypress="return CheckControlKeyPressed(event,' + this.Type + ');">' +
				((this.Value) ? this.Value : '') + '</textarea>';
		} else if (this.Type == TimeControl) {
			var cname = 'calendar text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '');
			var tedit = new jsTimeEdit(this.Id,this.Value,cname,'90px','return CheckControlKeyPressed(event,' + this.Type + ');',false,this.OnChange);
			html += tedit.GetHTML();
		} else if (this.Type == IPControl) {
			var cname = 'calendar text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '');
			var tedit = new jsIPEdit(this.Id,this.Value,cname,'100px','return CheckControlKeyPressed(event,' + this.Type + ');');
			html += tedit.GetHTML();
		} else if (this.Type == ARGBControl) {
			html += '<input type="text" id="' + this.Id + '" class="text3' + (((this.Multiple)&&(this.Value == null)) ? ' propertiesmultiple' : '') +
				'" style="width:80px;text-align:center;" maxlength="8" value="' + ((this.Value) ? this.Value : '') + '"' + ((this.OnChange) ?
				' onchange="' + this.OnChange + '"' : '') + ' onkeypress="return CheckControlKeyPressed(event,' + this.Type + ');" />';
		} else if (this.Type == OptionTreeControl) {
			var otree = new OptionTree(this.Id);
			if (otree.FromXML(this.Options)) {html += otree.GetHTML(this.Must,this.Multiple,this.Value,readonly,this.OnChange)}
		}
	}
	return html;
}

function GetFormControlValue(id,type) {
	if ((type == BooleanControl)||(type == OptionsControl)) {
		var obj = document.getElementById(id);
		if (obj) {return obj.options[obj.selectedIndex].value;}
	} else if ((type == IntegerControl)||(type == RealControl)||(type == TextControl)||(type == DateControl)||
		(type == HourControl)||(type == PasswordControl)||(type == LongTextControl)||(type == TimeControl)||
		(type == IPControl)||(type == ARGBControl)) {
			var obj = document.getElementById(id);
			if (obj) {return obj.value;}
	} else if (type == OptionTreeControl) {
		var otree = eval(id + 'Object');
		if (otree) {return otree.GetValue();}
	}
	return null;
}

function DisableAllControls(div) {
	if (div) {
		for (var i=0;i<div.childNodes.length;i++) {
			var current = div.childNodes[i];
			if (current.nodeName.toLowerCase() == 'div') {DisableAllControls(current);}
			else if (current.nodeName.toLowerCase() == 'input') {current.disabled = true;}
			else if (current.nodeName.toLowerCase() == 'select') {current.disabled = true;}
			else if (current.nodeName.toLowerCase() == 'textarea') {current.disabled = true;}
			else if (current.nodeName.toLowerCase() == 'img') {current.disabled = true;}
		}
	}
}

function FormButton(id,icon,icondis,desc,disabled,onclick) {
	
	this.Id = id;
	this.Icon = icon;
	this.IconDisabled = icondis;
	this.Description = desc;
	this.Disabled = disabled;
	this.OnClick = onclick;
	
	this.GetHTML = FormButtonGetHTML;
	
}

function FormButtonGetHTML() {
	var html = '<img id="' + this.Id + '" src="' + ((this.Disabled) ? this.IconDisabled : this.Icon) +
		'" alt="' + this.Description + '" title="' + this.Description + '" style="' + ((this.Disabled) ?
		'cursor:not-allowed;' : 'cursor:hand;cursor:pointer;') + '"' + ((this.Disabled) ? ' disabled="true"'
		: '') + ((this.OnClick) ? ' onclick="' + this.OnClick + '"' : '') + ' />';
	return html;
}

function CheckControlKeyPressed(e,type) {
	if (type != null) {
		var keycode = (document.all) ? window.event.keyCode : e.which;
		if ((keycode > 0)&&(keycode != 8)&&(keycode != 13)&&(keycode != 27)) {
			var validkey = true;
			if (type == IntegerControl) {
				validkey = ((keycode == 45)||((keycode >= 48)&&(keycode <= 57)));
			} else if (type == RealControl) {
				validkey = ((keycode == 45)||(keycode == 46)||((keycode >= 48)&&(keycode <= 57)));
			} else if (type == DateControl) {
				validkey = ((keycode >= 47)&&(keycode <= 57));
			} else if (type == HourControl) {
				validkey = ((keycode == 58)||((keycode >= 48)&&(keycode <= 57)));
			} else if ((type == TextControl)||(type == PasswordControl)||(type == LongTextControl)) {
				validkey = ((keycode != 34)&&(keycode != 39)&&(keycode != 59)&&(keycode != 60)&&(keycode != 62)&&(keycode != 124));
			} else if (type == TimeControl) {
				validkey = ((keycode == 46)||(keycode == 58)||((keycode >= 48)&&(keycode <= 57)));
			} else if (type == IPControl) {
				validkey = ((keycode == 46)||((keycode >= 48)&&(keycode <= 57)));
			} else if (type == ARGBControl) {
				validkey = (((keycode >= 48)&&(keycode <= 57))||((keycode >= 65)&&(keycode <= 70))||((keycode >= 97)&&(keycode <= 102)));
			}
			if (!validkey) {
				if (document.all) {
					window.event.returnValue = false;
					window.event.cancelBubble = true;
				} else {
					e.cancelBubble = true;
					e.preventDefault();
				}
				return false;
			}
		}
	}
	return true;
}

function OptionTree(id) {
 	this.obj = id + "Object";
 	eval(this.obj + " = this")
	
	this.Id = id;
	this.Options = new Array();
	
	this.FromXML = OptionTreeFromXML;
	this.GetHTML = OptionTreeGetHTML;
	this.GetLevel = OptionTreeGetLevel;
	this.GetValue = OptionTreeGetValue;
	this.FillCombos = OptionTreeFillCombos;
	this.ComboChanged = OptionTreeComboChanged;
}

function OptionTreeFromXML(xml) {
	if (!xml) {return true;}
	var parser = ParseXML(xml);
	if (!parser) {return false;}
	var nodes = parser.getElementsByTagName('options');
	if ((!nodes)||(!nodes.length)) {return false;}
	var root = nodes[0];
	this.Options = new Array();
	for (var i=0;i<root.childNodes.length;i++) {OptionTreeNodeFromNode(this,null,root.childNodes[i]);}
	return true;
}

function OptionTreeGetHTML(must,multiple,value,readonly,onchange) {
	
	this.Must = must;
	this.Multiple = multiple;
	this.Value = value;
	this.ReadOnly = readonly;
	this.OnChange = onchange;
	
	var level = this.GetLevel(),html = '',preobj = this;
	var values = (value) ? value.split('/') : new Array();
	for (var i=0;i<level;i++) {
		var options = new Array();
		if (preobj) {
			var next = null;
			for (var j=0;j<preobj.Options.length;j++) {
				options.push(preobj.Options[j].Value);
				if ((i < values.length)&&(values[i] == preobj.Options[j].Value)) {next = preobj.Options[j];}
			}
			preobj = next;
		}
		html += '<div style="margin-bottom:5px;width:100%;">';
		html += '<select id="' + (this.obj + i) + '" class="text3' + (((multiple)&&(value == null)) ? ' propertiesmultiple' : '') +
			'" onchange="' + this.obj + '.ComboChanged(' + i + ');">';
		if ((!must)||(multiple)) {html += '<option value=""' + ((preobj == null) ? ' selected="true"' : '') + '></option>';}
		var tosel = (i < values.length) ? values[i] : null;
		for (var j=0;j<options.length;j++) {
			var oval = options[j];
			html += '<option value="' + oval + '"' + (((tosel)&&(tosel == oval)) ? ' selected="true"' : '') + '>' + oval + '</option>';
		}
		html += '</select>';
		html += '</div>';
	}
	return html;
}

function OptionTreeGetLevel() {
	var level = 0;
	for (var i=0;i<this.Options.length;i++) {
		var current = this.Options[i].GetLevel(0);
		if (current > level) {level = current;}
	}
	return level;
}

function OptionTreeGetValue() {
	var level = this.GetLevel(),value = '';
	for (var i=0;i<level;i++) {
		var cmb = document.getElementById(this.obj + i);
		if (cmb) {
			var current = null;
			if ((cmb.options)&&(cmb.options.length)) {current = cmb.options[cmb.selectedIndex].value;}
			if (current) {
				if (value != '') {value += '/';}
				value += current;
			} else {break;}
		}
	}
	return value;
}

function OptionTreeFillCombos(level) {
	var opobj = this,cmb = null;
	for (var i=0;i<level;i++) {
		cmb = document.getElementById(this.obj + i);
		if (cmb) {
			var selected = ((cmb.options)&&(cmb.options.length)) ? cmb.options[cmb.selectedIndex].value : null;
			if (selected) {
				var newopobj = null;
				for (var j=0;j<opobj.Options.length;j++) {
					if (opobj.Options[j].Value == selected) {newopobj = opobj.Options[j]; break;}
				}
				opobj = newopobj;
			} else {opobj = null; break;}
		} else {opobj = null; break;}
	}
	
	cmb = document.getElementById(this.obj + level);
	if (cmb) {
		var limit = ((!this.Must)||(this.Multiple)) ? 1 : 0;
		while (cmb.options.length > limit) {cmb.removeChild(cmb.options[limit]);}
		if (opobj) {
			for (var i=0;i<opobj.Options.length;i++) {
				var opt = document.createElement('OPTION');
				cmb.options.add(opt);
				opt.value = opobj.Options[i].Value;
				opt.innerHTML = opobj.Options[i].Value;
			}
		}
		if (level < this.GetLevel()) {this.FillCombos(level + 1);}
	}
}

function OptionTreeComboChanged(index) {
	var level = this.GetLevel();
	if (index < level) {this.FillCombos(index + 1);}
	if (this.OnChange) {
		var value = this.GetValue();
		eval(this.OnChange + '(\'' + value + '\')');
	}
}

function OptionTreeNode(tree,parent,value) {
	
	this.Tree = tree;
	this.Parent = parent;
	this.Value = value;
	this.Options = new Array();
	
	this.GetLevel = OptionTreeNodeGetLevel;
	
	if (this.Parent) {this.Parent.Options.push(this);}
	else if (this.Tree) {this.Tree.Options.push(this);}
}

function OptionTreeNodeGetLevel(prelevel) {
	if (prelevel == null) {return 0;}
	
	var level = prelevel + 1;
	if (this.Options.length) {
		var max = level;
		for (var i=0;i<this.Options.length;i++) {
			var current = this.Options[i].GetLevel(level);
			if (current > max) {max = current;}
		}
		level = max;
	}
	
	return level;
}

function OptionTreeNodeFromNode(tree,parent,node) {
	if ((node)&&(node.nodeName == 'option')) {
		var value = null;
		if (node.attributes.length) {value = node.attributes[0].value;}
		if (value) {
			var option = new OptionTreeNode(tree,parent,value);
			for (var i=0;i<node.childNodes.length;i++) {OptionTreeNodeFromNode(tree,option,node.childNodes[i]);}
			return option;
		}
	}
	return false;
}
CurrentImagePath = '';
var LoginLoader = new jsAJAXLoader();

function OnPageLoaded(error) {

	ShowLoginBox();
	if (error) {OnLoginError(null,error);}
	
	var txt = document.getElementById('user');
	if (txt) {txt.focus(); txt.select();}
	
}

function OnLoginKeyPress(e) {
	var txtuser = document.getElementById('user'),imgok = document.getElementById('loginok');
	if ((txtuser)&&(imgok)) {
		var enable = (txtuser.value != '');
		imgok.src = (enable) ? 'img/icon-ok.gif' : 'img/icon-ok-dis.gif';
		imgok.style.cursor = (enable) ? ((document.all) ? 'hand' : 'pointer') : 'not-allowed';
		imgok.disabled = (!enable);
	}
	var txterror = document.getElementById('loginerror');
	if (txterror) {txterror.innerHTML = '';}
	
	var code = ((e) ? e : window.event).keyCode;
	if (code == 13) {OnLoginOkClicked();}
}

function OnLoginOkClicked() {
	var imgok = document.getElementById('loginok');
	if (!imgok.disabled) {
		var txtuser = document.getElementById('user'),txtpass = document.getElementById('password');
		var loader = LoginLoader.GetLoader('lib/ajax/login.php',OnLoginLoaded);
		loader.AddVar('user',txtuser.value);
		loader.AddVar('password',txtpass.value);
		loader.Load();
	}
}

function OnLanguageChanged() {
	var cmb = document.getElementById('language');
	if (!cmb) {return;}
	var lang = cmb.options[cmb.selectedIndex].value;
	var url = document.location.href,pos;
	if ((pos = url.indexOf('?')) >= 0) {url = url.substring(0,pos);}
	document.location.href = url + '?language=' + lang;
}

function OnLoginLoaded(xmlcode) {
	var parser = ParseXML(xmlcode,OnLoginError);
	if (parser) {
		var nodes = parser.getElementsByTagName('ServiceError');
		if ((nodes)&&(nodes.length > 0)) {
			var text = 'Error desconocido';
			for (var i=0;i<nodes[0].childNodes.length;i++) {
				var current = nodes[0].childNodes[i];
				if (current.childNodes.length) {
					if (current.nodeName == 'text') {text = current.childNodes[0].nodeValue;}
				}
			}
			OnLoginError(xmlcode,text);
			return;
		}
		document.location.href = 'pages/main.php';
	}	
}

function OnLoginError(code,error) {
	var txterror = document.getElementById('loginerror');
	if (txterror) {txterror.innerHTML = error;}
	var txtpass = document.getElementById('password');
	if (txtpass) {txtpass.value = '';}
	var txtuser = document.getElementById('user');
	if (txtuser) {txtuser.focus(); txtuser.select();}
}

function ShowLoginBox() {

	var mdiv = document.getElementById('maindiv');
	if (!mdiv) {return;}

	var ldiv = document.createElement('DIV');
	ldiv.style.cssText = 'position:absolute;left:0px;top:50%;right:0px;height:50px;margin-top:-160px;';
	ldiv.innerHTML = '<div style="position:absolute;left:0px;top:25px;right:0px;height:1px;background-color:#F79422;"></div>' +
		'<div style="position:absolute;left:50%;top:3px;margin-left:-93px;width:183px;background-color:#58585A;">' +
		'<img src="img/logo-big.png" style="margin-left:18px;" /></div>';
	mdiv.appendChild(ldiv);

	var addhtml = '';

	var floating = new Floating(
		new FloatingHeader(null,'Plataforma de Comunicación Multimedia',null,'Versión 1.0'),
		new FloatingBody(
			[
				new FormControl('user','Usuario',TextControl,null,'Nombre del usuario',true,50),
				new FormControl('password','Contraseña',PasswordControl,null,'Contraseña del usuario',true,50)
			],
			addhtml,null,null,'TOP'
		),
		new FloatingFooter(
			null,
			[new FormButton('loginok','img/icon-ok.gif','img/icon-ok-dis.gif','Aceptar',true,'OnLoginOkClicked();')],
			'loginerror'
		)
	);
	floating.BuildDiv(null,'floatinglogin',mdiv);
	
	var usrtxt = document.getElementById('user');
	if (usrtxt) {usrtxt.onkeyup = OnLoginKeyPress;}
	var pwdtxt = document.getElementById('password');
	if (pwdtxt) {pwdtxt.onkeyup = OnLoginKeyPress;}
	
}