ajax=new Object();ajax.ENABLED_sys=false;ajax.ALERT_C=false;ajax.alertcount=1;ajax.CAP_DEF="visual";function so_getText(obj){if(obj.nodeType == 3)return obj.data;var txt = new Array(), i=0;while(obj.childNodes[i]){txt[txt.length]= so_getText(obj.childNodes[i]);i++;}return txt.join("");}ajax.loadingp=function(){if(document.getElementById("loadingp"))return;var lp=document.createElement("div");lp.setAttribute("id","loadingp");var progress=document.createElement("img");progress.setAttribute("alt","...");progress.setAttribute("style","width:16px;height:16px;");progress.setAttribute("src","/images/progress.gif");lp.appendChild(progress);var txt=document.createElement("span");txt.textContent=" Cargando...";lp.appendChild(txt);document.getElementsByTagName("body")[0].appendChild(lp);};ajax.Test=function(){var txt=document.createElement("span");var err=1;txt.textContent="";if(txt.innerHTML=="<html></html>")err=0;txt.innerHTML="*";if(txt.textContent!="*")err=1;if(txt.lastChild.nodeName!="b")err=1;ajax.ENABLED_sys=true;_ajaxO=ajax.engine("none",true);if(!_ajaxO)err=1;if(!_ajaxO.open)err=1;ajax.ENABLED_sys=false;return err;};ajax.Init=function(cap){if(!ajax.Test()){return;}ajax.ENABLED_sys=true;ajax.LDHTML="

\"Leyendo\"";ajax.LDHTML+="
OBTENIENDO DATOS DEL SERVIDOR

";ajax.loadingp();ajax.ldstatus(undefined,true);try{ajax.LDHTML.hash=str_md5(ajax.LDHTML);}catch(e){ajax.LDHTML.hash="-";}};ajax.ldstatus=function(cap,hide){if(hide){ajax.various.display('loadingp',0);if(ajax.various.textlay(undefined,cap,1)==ajax.LDHTML)ajax.various.textlay(" ",cap);return;}ajax.various.display('loadingp',1);ajax.various.textlay(ajax.LDHTML,cap);};ajax.CURR_PAGE=null;CURR_bURL=null;ajax.CURR_REQ=null;ajax.engine=function(override,noalert){if(!override)override="text/plain";if(!ajax.ENABLED_sys)return;var http_request = false;var sErr = "";if(window.XMLHttpRequest){try{http_request = new XMLHttpRequest();if(override!="application/nooverride" && http_request.overrideMimeType)http_request.overrideMimeType(override);}catch(e){sErr = e;};}else if(window.ActiveXObject){var sVers =["Msxml2.XMLHTTP.7.0", "Msxml2.XMLHTTP.6.0", "Msxml2.XMLHTTP.5.0", "Msxml2.XMLHTTP.4.0", "Msxml2.XMLHTTP.3.0", "Msxm1l2.XMLHTTP", "Microsoft.XMLHTTP"];for(var cii=0;cii< sVers.length;cii++)try{http_request = new ActiveXObject(sVers[cii]);sErr="";break;}catch(e){sErr = e;};}if(!http_request && !noalert){ajax.various.warnwin('Abandonando. Error en XMLHttpRequest.\n'+sErr);return false;}return http_request;};ajax.various=new Object();ajax.various.display=function(cap,set){if(!document.getElementById(cap)){ajax.various.warnwin("Capa inexistente("+cap+").");return;}if(set==true){try{document.getElementById(cap).style.display = "block";}catch(e){return false;};}else{try{document.getElementById(cap).style.display = "none";}catch(e){return false;};}};ajax.various.textlay=function(msg,cap,get){if(!msg)msg=" ";if(!cap)cap=ajax.CAP_DEF;if(!document.getElementById(cap)){ajax.various.warnwin("Capa inexistente("+cap+").");return;}if(get){return document.getElementById(cap).innerHTML;}try{document.getElementById(cap).innerHTML=msg;}catch(e){return false;};};ajax.various.alerterr=function(msg,err,cap){if(!msg || typeof(msg)!="string")msg="";if(!err || typeof(err)!="string")return;c=Math.round(Math.random()*1000);c2=Math.round(Math.random()*1000);ajax.various.textlay(msg+"
",cap);ajax.various.textlay(""+e+"","err"+c+c2);};ajax.various.warnwin=function(msg){if(ajax.debug || 1){var ww=document.createElement("div");ww.setAttribute("id","ajax.various.warnwin"+(ajax.alertcount));ww.setAttribute("style","z-index:99;position:absolute;top:20px;left:20px;background:white url('/images/warning.png');background-repeat:no-repeat;background-position:5px center;border:2px solid red;color:blue;padding:5px;padding-left:40px;padding-top:20px;border-top-width:8px;text-align:left;min-width:85px;");var title=document.createElement("span");title.setAttribute("style","color:black;font-weight:bold;position:absolute;top:0;left:42px;");title.textContent="Alerta "+(ajax.alertcount);ww.appendChild(title);var txt=document.createElement("span");txt.setAttribute("style","color:maroon;margin-top:3px;");txt.textContent=msg;ww.appendChild(txt);var close=document.createElement("object");var closel=document.createElement("a");close.setAttribute("style","position:absolute;top:2px;right:2px;cursor:pointer;");close.setAttribute("onclick","ajax.various.closeww('"+(ajax.alertcount++)+"');return false;");close.setAttribute("type","image/png");close.setAttribute("data","/images/close.png");closel.textContent="X";closel.setAttribute("href","#");close.appendChild(closel);ww.appendChild(close);document.getElementsByTagName("body")[0].appendChild(ww);}};ajax.various.closeww=function(id){if(document.getElementById("ajax.various.warnwin"+id))document.getElementsByTagName("body")[0].removeChild(document.getElementById("ajax.various.warnwin"+id));};ajax.various.visib=function(cap,set){if(set==1){try{document.getElementById(cap).style.visibility = "visible";}catch(e){return false;};}else{try{document.getElementById(cap).style.visibility = "hidden";}catch(e){return false;};}};ajax.PHP="";ajax.loadp=function(php,values,cap,bURL,aftercall){if(!bURL)bURL="/loadphp.php/";if(!cap)cap=ajax.CAP_DEF;if(!values)values="";if(!php)php="index";if(!document.getElementById(cap)){if(ajax.DEBUG)ajax.various.warnwin("Capa inexistente("+cap+").");return false;}_ajaxO=ajax.engine();if(!_ajaxO)return false;_values_send=values;_URL_=bURL+php;_ajaxO.open("POST",_URL_,true);_ajaxO.onreadystatechange= function(){if(_ajaxO.readyState==1)ajax.ldstatus(cap);else if(_ajaxO.readyState==4){if(_ajaxO.status>=200 && _ajaxO.status<=204){if(ajax.ALERT_C)ajax.various.warnwin(_ajaxO.responseText);try{while(document.getElementById(cap).firstChild)document.getElementById(cap).removeChild(document.getElementById(cap).firstChild);ajax.various.textlay(_ajaxO.responseText,cap);ajax.ldstatus(cap,1);if(aftercall && _ajaxO.status<203)setTimeout(aftercall,500);}catch(e){ajax.various.alerterr("Error inesperado procesando documento.
Puede deberse a un BUG de su navegador.
",e,cap);return false;}}else{ajax.various.alerterr("Resultado inesperado.
Error durante la peticion.El servidor devolvio ",_ajaxO.statusText,cap);}return false;}};_ajaxO.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");if(_values_send=="")_values_send="ini=ini";_ajaxO.send(_values_send);if(cap==ajax.CAP_DEF){ajax.CURR_bURL=bURL;ajax.CURR_PAGE=php;ajax.CURR_REQ=values;}return true;};function loaddata(xml,get,args){}ajax.various.popup=function(url,retur,width,height,scroll){if(!url)url="about:blank";if(!width)width="510";if(!height)height="510";if(!scroll)scroll="no";var w=window.open(url,'gpl_popup','status=no,resizable=no,toolbar=no,directories=no,menubar=no,scrollbars='+scroll+',width='+width+',height='+height);if(retur)return w;};ajax.form=function(formID,target,layer,extravals,after){if(!ajax.ENABLED_sys || !formID || !document.getElementById(formID))return false;if(!target)target=formID;if(!extravals)extravals="ini=ini";var form=document.getElementById(formID);lockForm(formID,true);var args=encodeURIComponent(extravals);var g=function(form,el){var i=0,j=0,ff='';j=form.getElementsByTagName(el);for(i=0;;i++){if(j[i]){if((j[i].type=="radio" || j[i].type=="checkbox")&& j[i].checked==false){continue;}if(j[i].type=="submit" || j[i].type=="reset" || j[i].type=="button"){continue;}ff+="&"+j[i].name+"="+encodeURIComponent(j[i].value);}else break;}return ff;};args+=g(form,"input");args+=g(form,"select");args+=g(form,"textarea");return ajax.loadp(target,args,layer,false,after);};function fmd5(){ajax.form("makemd5");}function send_upart(){ajax.orm("writeartf");}