var tipos=new Array();
var desc=new Array();
var a_cencos=new Array();
var n_cencos=0;
var n=0;
var n_comp=0;

//nuevas variables
var n_terceros=0;//cuenta el numero de terceros
var no_submit=0;
var pos_ter=new Array();
var m=0; //por cada tercero es un campo mas de tipo hidden
function parse_date(fecha){var dia=new String();var mes=new String();var anno=new String();var f=new String(fecha);var a=new Number();
a=0;
while(f.charAt(a)!="/"){
	if(isNaN(f.charAt(a))){
	return false;
	}else{
	dia+=f.charAt(a);}a++;}a++;while(f.charAt(a)!="/"){if(isNaN(f.charAt(a))){return false;}else{mes+=f.charAt(a);a++;}}anno+=f.substr(++a,4);return fecha_valida(Number(dia), Number(mes), Number(anno));}

function cambio_comprobante(){if(document.operacion.comprobante.value!=n_comp){document.operacion.comprobante.value=n_comp;}}

function llenar(){
	var des=0;
	var ori;
	for(i=0;i<n_terceros;i++){
		ori=pos_ter[i];
		ori++;
		des=ori+2;
		document.operacion.elements[des].value=document.operacion.elements[ori].value;
	}
}

function llamacalendar(campo)
{
	ventana_calendar=open('gen_clndrio.asp?campo=operacion.Campo['+ campo + ']&opcion=0','','width=220,height=140');
	ventana_calendar.focus();
}

function llamacalendar2(campo,campou,campod)
{
	ventana_calendar=open('gen_clndrio.asp?campo='+ campo + '&campou='+ campou + '&campod=' + campod +'&opcion=2','','width=220,height=140');
	ventana_calendar.focus();
}
function llamacalendar4(campo,campou,campod)
{
	ventana_calendar=open('gen_clndrio.asp?campo='+ campo + '&campou='+ campou + '&campod=' + campod +'&opcion=2','','width=220,height=140');
	ventana_calendar.focus();
}

function on_submit(){

	if(no_submit==1){
	no_submit=0;
	return false;
	}
	
	




var prim_error=-1;
var error=false;
var dia=document.operacion.day.value;
var mes=document.operacion.month.value;
var anno=document.operacion.year.value;

//si hay tercero en la pagina indica que se debe llenar hidden
if (n_terceros>0){
	llenar();
	}


	

	
if(document.operacion.Valor.value==""){
	alert("El campo Valor no tiene valor.  Por favor introduzca un valor en este campo");
	if(error==false){
	error=true;}
	}


xtemp=document.operacion.Valor.value;
while(xtemp.indexOf(',')!=-1)
	xtemp=xtemp.replace(',' , '')
document.operacion.Valor.value=xtemp;
	
if(isNaN(document.operacion.Valor.value))
	{
	alert("El campo Valor debe de tener un valor númerico.  Por favor rectifiquelo");
	if(error==false){
	error=true;}
	}
	
if(document.operacion.Valor.value < 0){
	alert("Valor sin impuestos:  No puede ser inferior a cero (0).  Por favor rectifiquelo");
	if(error==false){
	error=true;}
	}


	
if(n==1){
a=0;
if(document.operacion.Campo.value=="")
{
alert("El campo:\n"+desc[a]+"\nno tiene  valor.  Por favor introduzca un valor en el campo");
if(error==false){
	error=true;
	}
	if(prim_error<0){
	prim_error=a;
	}
}
else{
	if(tipos[a]=="Num"){
	if( NaN(document.operacion.Campo.value ))
	{
		alert("El campo:\n"+desc[a]+"\nes de tipo númerico y no contiene un valor valido y no puede ser negativo.  Por favor rectifiquelo.");
		if(error==false)
		{
			error=true;
		}
		if(prim_error<0)
		{prim_error=a;}
	}
}

if(tipos[a]=="Fec")
{if(parse_date(document.operacion.Campo.value)==false)
{alert("El campo:\n"+desc[a]+"\nEs de tipo fecha y no contiene una fecha valida.\nPor favor rectifiquelo, el formato valido es dd/mm/aaaa.");
if(error==false)
{error=true;}
if(prim_error<0)
{prim_error=a;}}}
 if(tipos[a]=="Car")
{if(document.operacion.Campo.value.charAt(0)==" ")
{alert("El primer caracter del valor en el campo:\n"+desc[a]+"\nes un espacio.  Por favor eliminelo o rectifique el contenido del campo.");
if(error==false){error=true;}
if(prim_error<0){prim_error=a;}}
else{if(document.operacion.Campo.value.indexOf(",", 0)!=-1)
{alert("En la cadena no se pueden tener comas (\",\").  Por favor retire todas las comas e intentelo de nuevo");
if(error=false){error=true;}
if(prim_error<0){prim_error=a;}}}}}}
else{for(a=0; a<n; a++)
{if(document.operacion.Campo[a].value=="")
{alert("El campo:\n"+desc[a]+"\nno tiene valor.  Por favor introduzca un valor en el campo");
if(error==false)
{error=true;}
if(prim_error<0){prim_error=a;}}
else{if(tipos[a]=="Num")
{
	if(isNaN(document.operacion.Campo[a].value))
	{
		alert("El campo:\n"+desc[a]+"\nes de tipo númerico y no contiene un valor valido.  Por favor rectifiquelo.");
		if(error==false)
		{
			error=true;
		}
		if(prim_error<0)
		{
			prim_error=a;
		}
	}
	else
	{
		if(Number(document.operacion.Campo[a].value)==-9999)
		{
			a_cencos[n_cencos]=a;
			n_cencos++;
		}
		else
		{
			if(Number(document.operacion.Campo[a].value) < 0 )
			{
				alert("El campo:\n"+desc[a]+"\nNo puede tener un valor menor a cero (0).  Por favor rectifiquelo.");
			if(error==false)
			{
				error=true;
			}
			if(prim_error<0)
			{
				prim_error=a;
			}
			}
		}	
	}
}
if(tipos[a]=="Fec"){if(parse_date(document.operacion.Campo[a].value)==false)
{alert("El campo:\n"+desc[a]+"\nEs de tipo fecha y no contiene una fecha valida.\nPor favor rectifiquelo, el formato valido es dd/mm/aaaa.");
if(error==false){error=true;}
if(prim_error<0){prim_error=a;}}}
if(tipos[a]=="Car"){if(document.operacion.Campo[a].value[0]==" ")
{alert("El primer caracter del valor en el campo:\n"+desc[a]+"\nes un espacio.  Por favor eliminelo o rectifique el contenido del campo.");if(error==false){error=true;}if(prim_error<0){prim_error=a;}}}}}}

if(error==true)
	return false;
i=insert();
if(i==-1){
	return false;
	}

if(n_cencos>0)
	{
	MM_openBrWindow('objMcntro.asp?i=0&a=' + a_cencos[0],'','scrollbars=yes,width=400,height=300,left=150,top=150')
	return false;
	}
	
return error==false;
}


function cargar_tipo_de_campo(tipo){campos.push(tipo);}
function es_bisiesto(anno){var bisiesto=false;if(anno%4==0){if(anno%100==0){if(anno%400==0){bisiesto=true;}else{bisiesto=false;}}else{bisiesto=true;}}else{bisiesto=false;}return bisiesto;}
function fecha_valida(dia, mes, anno){var valida=false;if(Number(anno) < 1990 || Number(anno) > 2500){alert("El año no esta en el rango 1990 - 2500");return false;}if ( dia <= 0){return false}if(mes==1 || mes==3 || mes==5 || mes==7 || mes==8 || mes==10 || mes==12){if(dia > 31){valida=false;}else{valida=true;}}if(mes==4 || mes==6 || mes==9 || mes==11){if(dia > 30){valida=false;}else{valida=true;}}if(mes==2){if(dia > 29){valida=false;}else if(dia==29 && es_bisiesto(anno)){valida=true;}else if(dia<=28){valida=true;}}if(valida==false){return false;}
return true;

}


function menorhoy ( dia,mes,anno)
{
	var hoy=new Date(1899, 11, 30);


	var fecha= new Date(anno,mes-1,dia);	

	if (fecha<=hoy)
	{
		return true
	}
	else
	{
		return false
	}
}


function MM_openBrWindow(theURL,winName,features) { 
  window.open(theURL,winName,features);
}