function esNulo(a) {
		return typeof a == 'object' && !a;
	}
	function esEntero( pDato, pOpt ){
		var lExpReg = /^[0-9]{1,}$/;

		if( pOpt )
			lExpReg = /^[0-9]{1,}$|^0$/;
			
		return lExpReg.test( pDato );
	}
	function esCantidad( pDato, pOpt ){
		var lExpReg = /^[1-9][0-9]*(\.[0-9]+)?$|^([0]{1})?\.[0-9]+$/;

		if( pOpt )
			lExpReg = /^[1-9][0-9]*(\.[0-9]+)?$|^([0]{1})?\.[0-9]+$|^$|^0$/;
			
		return lExpReg.test( pDato );
	}
	function esBinario( pDato, pOpt){
		var lExpReg=/^[0-1]$/;
		if (pOpt)
			lExpReg=/^[01]$|^$/;
		return lExpReg.test( pDato );
	
	}
	function esCorreo( pDato, pOpt ){
		var lExpReg = /^[&a-zA-Z0-9\.\-_]+\@[&a-zA-Z0-9\.\-_&]+$/;

		if( pOpt )
			lExpReg = /^[&a-zA-Z0-9\.\-_]+\@[&a-zA-Z0-9\.\-_&]+$|^$/;
			
		return lExpReg.test( pDato );
	}
	function esFecha( pDato, pOpt ){
		var lExpReg = /^[0-9]{1,2}\/[0-9]{1,2}\/[0-9]{4}$/;

		if( pOpt )
			lExpReg = /^[0-9]{1,2}\/[0-9]{1,2}\/[0-9]{4}$|^$/;
			
		return lExpReg.test( pDato );
	}
	function esTexto( pDato, pOpt ){
		//var lExpReg = /^[&ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\.,\*\+\-_]+[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\/\.,\*\+\-_ ]*$/;
		var lExpReg = /^[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\-\.,]+[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\-\.,_ ]*$/;
		if(pOpt)
			lExpReg = /^[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\-\.,]+[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\-\.,_ ]*$|^$/;
			// lExpReg = /^[&ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\.,\*\+\-_]+[ρΡΑΙΝΣΪάαινσϊόa-zA-Z0-9\/\.,\*\+\-_ ]*$|^$/;
		return lExpReg.test( pDato );
	}
	function esSitioWeb( pDato, pOpt ){
		var lExpReg = /^(\w+:\/\/)?[\w.]+(\/\S*)?$/;

		if( pOpt )
			lExpReg = /^(\w+:\/\/)?[\w.]+(\/\S*)?$|^$/;
			
		return lExpReg.test( pDato );
	}
	function esColorWeb( pDato, pOpt ){
		var lExpReg = /^#[0-9A-F]{6}$/i;
		if(pOpt)
			lExpReg = /^#[0-9A-F]{6}$|^$/i;
		return lExpReg.test( pDato );
	}
function Indexcbo(objlista,valor){
	var lobjlista=objlista
	for(i=0;i<lobjlista.options.length;++i){
	 if(lobjlista.options[i].value==valor){
		lobjlista.selectedIndex=i;
	 }
	}
}