

function ejecutar(pagina,accion){
	document.form.accion.value=accion
	document.form.action =pagina
	document.form.submit()
}

function ver_campos(){

var campos
	for (i=0; i<40; i++)
	{
		campos= document.form[i].name + "\n";
	}
	alert(campos);
}
//------------------- FUNCION QUE INTRODUCE NEGRITA O ITALICA EN TEXT AREA ------------------



function bbcode(v,campo)
 {
 
 if (document.selection) // for IE
   {
    var str = document.selection.createRange().text;
    document.forms['form'].elements[campo].focus();
    var sel = document.selection.createRange();
    sel.text = "<" + v + ">" + str + "</" + v + ">";
    return;
   }
  else if ((typeof document.forms['form'].elements[campo].selectionStart) != 'undefined') // for Mozilla
   {
    var txtarea = document.forms['form'].elements[campo];
    var selLength = txtarea.textLength;
    var selStart = txtarea.selectionStart;
    var selEnd = txtarea.selectionEnd;
    var oldScrollTop = txtarea.scrollTop;
    var s1 = (txtarea.value).substring(0,selStart);
    var s2 = (txtarea.value).substring(selStart, selEnd);
    var s3 = (txtarea.value).substring(selEnd, selLength);
    txtarea.value = s1 + '<' + v + '>' + s2 + '</' + v + '>' + s3;
    txtarea.selectionStart = s1.length;
    txtarea.selectionEnd = s1.length + 5 + s2.length + v.length * 2;
    txtarea.scrollTop = oldScrollTop;
    txtarea.focus();
    return;
   }
  else insert('<' + v + '></' + v + '> ',campo);
 }
function insert(what,campo)
 {
  if (document.forms['form'].elements[campo].createTextRange)
   {
    document.forms['form'].elements[campo].focus();
    document.selection.createRange().duplicate().text = what;
   }
  else if ((typeof document.forms['form'].elements[campo].selectionStart) != 'undefined') // für Mozilla
   {
    var tarea = document.forms['form'].elements[campo];
    var selEnd = tarea.selectionEnd;
    var txtLen = tarea.value.length;
    var txtbefore = tarea.value.substring(0,selEnd);
    var txtafter =  tarea.value.substring(selEnd, txtLen);
    var oldScrollTop = tarea.scrollTop;
    tarea.value = txtbefore + what + txtafter;
    tarea.selectionStart = txtbefore.length + what.length;
    tarea.selectionEnd = txtbefore.length + what.length;
    tarea.scrollTop = oldScrollTop;
    tarea.focus();
   }
  else
   {
    document.forms['form'].elements[campo].value += what;
    document.forms['form'].elements[campo].focus();
   }
 }
//-------------------------validacion de formularios---------------------------------------------------
//-----------------------------------------------------------------------------------------------------
function check_date(name){
	//alert("esta es  la prueba"+name.value); aaaa-mm-dd
	
	var anho=name.value.substr(0,4);
	var guion1=name.value.substr(4,1);
	var mes=name.value.substr(5,2);
	var guion2=name.value.substr(7,1);
	var dia=name.value.substr(8,2);
	
	if ((dia>'0' && dia<'32' ) &&( guion1=='-' || guion1=='/') && (mes>'0' && mes <'13')&& ( guion2=='-' || guion2=='/' ) && (anho >'1900') )
	{
		return 1;
	}else{
		alert("Debe introducir una fecha correcta, con formato aaaa-mm-dd.");
		name.value='';
		name.focus();
	}
}
//-----------------------------------------------------------------------------------------------------
function check_date_ddmmaaaa(name){
	//alert("esta es  la prueba"+name.value); dd-mm-aaaa
	
	var dia=name.value.substr(0,2);
	var guion1=name.value.substr(2,1);
	var mes=name.value.substr(3,2);
	var guion2=name.value.substr(5,1);
	var anho=name.value.substr(6,4);

	if ((dia>'0' && dia<'32' ) &&( guion1=='-' || guion1=='/') && (mes>'0' && mes <'13')&& ( guion2=='-' || guion2=='/' ) && (anho >'1900') )
	{
		return 1;
	}else{
		alert("Debe introducir una fecha correcta, con formato dd-mm-aaaa.");
		name.value='';
		
	}
}

//-----------------------------------------------------------------------------------------------------

function check_email(name){
	var anum=/^\w[.\w]+@+\w+.+\w+$/
	if (anum.test(name.value))
	{
		return 1;
	}
	else{
		alert("Debe introducir un email correcto");
		name.value='';
		name.focus();
	}
}

//-----------------------------------------------------------------------------------------------------

function check_claves()
{
  var c1=document.form.clave.value;
  var c2=document.form.clave2.value;
  if (c1!=c2)
  {
  	alert("Las claves introducidas no son iguales. Repita la clave.");
	document.form.clave.value='';
	document.form.clave2.value='';
	document.form.clave.focus();
  }
}

function abrir_ventana_1_col(ventana,query,nombre,titulo)
{
window.open(ventana+'?q='+query+'&nombre='+nombre+'&titulo='+titulo,'PopUp','width=320,height=200,screenX=600,screenY=300,top=300,left=600,scrollbars=YES, resizable=YES')
}
function cargar_anterior(nombre,valor)
{
window.opener.document.form[nombre].value=valor+'; '+window.opener.document.form[nombre].value;
//window.close();
}

function focus_next(campo,num,ste){
	// *num* caracteres como maximo
	if (campo.value.length>num-1){
	//alert(ste);
	document.form[ste].focus();
	}
}
