function encomendarImovel1(){
   var oObj1;
   var oObj2;
   preencheObj("ei_estados","vl/php/ecbt.php","opcao=estados&estado="+estado+"&pag=ei");
   preencheObj("ei_cidades","vl/php/ecbt.php","opcao=cidades&estado="+estado+"&cidade="+cidade+"&pag=ei");
   preencheObj("ei_bairros","vl/php/ecbt.php","opcao=bairros&estado="+estado+"&cidade="+cidade+"&bairro="+bairro+"&pag=ei");
   preencheObj("ei_tipos"  ,"vl/php/ecbt.php","opcao=tipos&tipo="+tipo+"&pag=ei");
   oObj1 = gE("quartos");
   oObj2 = gE("ei_quartos");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   oObj1 = gE("suites");
   oObj2 = gE("ei_suites");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   oObj1 = gE("vagas");
   oObj2 = gE("ei_vagas");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   oObj1 = gE("area");
   oObj2 = gE("ei_area");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   oObj1 = gE("vrMin");
   oObj2 = gE("ei_vrMin");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   oObj1 = gE("vrMax");
   oObj2 = gE("ei_vrMax");
   for (var i=0;i<oObj1.options.length;i++)
       {oObj2.options[i] = new Option(oObj1.options[i].text,oObj1.options[i].value);}
   var ddds  = "1112131415161718192122242728313233343537384142434445464748495153545561626365676869798283849596717374757781878588868991939492979899";
   var tam   = ddds.length / 2;
   var oObj  = gE("ei_ddd");
   var ddd   = "";
   oObj.length = 0;
   for (var i=0;i<tam;i++)
       {
       ddd = ddds.substr(i*2,2);
       oObj.options[i] = new Option(ddd,ddd);
       if (ddd == imb_ddd)
          oObj[i].selected = true;
       }
}

function ei_preencheCidades(){
var oObj   = gE("ei_estados");
var cEst   = oObj.options[oObj.selectedIndex].value;
var filtro = "opcao=cidades&estado="+cEst+"&cidade="+cidade+"&pag=ei";
preencheObj("ei_cidades","vl/php/ecbt.php",filtro);
ei_preencheBairros();
}

function ei_preencheBairros(){
var oObj   = gE("ei_cidades");
var filtro = "opcao=bairros&estado="+estado+"&cidade="+oObj.options[oObj.selectedIndex].value+"&pag=ei";
preencheObj("ei_bairros","vl/php/ecbt.php",filtro);
}

function gravarPreferencias(){
if (trim(gE('ei_nome').value) == "")
   {
   alert('Por gentileza, informe-nos seu nome !!!');
   gE('ei_nome').focus;
   return false;
   }
if (gE('ei_telefones').value == "")
   {
   alert('Por gentileza, informe-nos seu(s) telefone(s) para que possamos contactá-lo quando for necessário !!!');
   gE('ei_telefones').focus;
   return false;
   }
str = trim(gE('ei_email').value);
if (str != "")
   {
   if (str.length < 7 || str.indexOf("@") < 1 || str.indexOf(".") < 3 || str.indexOf(" ") > -1 || (str.length - str.indexOf("@")) < 5){
      alert('O e-mail está preenchido incorretamente. Por gentileza, corrija-o.');
      gE('ei_email').focus;
      return false;
      }
   }

var seq_email = achaSeqEmail('ei');
var imb_email = "";
if ((imb_emails.length == 1) || ((seq_email % 2) != 0))
   imb_email = imb_emails[0];
else
   imb_email = imb_emails[1];
seq_email = preencheZeros(seq_email,3);
var visitante_email = trim(gE('ei_email').value); 
if (visitante_email == "")
   visitante_email = "### E-mail não informado ###";
var observacao = trim(gE('ei_observacao').value);
if (observacao == "")
   observacao = " ";

var sql
     = "insert into pre (";
sql += "imb_codigo,";
sql += "dt_gravacao,";
sql += "hr_gravacao,";
sql += "session_id,";
sql += "transac,";
sql += "lanctos,";
sql += "avulsos,";
sql += "estado,";
sql += "cidade,";
sql += "bairros,";
sql += "tipos,";
sql += "quartos,";
sql += "suites,";
sql += "vagas,";
sql += "area,";
sql += "vrmin,";
sql += "vrmax,";
sql += "outcarac,";
sql += "nome,";
sql += "ddd,";
sql += "telefones,";
sql += "email,";
sql += "observacao,";
sql += "destinatario_email,";
sql += "email_seq";
sql += ") values (";
sql += aAsp(imb_codigo) + ",";
sql += "now(),";
sql += "now(),";
sql += aAsp(sessao) + ",";
sql += aAsp(gE('ei_transac')[gE('ei_transac').selectedIndex].value)  + ",";
sql += aAsp((gE('ei_lanctos').checked) ? 'S':'N') + ",";
sql += aAsp((gE('ei_avulsos').checked) ? 'S':'N') + ",";
sql += aAsp(estado) + ",";
sql += aAsp(gE('ei_cidades')[gE('ei_cidades').selectedIndex].value)  + ",";
obj  = gE('ei_bairros').getElementsByTagName('input');
var bai = "";
for (i=0;i<obj.length;i++){
    if (obj[i].checked){
       bai += (bai == "") ? "":"#";
       bai += obj[i].value;
       }
    }
sql += aAsp(bai) + ",";
obj  = gE('ei_tipos').getElementsByTagName('input');
var tip = "";
for (i=0;i<obj.length;i++){
    if (obj[i].checked){
       tip += (tip == "") ? "":"#";
       tip += obj[i].value;
       }
    }
sql += aAsp(tip) + ",";
str  = gE('ei_quartos')[gE('ei_quartos').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
str  = gE('ei_suites')[gE('ei_suites').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
str  = gE('ei_vagas')[gE('ei_vagas').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
str  = gE('ei_area')[gE('ei_area').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
str  = gE('ei_vrMin')[gE('ei_vrMin').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
str  = gE('ei_vrMax')[gE('ei_vrMax').selectedIndex].value;
sql += (isNaN(str)) ? 0:str + ",";
sql += aAsp(gE('ei_outCarac').value) + ",";
sql += aAsp(gE('ei_nome').value) + ",";
sql += aAsp(gE('ei_ddd')[gE('ei_ddd').selectedIndex].value)  + ",";
sql += aAsp(gE('ei_telefones').value) + ",";
sql += aAsp(visitante_email) + ",";
sql += aAsp(observacao) + ",";
sql += aAsp(imb_email) + ",";
sql += seq_email;
sql += ")";
exec_sql(sql);

var men = "email="   +imb_email;
if (visitante_email != "### E-mail não informado ###")
    men = "email="   +visitante_email;
men += "&nome="      +gE('ei_nome').value;
men += "&imb_setor=" +"Vendas via Web";
men += "&imb_email=" +imb_email;
men += "&assunto="   +"Encomenda de Imóvel ("+seq_email+")";
men += "&html=";
men += "<table border=1 Cellpadding=4>";
men += "<tr><th colspan=2>Encomenda de Imóvel ("+seq_email+")</th></tr>";
men += "<tr><td>Site</td><td>"+imb_url+"</td></tr>";
men += "<tr><td>ID</td><td>"+sessao+"</td></tr>";
men += "<tr><td>Transação</td><td>"+gE('ei_transac')[gE('ei_transac').selectedIndex].text+"</td></tr>";
men += "<tr><td>Lançamentos</td><td>" + trim((gE('ei_lanctos').checked) ? "Sim":"Não") + "</td></tr>";
men += "<tr><td>Avulsos</td><td>" + trim((gE('ei_avulsos').checked) ? "Sim":"Não") + "</td></tr>";
men += "<tr><td>Estado</td><td>"+gE('ei_estados')[gE('ei_estados').selectedIndex].text+"</td></tr>";
men += "<tr><td>Cidade</td><td>"+gE('ei_cidades')[gE('ei_cidades').selectedIndex].text+"</td></tr>";
men += "<tr><td>Bairros</td><td>"+bai+"</td></tr>";
men += "<tr><td>Tipos</td><td>"+tip+"</td></tr>";
str  = gE('ei_quartos')[gE('ei_quartos').selectedIndex].value;
men += "<tr><td>Quartos</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
str  = gE('ei_suites')[gE('ei_suites').selectedIndex].value;
men += "<tr><td>Suítes</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
str  = gE('ei_vagas')[gE('ei_vagas').selectedIndex].value;
men += "<tr><td>Vagas</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
str  = gE('ei_area')[gE('ei_area').selectedIndex].value;
men += "<tr><td>Área</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
str  = gE('ei_vrMin')[gE('ei_vrMin').selectedIndex].value;
men += "<tr><td>Vr.Mínimo</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
str  = gE('ei_vrMax')[gE('ei_vrMax').selectedIndex].value;
men += "<tr><td>Vr.Máximo</td><td>"+trim((isNaN(str)) ? 0:str) + "</td></tr>";
men += "<tr><td>Outras Características</td><td><pre>"+gE('ei_outCarac').value+"</pre></td></tr>";
men += "<tr><td>Nome</td><td>"+gE('ei_nome').value+"</td></tr>";
men += "<tr><td>Telefones</td><td>("+gE('ei_ddd').value+") "+gE('ei_telefones').value+"</td></tr>";
men += "<tr><td>Email</td><td>"+visitante_email+"</td></tr>";
men += "<tr><td>Observação</td><td>"+observacao+"</td></tr>";
men += "</table>";
enviaEmail(men);
gE('ei_outCarac').value = "";
gE('ei_nome').value = "";
gE('ei_telefones').value = "";
gE('ei_email').value = ""; 
gE('ei_observacao').value = "";
alert('Suas preferências foram enviadas !!!');
return true;
}