function OpenConsultaDW(form_name, url, campo_criterio, ls_row) {

       var arreglo = new Array()
       Cargar_Arreglo(arreglo, campo_criterio)
       
       var ls_values="", ls_columns="", ls_values2="", campo_criterios=""
        for (object_index = 0; object_index < form_name.length; object_index++)
       {
          if (form_name[object_index].type != 'button')
          { 
             ls_name = form_name[object_index].name
             li_underline = ls_name.lastIndexOf('_')
             if (ls_row == ls_name.substring(li_underline + 1, ls_name.length))
             {
                 for (i = 0; i < arreglo.length; i++)
                 {   
                     if (ls_name.substring(0,li_underline) == arreglo[i])
                     {
                           ls_values2 =  ls_values2 + form_name[object_index].value + "±"
                           campo_criterios =  campo_criterios + arreglo[i] + ","
                     }
                 }
                 
                 ls_columns = ls_columns + ls_name.substring(0,li_underline) + "|"
                 ls_values =  ls_values + form_name[object_index].value + "|"
             }
          }
       }
        url = url + "&columnas=" + campo_criterios + "&val=" + ls_values2 + "&row=" + ls_row

	var hWnd = window.open("consulta.asp?" + url,"ConsultaDW","width=450,height=325,resizable=yes,scrollbars=yes");
	if ((document.window != null) && (!hWnd.opener))
		hWnd.opener = document.window;
}

function Opencalendario(dwname, columna, row) {  
	var hWnd = window.open("calendario.asp?columna=" + columna + "&cod_dw=" + dwname,"ConsultaDW","width=240,height=220,resizable=yes,scrollbars=no");
	if ((document.window != null) && (!hWnd.opener))
		hWnd.opener = document.window;
}

function Opencalculadora(dwname, columna, row) {  
	var hWnd = window.open("calculadora.asp?columna=" + columna + "&cod_dw=" + dwname,"ConsultaDW","width=240,height=230,resizable=yes,scrollbars=yes");
	if ((document.window != null) && (!hWnd.opener))
		hWnd.opener = document.window;
}

function gf_submit_motor(button,form_name, action, tag) {
    var POS;
    POS = 0
    for (object_index = 0; object_index < form_name.length; object_index++)
    {
	
     if (form_name[object_index].type == 'textarea' || form_name[object_index].type == 'text' )
     {
         POS =  form_name[object_index].value.indexOf('&')

         if (POS >= 0)
         {
             form_name[object_index].value = form_name[object_index].value.replace(/[&]/g, '*amp*')
             
         }
     }
     form_name[object_index].disabled = false
     
    }
    if (button != null)
        button.disabled=true 
    form_name.mant_action.value = action
    form_name.mant_button_name.value = tag
   

    form_name.submit()
}




function Cargar_Arreglo(arreglo, cadena) {
var i,pos,CONT,e, INICIO = 1;
CONT = 0
POS =  cadena.indexOf(',')
while (POS != -1)
{       
	arreglo[CONT] =  cadena.substring(0, POS)
        cadena=cadena.substring(POS+1, cadena.length) 	
        POS =  cadena.indexOf(',')
        CONT ++	
}

arreglo[CONT] =  cadena.substring(0, cadena.length)

}



function getNextElement (field) {
var fieldFound = false;
  var form = field.form;
  var tabindex_actual = field.tabIndex;
  for (var e = 0; e < form.elements.length; e++) {
     if  (form.elements[e].tabIndex== tabindex_actual + 1)
         return form.elements[e];
  }
  
  return field;
}


function tabOnEnter (field, form, evt, as_action, as_tag) {
  var field_found
  var keyCode = document.layers ? evt.which : document.all ? 
evt.keyCode : evt.keyCode;
  if (keyCode != 13)
    return true;
  else {
    field_found = getNextElement(field);
    field_found.focus();
    field_found.select();
    return false;
  }
}



function submitOnEnter (field, form, evt, as_action, as_tag) {
  var keyCode = document.layers ? evt.which : document.all ? 
  evt.keyCode : evt.keyCode;
  if (keyCode != 13)
    return true;
  else {    
  ls_button = eval( form.name + "." + as_tag)
    gf_submit_motor(ls_button, form, "Update", as_tag);
    return false;
  }
}



function link(url) 
{  
  var hoja_destino
  var pos, pos_f
  pos =  url.indexOf('parm2=')
  pos_f =  url.indexOf('&', pos)
  hoja_destino = url.substring(pos + 6, pos_f ) 
  pos = url.indexOf("dd")

  if (num_hoja != hoja_destino && pos > 0)
    url = url.substring(0, pos ) 
  url = url.replace('parm1=0', 'parm1=' + '1' )
  url = url.replace('parm2=0', 'parm2=' + num_hoja)
  this.location.href= "plantilla1.asp?"+ url

}



function funcion_usuario (form_name) {
if (form_name.name == 'dw_encuesta_submitForm')
  {
      for (object_index = 0; object_index < respuesta.length; object_index++)
      {
        
	if (respuesta[object_index].checked == true)
	{ 
             
             form_name.foto1_0.value = picture_1[object_index].value
 		window.close()

	}
      }

  }
}


function gf_setear(consulta, cadena, funcion, action)
{   
var i, e, j, ll_row;
for(i=0; i < form_list.length;i++)
	{
	e= form_list.elements[i];
	if (e.name == "res")
	    e.value=cadena;
	if (e.name == "tipo_contenido")
	    e.value="6";
	if (e.name == "cod_objeto")
	    e.value = consulta;
	if (e.name == "nombre_funcion")
	    e.value = funcion;
	if (e.name == "mant_action")
	    e.value = "delete";
	if (e.name == "boton")
	    e.value = action;
	}
 
form_list.submit()
}



function gf_submit(action, consulta, portal, hoja)
{   
var i, e, j, ll_row, ls_link, visited;
var hoja_destino
var pos, pos_f, pos_r
visited = '0';
  if (action == 'new')
     {     
     visited = '1';
     i = consulta.length - 1;
     e=consulta.elements[i]; 
     ls_link = e.value;
     pos =  ls_link.indexOf('parm2=');
     pos_f =  ls_link.indexOf('&', pos);
     hoja_destino = ls_link.substring(pos + 6, pos_f );

     if (num_hoja != hoja_destino)
     {
 	  pos_r = ls_link.indexOf('&retrieval=');

        if (pos_r > 0)
		ls_link = ls_link.substring(0, pos_r + 11 ) 

     }
     ls_link = ls_link.replace('parm1=0', 'parm1=' + portal)
     ls_link = ls_link.replace('parm2=0', 'parm2=' + num_hoja)
    
     document.location.href = ls_link;
    }

  if (action == 'seleccionar_todo')
     {     
     visited = '1';
	for(i=0;i< (consulta.length - 3);i++)
		{
		e=consulta.elements[i]; 
		if (e.type=='checkbox')
		    e.checked=true;
		}
     }
  if (action == 'des_seleccionar')
	{
     visited = '1';
	for(i=0;i< (consulta.length - 3);i++)
		{
		e=consulta.elements[i]; 
		if (e.type=='checkbox')	
		    e.checked=false;
		}
	}
  if (action == 'delete' || visited == '0' )
	{ 
         
	var ls_cadena, form;
	ll_row = consulta.length;
	ls_cadena = '';
	for(i=0;i< (consulta.length - 3) ; i++)
		{ 			
			e=consulta.elements[i];							
			if (e.type=='checkbox' && e.checked)	
			    {
			    i++;
			    e=consulta.elements[i];
			    if (ls_cadena!="")
			        ls_cadena += "|";
			    ls_cadena += e.value;
			    }
		}	
if (ls_cadena == '' && action == 'delete')
   { 
     alert("Error---No ha seleccionado nada de la lista");
   } 
else 
   { 
	var ls_consulta, ls_funcion
	for(;i < consulta.length;i++)
            {
            e=consulta.elements[i];	
	    if (e.name == "cod_objeto")
	        ls_consulta = e.value;
	    if (e.name == "nombre_funcion")
	        ls_funcion = e.value;	    
            }
	if (ls_consulta != "")
	    gf_setear(ls_consulta, ls_cadena, ls_funcion, action);
   } 
	}
}


	



function cargar_lista(archivos) 
{
  var i
  var ls_file = new Array
  Cargar_Arreglo(ls_file, archivos) 

  document.forms['Eliminar'].attachlist.options[1] = new Option('------------ Datos adjuntos ------------', 1);

  for(i=0;i < ls_file.length;i++)
   {
	document.forms['Eliminar'].attachlist.options[i+1] = new Option(ls_file[i], i+1);
   }
}



function aviso_preview(var1)
{   
window.open("plantilla1.asp?parm1=1&parm2=30&retrieval=var1="+var1+"|" , "","width=380px,height=160px,resizable=no, scrollbars=no")
}

function depto(var1)
{   
window.open("plantilla1.asp?parm1=1&parm2=40&retrieval=var1="+var1+"|" , "","width=800px,height=600px,resizable=yes, scrollbars=no")
}

function PopIt2(var1)
{   
window.open("plantilla1.asp?parm1=1&parm2=76&retrieval=var1="+var1+"|" , "","width=380px,height=220px,resizable=no, scrollbars=no")
}
function PopIt3(var1)
{   
window.open("plantilla1.asp?parm1=1&parm2=79&retrieval=var1="+var1+"|" , "","width=380px,height=220px,resizable=no, scrollbars=no")
}