function abrePSL() {
  if(document.f2.PSLestados.selectedIndex!=0) {
    window.open(document.f2.PSLestados.value,'new','');
  }
}

////////////////////////////////////////////////////////////////////

function valida_email(o_email, branco, alerta)
{
  /* Autor: Marlon Dutra - 16/01/2002 */
  /* Valida o e-mail digitado */
  
  /*
    Se o parametro branco estiver true, permite valor em branco
    Se o parametro alerta estiver true, emite os alertas de erro
  */

  p_email = o_email.value.toLowerCase();
  
  if (branco) // Permite o e-mail em branco
  {
    if (p_email == '')
      return true;
  }
  
  reg_email = /^[\w\-\.]+@[\w\-\.]+\.[a-z]{2,4}$/;
  if (! reg_email.test(p_email))
  {
    if (alerta)
    {
      alert('E-mail inválido');
      o_email.focus();
      o_email.select();
    }
    return false;
  }
  return true;
}

//////////////////////////////////////////////////////////////////////

function valida_timestamp(o_data, branco, alerta)
{
  p_data = o_data.value;
  
  if (branco) // Permite a data em branco
  {
    if (p_data == '')
      return true;
  }

  reg_data = /^\d{4}-\d{2}-\d{2}( \d{2}:\d{2}(:\d{2})*)*$/;
  if (! reg_data.test(p_data))
  {
    if (alerta)
    {
      alert('Data/Hora inválidos');
      o_data.focus();
      o_data.select();
    }
    return false;
  }

  return true;
}