var calPath="../js/calendar/"; var URLHomePage="http://www.chilis.com.pe"; function gotoPage(ppg){ var xform = document.forms[0]; xform.pg.value=ppg; xform.submit(); } function checkMark(xform){ var cont=xform.count.value; var xSel=","; var i; if(cont>1){ for(i=0;i=1 && parseInt( mes )<=12 ) { switch( parseInt( mes ) ) { case 1 : num_dias=31; break; case 2 : num_dias=((ano % 4)==0) ? 29 : 28; break; case 3 : num_dias=31; break; case 4 : num_dias=30; break; case 5 : num_dias=31; break; case 6 : num_dias=30; break; case 7 : num_dias=31; break; case 8 : num_dias=31; break; case 9 : num_dias=30; break; case 10 : num_dias=31; break; case 11 : num_dias=30; break; case 12 : num_dias=31; break; default : num_dias=31; } if( parseInt( dia )<=num_dias ) return true; else return false; } else return false; } function fieldValidate(tipval) { var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else { if(tipval=="int") if ((xkey < 48) || (xkey > 57)) event.returnValue = false; if(tipval=="dec") if ((xkey < 46) || (xkey > 57)) event.returnValue = false; if(tipval=="str") if (((xkey != 32) && (xkey < 65)) || ((xkey > 90) && (xkey < 97))) event.returnValue = false; if(tipval=="tlf") if (((xkey != 32) && (xkey < 45)) || (xkey > 57)) event.returnValue = false; } } } function emailCheckForbidden( iIDCaso, lpszDominio ) { arrDominioProhibido = new Array; var intI = 0; switch ( iIDCaso ) { case 0: arrDominioProhibido[0] ="chilis perú.com"; arrDominioProhibido[1] ="chilis perú.com.pe"; arrDominioProhibido[2] ="chilis perú.net"; break; case 1: arrDominioProhibido[0] = "hotmail.com.pe"; arrDominioProhibido[1] = "yahoo.com.pe"; arrDominioProhibido[2] = "mixmail.com.pe"; arrDominioProhibido[3] = "gmail.com.pe"; break; } for (intI = 0; intI < arrDominioProhibido.length ; intI++) { if (arrDominioProhibido[intI] == lpszDominio) return false; } return true; } function emailCheck (emailStr) { var checkTLD=1; var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/; var emailPat=/^(.+)@(.+)$/; var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]"; var validChars="\[^\\s" + specialChars + "\]"; var quotedUser="(\"[^\"]*\")"; var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/; var atom=validChars + '+'; var word="(" + atom + "|" + quotedUser + ")"; var userPat=new RegExp("^" + word + "(\\." + word + ")*$"); var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$"); var matchArray=emailStr.match(emailPat); if (matchArray==null) { alert("Dirección Email parece incorrecto (verifique @ y puntos)"); return false; } var user=matchArray[1]; var domain=matchArray[2]; if ( !emailCheckForbidden( 0, domain ) ) { alert("Ud. no esta autorizado para utilizar esta cuenta de correo!"); return false; } if ( !emailCheckForbidden( 1, domain ) ) { alert("La direccion de correo parece no ser correcta, por favor reviselo."); return false; } for (i=0; i127) { alert("El nombre de usuario contiene caracteres inválidos."); return false; } } for (i=0; i127) { alert("El nombre de dominio contiene caracteres inválidos."); return false; } } if (user.match(userPat)==null) { alert("El nombre de usuario no parece ser válido"); return false; } var IPArray=domain.match(ipDomainPat); if (IPArray!=null) { for (var i=1;i<=4;i++) { if (IPArray[i]>255) { alert("dirección IP es inválido!"); return false; } } return true; } var atomPat=new RegExp("^" + atom + "$"); var domArr=domain.split("."); var len=domArr.length; for (i=0;i= 0)) return false; else return true; } } function checkStringAlfabetico() { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ "; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfaNumerico(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ0123456789 "; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfaNumericoClear(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ0123456789"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfaNumericoSignos(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ0123456789 .,:;'()"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfaNumericoSinComas(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ0123456789 '()"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfabeticoSinComas(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ0 '()"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringAlfabeticoSignos(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZñÑáéíóúÁÉÍÓÚ .,:;'()"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringEmail(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-_.01234567890@"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringID(value) { var checkStr="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-_01234567890"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkStringDecimal(value) { var checkStr="0123456789."; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function checkTelefono(value) { var checkStr="-()0123456789"; var xkey; if (document.all) { xkey=window.event.keyCode; if(xkey=="13") event.returnValue = true; else if (!(checkStr.indexOf(String.fromCharCode(xkey)) >= 0)) return false; else return true; } } function ltrim(str) { var whitespace = new String(" \t\n\r"); var s = new String(str); if (whitespace.indexOf(s.charAt(0)) != -1) { var j=0, i = s.length; while (j < i && whitespace.indexOf(s.charAt(j)) != -1) j++; s = s.substring(j, i); } return s; } function rtrim(str) { var whitespace = new String(" \t\n\r"); var s = new String(str); if (whitespace.indexOf(s.charAt(s.length-1)) != -1) { var i = s.length - 1; // Get length of string while (i >= 0 && whitespace.indexOf(s.charAt(i)) != -1) i--; s = s.substring(0, i+1); } return s; } function trim(str) { return rtrim(ltrim(str)); } function contarTexto( lpszCampo, iLimiteTexto ) { if (lpszCampo.value.length > iLimiteTexto) { lpszCampo.value = lpszCampo.value.substring(0, iLimiteTexto); alert ("El límite para ingresar texto, es de "+iLimiteTexto+" caracteres."); } }