// Imprime pagina
var da = (document.all) ? 1 : 0;
var pr = (window.print) ? 1 : 0;
var mac = (navigator.userAgent.indexOf("Mac") != -1); 

function imprime() {
  if (pr) // NS4, IE5
    window.print()
  else if (da && !mac) // IE4 (Windows)
    vbPrintPage()
  else // other browsers
    alert("No soportado por este navegador");
  return false;
}

if (da && !pr && !mac) with (document) {
  writeln('<OBJECT ID="WB" WIDTH="0" HEIGHT="0" CLASSID="clsid:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>');
  writeln('<' + 'SCRIPT LANGUAGE="VBScript">');
  writeln('Sub window_onunload');
  writeln('  On Error Resume Next');
  writeln('  Set WB = nothing');
  writeln('End Sub');
  writeln('Sub vbPrintPage');
  writeln('  OLECMDID_PRINT = 6');
  writeln('  OLECMDEXECOPT_DONTPROMPTUSER = 2');
  writeln('  OLECMDEXECOPT_PROMPTUSER = 1');
  writeln('  On Error Resume Next');
  writeln('  WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER');
  writeln('End Sub');
  writeln('<' + '/SCRIPT>');
}


function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function mOvr(src,clrOver){ 
 if (!src.contains(event.fromElement)){ 
  src.style.cursor = 'hand'; 
  src.className = clrOver; 
 } 
} 
function mOut(src,clrIn){ 
 if (!src.contains(event.toElement)){ 
  src.style.cursor = 'hand'; 
  src.className = clrIn; 
 } 
}
function mClk(src) 
{
if(event.srcElement.tagName=='TD')
	{
 	src.children.tags('A')[0].click();
	}
}

function volver(pag){
	window.history.go(pag)
	}
	
function MM_openBrWindow(theURL,winName,features) { //v2.0
  	window.open(theURL,winName,features);
}

function limpia_form(nom){
	window.document[nom].reset();
}

function fecha(){
	mes = new Array();
	diasem = new Array();
	fechas = new Date();
	diasemana = fechas.getDay();
	diasem[0] = "Domingo";
	diasem[1] = "Lunes";
	diasem[2] = "Martes";
	diasem[3] = "Miercoles";
	diasem[4] = "Jueves";
	diasem[5] = "Viernes";
	diasem[6] = "Sabado";
	dia = fechas.getDate();
	nomes = fechas.getMonth();
	anio = fechas.getYear();
	mes[0] = 'Enero';
	mes[1] = 'Febrero';
	mes[2] = 'Marzo';
	mes[3] = 'Abril';
	mes[4] = 'Mayo';
	mes[5] = 'Junio';
	mes[6] = 'Julio';
	mes[7] = 'Agosto';
	mes[8] = 'Septiembre';
	mes[9] = 'Octubre';
	mes[10] = 'Noviembre';
	mes[11] = 'Diciembre';
	if (anio < 1000) anio = anio + 1900;
	document.write(diasem[diasemana]+" "+ dia +" de "+ mes[nomes] +" de "+ anio);
}

/* funciones sacadas de inc.global */

// Empty: devuelve verdadero si value es vacio
function Empty(value) {

    var pattern=new RegExp("\^[ ]*$");
    return value.match(pattern);

}

// isInteger: devuelve verdero si value es un entero
function isInteger(value) {

    var pattern=new RegExp("^[0-9]+$");
    return value.match(pattern);

}

// isDouble: devuelve verdero si value es un double
function isDouble(value) {
    var pattern=new RegExp("^[0-9]+(\\.[0-9]+){0,1}$");
    return value.match(pattern);
}

// isMail: devuelve verdadero si value es una direccion de correo valida
function isMail(value) {
    var pattern=new RegExp("^([a-zA-Z0-9_\\-]+\\.{0,1})+@([a-zA-Z0-9_\\-]+\\.)+[a-zA-Z0-9_\\-]+$");
    return value.match(pattern);

}


// isAlpha2: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios más acentos
function isAlpha2(value) {
	var pattern=new RegExp("^[á-úÁ-Úà-ùÀ-Ùa-zA-ZñÑ'\\-\\s]+$");
    return value.match(pattern);
}

// isAlpha: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios
function isAlpha(value) {
	var pattern=new RegExp("^[a-zA-ZñÑ'\\-\\s]+$");
    return value.match(pattern);
}

function IsRut(theRut)
{
	rut = theRut;
	var tmpstr = "";
	largo = rut.length;
	for ( i=0; i < largo; i++ )
		if ( rut.charAt(i) != ' ' && rut.charAt(i) != '.' && rut.charAt(i) != '-' )
			tmpstr = tmpstr + rut.charAt(i);
	rut = tmpstr;
	largo = rut.length;
	if ( largo < 2 )
	{
		return false;
	}

	for (i=0; i < largo ; i++ )
	{ 
		if ( rut.charAt(i) !="0" && rut.charAt(i) != "1" && rut.charAt(i) !="2" && rut.charAt(i) != "3" && rut.charAt(i) != "4" && rut.charAt(i) !="5" && rut.charAt(i) != "6" && rut.charAt(i) != "7" && rut.charAt(i) !="8" && rut.charAt(i) != "9" && rut.charAt(i) !="k" && rut.charAt(i) != "K" )
		{
			return false;
		}
	}
	var dtexto = "";
	cnt = 0;
	for ( i=largo-1, j=largo-1+3; i>=0; i--, j-- )
	{
		if ( cnt == 3 )
		{
			dtexto = rut.charAt(i) + dtexto;
			dtexto = '.' + dtexto;
			cnt = 1;
		}
		else
		{ 
			dtexto = rut.charAt(i) + dtexto;
			if( cnt == 0 )
				dtexto = '-' + dtexto;
			cnt++;
		}
	}
	return checkDV(rut);
}

function checkDV( crut )
{
	largo = crut.length;
	if ( largo > 2 )
		rut = crut.substring(0, largo - 1);
	else
		rut = crut.charAt(0);
	dv = crut.charAt(largo-1);
	if ( rut == null || dv == null )
		return 0;
	var dvr = '0';
	suma = 0;
	mul  = 2;
	for (i = rut.length - 1 ; i >= 0; i--)
	{
		suma += rut.charAt(i) * mul;
		if (mul == 7)
			mul = 2;
		else    
			mul++;
	}
	res = suma % 11;
	if (res == 1)
		dvr = 'k';
	else if (res == 0)
		dvr = '0';
	else
	{
		dvi = 11-res;
		dvr = dvi + "";
	}
	if ( dvr != dv.toLowerCase() )
		return false;

	return true;
}

function ValidarIngreso(usuario, passwd)
{
	if ((usuario == "") || (passwd == "")) 
	{
		alert('Debe especificar usuario y password para ingresar a la Central de Riesgos En Linea');
		return false;
	}
	return true;
}