//######### HTML_UTIL INTERFACE ##############################
// A.N.M.A.T.  -  INFORMATICA
// Ing. Igor Dedough November 15 2002
// U.M. 
//############################################################################
//------------------ BUTTON WITH FUNCTION IN TD -------------------------------
function b(val,fn,cols)
{
 document.write('<td cols="'+cols+'"><button id="'+val+'"name="'+val+'"onclick="'+fn+'">'+val+'</button></td>');
}
function _b(val,fn,cols)
{
 document.write('<button id="'+val+'"name="'+val+'"onclick="'+fn+'">'+val+'</button>');
}
var RetValDlg = '';
function openDlg(file_name,fn,paramet)
{
  RetValDlg = get_ObjVal(file_name,paramet);
  if(fn) eval(fn);
}
function get_ObjVal(file_name,paramet)
{
 var d = showModalDialog("dlg_" + file_name + ".htm",paramet,"font-size:10px;dialogWidth:0px;dialogHeight:0px;status: 0;edge: Raised;unadorned: yes;help: 0;scroll: 0");
 if (d == null)
        return;   
  else{
     return d;
  }
}
//----------------- CLOSE DLG BY ESC KEY --------------------------------------



function ExitDlg(){ if(event.keyCode == 27) window.close(); }


//----------------  SHOW/HIDE DIV ELEMENT BY ID -------------------------------
function showDIV(id_div)
{
 var d = document.getElementById(id_div);
 d.style.display = (d.style.display == "none")?"block":"none";
}
//--------------- ESCRIBA TAG CON FORMATO OPEN VENTANA PARA BUSCAR --------
function wOpener(consulta,abrir,abrir_hidden,cols,sep,adicionalesAborrar,functAdicionalEliminar,functAdicionalPresionar)
{
 if(!sep)sep='';
 var str ='';
 var reseteado = '';
 if(abrir!=0){
   var vabrir = abrir.split(',');
   for(j=0;j<vabrir.length;j++)
   {
     if(j==(vabrir.length-1)) sep = '';
     var vabrir_show = vabrir[j].split('=');   
     str += '<input name="'+vabrir_show[0]+'" size="'+vabrir_show[1]+'" readonly>&nbsp;'+sep+'&nbsp;';
     reseteado+= "" + vabrir_show[0] + ".value = \'\';"
   }
 }  
 if(abrir_hidden!=0){
   var vabrir_hidden = abrir_hidden.split(',');
   for(i=0;i<vabrir_hidden.length;i++)
   {
   	str += '<input name="'+vabrir_hidden[i]+'" type="hidden">';
   	reseteado+= "" + vabrir_hidden[i]+".value = \'\';"
   }
 } 
 if (adicionalesAborrar)
 {
   if (adicionalesAborrar.split(',')[1])
   {
   	var vadicionalesAborrar = adicionalesAborrar.split(',');
	for(j=0;j<vadicionalesAborrar.length;j++)
	{
		reseteado+= vadicionalesAborrar[j] + ".value = \'\';"
	}
   }
   else
   {
   	reseteado+= adicionalesAborrar + ".value = \'\';"
   }
 }
 str += '&nbsp;<button onclick="';
 if(functAdicionalPresionar)
 {
 	str += functAdicionalPresionar;
 	//alert(str);
 }
 str += 'openData(\''+consulta+'\');">ELEGIR</button>&nbsp;&nbsp;<img ALT="QUITAR LA SELECCIÓN REALIZADA" src="../../../images/x10x10.gif" onmouseover="this.style.cursor=\'hand\';" onclick="' + reseteado;
 if (functAdicionalEliminar)
 {
  	str += functAdicionalEliminar;
 }
 str += '" width="10" height="10"></img>';
 //alert("FINAL -->  " + str);
 document.write(str);
 }

//---------------------------------------------------------------
function _wOpener(consulta,abrir,abrir_hidden,cols,sep)
{
 if(!sep)sep='';
 var str ='';
 if(abrir!=0){
   var vabrir = abrir.split(',');
   for(j=0;j<vabrir.length;j++)
   {
     if(j==(vabrir.length-1)) sep = '';
     var vabrir_show = vabrir[j].split('=');   
     str += '<input name="'+vabrir_show[0]+'"size="'+vabrir_show[1]+'"readonly>&nbsp;'+sep+'&nbsp;';
   }
 }  
 if(abrir_hidden!=0){
   var _hidden = abrir_hidden.split(',');
   for(i=0;i<_hidden.length;i++)
   {
     var vabrir_hidden = _hidden[i].split('='); 
     str += '<input name="'+vabrir_hidden[0]+'"type="hidden" class="int" sz="' + vabrir_hidden[1] + '">';
   }
 } 
 str += '&nbsp;<button id="btn_elegir" onclick="openData(\''+consulta+'\')">ELEGIR</button>';
 document.write(str);
}
//---------------------------------------------------------------
function check_Size(objeto,maximo,denominacion,accion)
{
	if (objeto.value.length>maximo)
	{
		alert("Usted no puede superar " + maximo + " caracteres en " + denominacion + " y tiene " + objeto.value.length);
		if (accion!="DEJAR") {objeto.value = objeto.value.substr(0,200)}
		objeto.focus();
		return false;
	}
	else
	{
		return true;
	}
}
//---------------------------------------------------------------
function xmlCortado(campo,xmlStr,largo)
{
	var xmlDoc = new ActiveXObject("Msxml2.DOMDocument");
	xmlDoc.async = false;
	xmlDoc.loadXML(ConvToASCII_fast(xmlStr));
	cortarEnteroXML(campo,xmlDoc.documentElement,largo)
	return xmlDoc;
}

function cortarEnteroXML(campo,xmlDE,largo)
{
	if (xmlDE.hasChildNodes())
	{
		TruncFieldInXMLDoc(campo,xmlDE,largo);
		for (var i=0;i<xmlDE.childNodes.length;i++)
		{
			nodoA = xmlDE.childNodes.item(i);
			TruncFieldInXMLDoc(campo,nodoA,largo);
			if (nodoA.hasChildNodes())
			{
				cortarEnteroXML(campo,nodoA,largo);
			}
		}
	}
	return xmlDE;
}
//---------------------------------------------------------------
function ConvToASCII(str)
{
	var arrCode = str.split('#');
	var string = arrCode[0];
	for(var i = 1; i < arrCode.length; i++)
	{
		var f = (arrCode[i].charAt(0) == '0')?1:0;
		if (arrCode[i].length>=3)
		{
			var h = arrCode[i].substring(f,3);
			if ((!(isNaN(h))) && (arrCode[i].substring(0,1)!=" ") && (arrCode[i].substring(1,2)!=" ") && (arrCode[i].substring(2,3)!=" "))
			{
				var charASCII = String.fromCharCode(parseInt(arrCode[i].substring(f,3)));
				string += String(charASCII) + String(arrCode[i].substring(3)); 
			}
			else
			{
				string += "#" + h + String(arrCode[i].substring(3)); 
			}
		}
		else
		{
			string += "#"
			if (arrCode[i].length>0)
			{
				string += String(arrCode[i]); 
			}
		}
	} 
	return string;
}