Mine

<script>
function Processar(){
   codigocpr = $F('codigo_cpr');
   if (codigocpr == ""){
       alert ('Por favor, consulte');
   }else{
   url = 'consulta_fazendas_vinculadas_cpr_py';
   pars = 'codigo='+codigocpr
   myAjax = new Ajax.Request(url,
                             {method:'post',
                             parameters:pars,
                             onComplete: mostraResposta
                             });
   }   
}

function mostraResposta(resposta){
   tabela = $('tabela_fazendas');
   LimpaTabela(tabela);
   result = eval(resposta.responseText);
   for (x=0;x<result.length;x++){
       var linha = tabela.insertRow(1);
       var coluna = linha.insertCell(-1);
       coluna.innerHTML = result[x].nomefazenda;
       var coluna = linha.insertCell(-1);
       coluna.innerHTML = result[x].inscricao;
       var coluna = linha.insertCell(-1);
       coluna.innerHTML = result[x].cidade;
       var coluna = linha.insertCell(-1);
       coluna.innerHTML = result[x].estado;
   }
}

function LimpaTabela(tabela){
	//Removendo as linhas da tabela
	totLinhas = tabela.rows.length;
	for(i=1;i<totLinhas;i++){
		//Seleciona a segunda linha para ser excluida 
		// para que não seja removido o cabeçalho
		tabela.deleteRow(1);
	}	
}
</script>

<input type="text" name="codigo_cliente" id="codigo_cliente" readonly>
<input type="text" name="nome_cliente" id="nome_cliente" readonly>
<input type="button" name="consultar" value="Consultar" onClick="window.open('consultar_cliente');">


[<a href="javascript:Processar();">Processar</a>]

# Consulta
      <script>
      function updateForm(codigo,nome){
        wd = window.opener();
        codigo_cliente = wd.document.getElementById('codigo_cliente');
        nome_cliente = wd.document.getElementById('nome_cliente');

        codigo_cliente.value = codigo;
        nome_cliente.value = nome;

        wd.Processar();
        window.close;

      }
      </script>

      <a href="#"
         tal:attributes="href string:javascript:updateForm('${request/codigo}','${request/nome}');"
         tal:content="request/nome">Nome
      </a>