//FORM contac
//00 'Nombre*                  No
//01 'Apellidos*                Ap
//02 'E-mail*                    E-
//03 'Comentarios*           Co
//*************************************
// CRISTIAN QUINTANA  VARIABLES GLOBALES
var swOK=0;
var nEle=0;
var sError='';
// CRISTIAN QUINTANA
function darioquintana() {
var nTot=0;
var nPas=0;
var nTorna=0;
sError="Formulario de Contácto: Desarrollo Humano \n----> Error! Campos Obligatorios correctamente <----\n -------------------------------------------------------------------------------------- "+"\n";
//sError2="Gracias por Contactarce, "+"\n";
//sError2="Gracias por Contactarce, +quintana.nombre_del_contacto.value+,su e-mail es : +quintana.email.value+  "+"\n";
//sError3="hola,"+document.forms[0].elements[nEle].name.substr(0)+",contiene caracteres NO VALIDOS"+"\r"
//sError="Lista de errores: "+"\n";
  for (var j=0; j<4; j++) {
    nEle=j;
    // CRISTIAN QUINTANA LOS TIPOS
    var sNom=document.forms[0].elements[j].name;
    var sOne=sNom.substring(0,1);
    var sTwo=sNom.substring(1,2);
    var stre=sNom.substring(2,3);
//(sOne=='N' && sTwo=='O' && stre=='O' && scua=='O' && scin=='O' && ssei=='O' && ssie=='O' && soch=='O' && snue=='O'
//&& sdie=='O' && sonc=='O' && sdoc=='O' && strec=='O' && scat=='O' && squi=='O' && sdies=='O' && sdiesi=='O' 
//&& sdiesio=='O')
//00 'Nombre*          No
//----------------------------------------------------------
    if (sOne=='N' && sTwo=='o') {
//sError+="* ------------------------------------------------------------------------------------------------------------- *" +"\r" 
       CaracterNoValid(document.forms[0].elements[j].value,'00');
       nTot+=swOK;
    }
//01 'Apellidos*                Ap
//----------------------------------------------------------
    if (sOne=='A' && sTwo=='p') {
//sError+="* ------------------------------------------------------------------------------------------------------------- *" +"\r" 
       CaracterNoValid(document.forms[0].elements[j].value,'01');
       nTot+=swOK;
    }
//02 'E-mail*                    E-
//----------------------------------------------------------
    if (sOne=='E' && sTwo=='-') {
//sError+="* ------------------------------------------------------------------------------------------------------------- *" +"\r" 
       CaracterNoValid(document.forms[0].elements[j].value,'02');
       nTot+=swOK;
    }
//03 'Comentarios*                Co
//----------------------------------------------------------
    if (sOne=='C' && sTwo=='o') {
//sError+="* ------------------------------------------------------------------------------------------------------------- *" +"\r" 
       CaracterNoValid(document.forms[0].elements[j].value,'03');
       nTot+=swOK;
    }
// CRISTIAN QUINTANA DE ERRORES
if (nPas==0 && nTot>0) {
   document.forms[0].elements[nEle].focus()
    nPas=1
  }
  }
  if (nTot>0)
    alert(sError)
else
    //alert(sError2)
   // alert(sError3)
document.contac.submit();
}
// CRISTIAN QUINTANA CAMPO A CAMPO
//------12345678901234567890123456789012345678901234567890123456789012345678901234567890101234
//------°!"#$%&/()=?¡|¿,;.:-{}[]<>@*¬^+\_'~ABCDEFGHIJLMNÑOPQRSTUVWXYZabcdefghijlmnñopqrstuvwxyz no " no \
function CaracterNoValid(pCaracter,pType) {
//00 'Nombre*          No
//###############******************#################
  if (pType=='00') {
   swOK=0;
    if (pCaracter=='') {
       sError+="* ingresa tu, "+document.forms[0].elements[nEle].name.substr(0)+" ,alfabetico"+"\r"
       swOK=1;
       return
     }
    for (var i=0;i<pCaracter.length;i++) {
      var sByte=pCaracter.substring(i,i+1);
      if (
sByte=="°" || sByte=="!" || sByte=="#" || sByte=="$" || sByte=="%" || sByte=="&" || sByte=="/" || sByte=="(" ||
sByte==")" || sByte=="=" || sByte=="?" || sByte=="¡" || sByte=="|" || sByte=="¿" || sByte=="," || sByte==";" || sByte=="." ||
sByte==":" || sByte=="-" || sByte=="{" || sByte=="}" || sByte=="[" || sByte=="]" || sByte=="<" || sByte==">" || sByte=="@" ||
sByte=="*" || sByte=="¬" || sByte=="^" || sByte=="+" || sByte=="_" || sByte=="'" || sByte=="~" || sByte=="1" ||
sByte=="2" || sByte=="3" || sByte=="4" || sByte=="5" || sByte=="6" || sByte=="7" || sByte=="8" || sByte=="9" || sByte=="0" )
 {
        sError+="**** "+document.forms[0].elements[nEle].name.substr(0)+" ,ingresaste caracteres NO VALIDOS,es alfabetico"+"\r"
        swOK=1;
        return;
      }
    }
  }
//01 'Apellidos*                Ap
//###############******************#################
  if (pType=='01') {
   swOK=0;
    if (pCaracter=='') {
       sError+="* ingresa tus, "+document.forms[0].elements[nEle].name.substr(0)+" ,alfabetico"+"\r"
       swOK=1;
       return
     }
    for (var i=0;i<pCaracter.length;i++) {
      var sByte=pCaracter.substring(i,i+1);
      if (
sByte=="°" || sByte=="!" || sByte=="#" || sByte=="$" || sByte=="%" || sByte=="&" || sByte=="/" || sByte=="(" ||
sByte==")" || sByte=="=" || sByte=="?" || sByte=="¡" || sByte=="|" || sByte=="¿" || sByte=="," || sByte==";" || sByte=="." ||
sByte==":" || sByte=="-" || sByte=="{" || sByte=="}" || sByte=="[" || sByte=="]" || sByte=="<" || sByte==">" || sByte=="@" ||
sByte=="*" || sByte=="¬" || sByte=="^" || sByte=="+" || sByte=="_" || sByte=="'" || sByte=="~" || sByte=="1" ||
sByte=="2" || sByte=="3" || sByte=="4" || sByte=="5" || sByte=="6" || sByte=="7" || sByte=="8" || sByte=="9" || sByte=="0" )
 {
        sError+="**** "+document.forms[0].elements[nEle].name.substr(0)+" ,ingresaste caracteres NO VALIDOS,es alfabetico"+"\r"
        swOK=1;
        return;
      }
    }
  }
//02 'E-mail*                    E-
//###############******************#################
  if (pType=='02') {
   swOK=2
   for (var i=0;i<pCaracter.length;i++) {
     var sByte=pCaracter.substring(i,i+1);
     if (sByte=="@" || sByte==".") {
       swOK=swOK-1;
     }
   }
   if (swOK>0)    {
    sError+="* ingresa tu, "+document.forms[0].elements[nEle].name.substr(0)+" ,ej: usuario@dominio" +"\r" }
   return;
 }

//03 'Comentarios*                Co
//###############******************#################
if (pType=='03') {
   swOK=0;
   if (pCaracter=='') {
       sError+="* ingresa tus, "+document.forms[0].elements[nEle].name.substr(0)+" ,alfanumerico" +"\r"
      swOK=1;
     return
    }
  }

  }