function AJAX_MM_findObj(n,d)
{var p,i,x;if(!d)d=document;if((p=n.indexOf("?"))>0&&window.parent.frames.length)
{d=window.parent.frames[n.substring(p+1)].document;n=n.substring(0,p);}
if(!(x=d[n])&&d.all)
x=d.all[n];for(i=0;!x&&i<d.forms.length;i++)
x=d.forms[i][n];for(i=0;!x&&d.layers&&i<d.layers.length;i++)
x=AJAX_MM_findObj(n,d.layers[i].document);if(!x&&d.getElementById)
x=d.getElementById(n);return x;}
function WAJAX_validar(e){tecla=(document.all)?e.keyCode:e.which;if(tecla==8||tecla==0)return true;patron=/\d/;te=String.fromCharCode(tecla);return patron.test(te);}
function WAJAX_validar_obj(e){tecla=(document.all)?e.keyCode:e.which;if(tecla==8||tecla==0||tecla==46)return true;patron=/\d/;te=String.fromCharCode(tecla);return patron.test(te);}
function WAJAX_revalid(obj)
{var cad="";for(i=0;i<obj.value.length;i++)
{te=obj.value.substr(i,1).charCodeAt(0);if(te>=48&&te<=58)
cad+=obj.value.substr(i,1);}
obj.value=cad;}
function WAJAX_validareur(e){tecla=(document.all)?e.keyCode:e.which;if(tecla==8||tecla==0)return true;patron=/\d/;te=String.fromCharCode(tecla);return patron.test(te);}
function WAJAX_revalideur(obj)
{var cad="";for(i=0;i<obj.value.length;i++)
{te=obj.value.substr(i,1).charCodeAt(0);if(te>=48&&te<=58)
cad+=obj.value.substr(i,1);}
obj.value=cad;}
function delete_Files_Inmos(message,varbase,varimginput,varimgg,urlbase,maximg,imgdelete)
{if(confirm(message))
{var obj;var imgsdelete='';obj=AJAX_MM_findObj(varbase+imgdelete);if(obj)
obj.checked=true;for(i=0;i<maximg;i++)
{obj=AJAX_MM_findObj(varbase+i);if(obj)
{if(obj.checked==true)
{obj=AJAX_MM_findObj(varimginput+i);if(imgsdelete!='')
imgsdelete=imgsdelete+'[,]';imgsdelete=imgsdelete+obj.value;}}}
document.location=urlbase+'&'+varimgg+'='+imgsdelete;}}
function Inmo_addOnunLoadEvent(func)
{var oldonunload=window.onunload;if(typeof window.onunload!='function'){window.onunload=func;}else{window.onunload=function(){if(oldonunload){oldonunload();}
func();}}}
function Inmo_SetCookie(cookieName,cookieValue,nDays){var today=new Date();var expire=new Date();if(nDays==null||nDays==0)nDays=1;expire.setTime(today.getTime()+3600000*24*nDays);document.cookie=cookieName+"="+escape(cookieValue)
+";expires="+expire.toGMTString();}
Inmo_addOnunLoadEvent(function()
{var obj=AJAX_MM_findObj('source');if(obj)
Inmo_SetCookie("im_rf",obj.value,1);});function ClearList(List){obj=AJAX_MM_findObj(List);if(!obj){return;}obj.innerHTML="";}function Makeajax(){var req=false;if(window.XMLHttpRequest&&!(window.ActiveXObject)){try{req=new XMLHttpRequest();}catch(e){}}else if(window.ActiveXObject){try{req=new ActiveXObject("Msxml2.XMLHTTP");}catch(e){try{req=new ActiveXObject("Microsoft.XMLHTTP");}catch(e){}}}return req;}function AddEvent(variable,functionname,evento){var obj=variable;if(window.addEventListener){eval('obj.addEventListener("'+evento+'",'+functionname+',false);');}else{eval('obj.detachEvent("'+evento+'",'+functionname+',false);');}return obj;}function ShowHidediv(div,show){var obj=AJAX_MM_findObj(div);if(obj){if(show){obj.style.width="auto";obj.style.height="auto";obj.style.visibility="visible";}else{obj.style.height="1px";obj.style.width="1px";if(obj.style.overflow){obj.style.overflow="scroll";}obj.style.visibility="hidden";}}}function Hidediv(){ShowHidediv("divload",false);}function WAJAX(name){this.name=name;this.url="";this.apdiv=true;this.type="POST";this.divload="";this.dato="";this.async=true;this.username="";this.password="";this.xmlhttp=false;this.headers=new Array();this.headers['Header']=new Array();this.headers['Value']=new Array();this.error="";this.shDiv=function(Show){if(this.divload!="")ShowHidediv(this.divload,Show);};this.setHeader=function(Header,Value){if(this.xmlhttp){this.xmlhttp.setRequestHeader(Header,Value);}};this.send=function(){if(this.xmlhttp){if(this.dato!=""){this.xmlhttp.send(this.dato);}else{this.xmlhttp.send();}}};this.onOpen=function(){return;};this.onSend=function(){return;};this.onRecive=function(){return;};this.onError=function(){return;};this.onLoad=function(){return;};this.progress=function(){return;};this.Hnd=function(){if(this.xmlhttp){this.progress();switch(this.xmlhttp.readyState){case 1:this.onOpen();break;case 2:this.onSend();break;case 3:this.onRecive();break;case 4:this.error="";if(this.apdiv==false){this.shDiv(false);}if(this.xmlhttp.status>207){switch(this.xmlhttp.status){case 404:this.error="Ups! no existe dirección";break;case 500:this.error="Ups! error en el servidor";break;default:this.error="Ups! error de procesamiento de página"+this.xmlhttp.status;}this.onError();}else{this.onLoad();}if(this.apdiv==true){this.shDiv(false);}this.xmlhttp.abort();break;}}};this.getText=function(){if(this.xmlhttp){return this.xmlhttp.responseText;}return"";};this.getXml=function(){if(this.xmlhttp){if(this.xmlhttp.responseXML){return this.xmlhttp.responseXML;}else{return false;}}return false;};this.open=function(type){if(this.username!=""){this.xmlhttp.open(type,this.url,this.async,this.username,this.password);}else{this.xmlhttp.open(type,this.url,this.async);}};this.sendGet=function(){if(this.xmlhttp){this.shDiv(true);this.open("GET");this.xmlhttp.send();}};this.sendPost=function(){if(this.xmlhttp){this.shDiv(true);this.open("POST");this.setHeader('Content-Type','application/x-www-form-urlencoded');this.send();}};this.openSend=function(){var i=0;if(this.xmlhttp){this.shDiv(true);this.open(this.type);for(i=0;i<this.headers['Header'].length;i++){this.setHeader(this.headers['Header'][i],this.headers['Value']);}this.send();}};this.arrayValuesxml=function(ftext,fvalue,err){if(!this.xmlhttp){return false;}xml=this.getXml();if(!xml){return false;}if(xml.getElementsByTagName(err).length>0){if(xml.getElementsByTagName(err)[0].textContent){alert(xml.getElementsByTagName(err)[0].textContent);}return false;}var info=new Array();for(i=0;i<xml.getElementsByTagName(fvalue).length;i++){text="";if(xml.getElementsByTagName(ftext)[i]){if(xml.getElementsByTagName(ftext)[i].textContent){text=xml.getElementsByTagName(ftext)[i].textContent;}else if(xml.getElementsByTagName(ftext)[i].firstChild){if(xml.getElementsByTagName(ftext)[i].firstChild.data){text=xml.getElementsByTagName(ftext)[i].firstChild.data;}}}value="";if(xml.getElementsByTagName(fvalue)[i]){if(xml.getElementsByTagName(fvalue)[i].textContent){value=xml.getElementsByTagName(fvalue)[i].textContent;}else if(xml.getElementsByTagName(fvalue)[i].firstChild){if(xml.getElementsByTagName(fvalue)[i].firstChild.data){value=xml.getElementsByTagName(fvalue)[i].firstChild.data;}}}info[i]=new Array();info[i]['Value']=value;info[i]['Text']=text;}return info;};this.Loadlist=function(obj,ftext,fvalue,err){if(obj!=""&&obj!="undefined"){if(this.xmlhttp){var xml=this.getXml();if(xml){if(xml.getElementsByTagName(err).length<=0){var s=AJAX_MM_findObj(obj);if(s){s.innerHTML="";for(i=0;i<xml.getElementsByTagName(ftext).length;i++){text="";if(xml.getElementsByTagName(ftext)[i]){if(xml.getElementsByTagName(ftext)[i].textContent){text=xml.getElementsByTagName(ftext)[i].textContent;}else if(xml.getElementsByTagName(ftext)[i].firstChild){if(xml.getElementsByTagName(ftext)[i].firstChild.data){text=xml.getElementsByTagName(ftext)[i].firstChild.data;}}}value="";if(xml.getElementsByTagName(fvalue)[i]){if(xml.getElementsByTagName(fvalue)[i].textContent){value=xml.getElementsByTagName(fvalue)[i].textContent;}else if(xml.getElementsByTagName(fvalue)[i].firstChild){if(xml.getElementsByTagName(fvalue)[i].firstChild.data){value=xml.getElementsByTagName(fvalue)[i].firstChild.data;}}}if(s.options){s.options[i]=new Option(" "+text+" ",value,false,false);}}}}}}}};this.close=function(){clearInterval(this.timer);};this.xmlhttp=Makeajax();if(!window.WAJAX){window.WAJAX=new Array();window.WAJAX.Version="1.0";window.WAJAX.Author="Rodrigo José Prado Mendoza";}window.WAJAX[this.name]=this;if(window.WAJAX[this.name]){this.timer=setInterval("window.WAJAX['"+this.name+"'].Hnd()",4);}}