function abrelv(lista)
{
  var vtoolbars = 
"directories=no,location=no,menubar=no,status=no,titlebar=no,toolbar=no";
  var vsize = "screenX=100,screenY=100,width=600,height=400,scrollbars=yes";
  var vparams = vtoolbars + ',' + vsize;
  lov=window.open(lista,'lov',vparams);
  lov.focus();
}

function cogeval(formu,campo,valor)
{
	var i=0;
	var j=0;
	var k=0;
	var encontrado=false;
	var ns = (document.layers)? true:false;
	var padre;


	if (ns)
	{

		for (k=0;k<opener.document.layers.length;k++ && !encontrado) 
		{
			for (i=0;i<opener.document.layers[k].document.forms.length && 
			opener.document.layers[k].document.forms[i].name!=formu;i++);
			if (i<opener.document.layers[k].document.forms.length)
			{
				encontrado=true;
				padre=opener.document.layers[k].document.forms[i];
			}

		}

	}
	else
	{
		for (i=0;i<opener.document.forms.length &&  opener.document.forms[i].name!=formu;i++);
		if (i<opener.document.forms.length)
		{
			encontrado=true;
			padre=opener.document.forms[i];
		}
	}
	if (encontrado)
	{
		for (j=0;j<padre.elements.length && padre.elements[j].name!=campo;j++);
		if (j<padre.elements.length)
		{
			if (padre.elements[j].name=="MATERIAS" && padre.elements[j].value)
			{
				padre.elements[j].value = padre.elements[j].value + " o "+"'"+valor+"'";
			}
			else
				padre.elements[j].value ="'"+valor+"'";
			padre.elements[j].focus();
		}
	}
    self.close();
}

function cogevaf(formu,campo,valor)
{
	var i=0;
	var j=0;
	var k=0;
	var encontrado=false;
	var ns = (document.layers)? true:false;
	var padre;


	if (ns)
	{

		for (k=0;k<opener.document.layers.length;k++ && !encontrado) 
		{
			for (i=0;i<opener.document.layers[k].document.forms.length && 
			opener.document.layers[k].document.forms[i].name!=formu;i++);
			if (i<opener.document.layers[k].document.forms.length)
			{
				encontrado=true;
				padre=opener.document.layers[k].document.forms[i];
			}

		}

	}
	else
	{
		for (i=0;i<opener.document.forms.length &&  opener.document.forms[i].name!=formu;i++);
		if (i<opener.document.forms.length)
		{
			encontrado=true;
			padre=opener.document.forms[i];
		}
	}
	if (encontrado)
	{
		for (j=0;j<padre.elements.length && padre.elements[j].name!=campo;j++);
		if (j<padre.elements.length)
		{
			padre.elements[j].value =valor;
			padre.elements[j].focus();
		}
	}
    self.close();
}

function abreinfo(lista,x,y,w,h)
{
  var vtoolbars = 
"directories=no,location=no,menubar=no,status=no,titlebar=no,toolbar=no";
  var vsize = "screenX="+x+",screenY="+y+",width="+w+",height="+h+",scrollbars=yes";
  var vparams = vtoolbars + ',' + vsize;
  vinfo=window.open(lista,'vinfo',vparams);
  vinfo.focus();
}