public function onLogarWS() {
        $data = $this->form->getData('StdClass');
        $this->form->validate();

        if ($data->cpf == "admin") {
            $this->onLogin();

        } else {
            $data->cpf = str_replace('.', '', $data->cpf);
            $data->cpf = str_replace('-', '', $data->cpf);

            // Codigo feito em PHP Version 5.3.28
            // $cpf_digitado = $_POST['cpf'];
            echo("CPF Digitado: " . $data->cpf . "<br />\n");

            $dados = http_build_query(array(
                'cpf' => $data->cpf
            ));

            $contexto = stream_context_create(array(
                'http' => array(
                    'method' => 'POST',
                    'content' => $dados,
                    'header' => "Content-type: application/x-www-form-urlencoded\r\n"
                        . "Content-Length: " . strlen($dados) . "\r\n",
                )
            ));

            $resposta = file_get_contents('http://servicos.searh.rn.gov.br/searh/copag/webserviceergon/web.asp', null, $contexto);

            $servidor_publico = json_decode($resposta);
            /*
              echo("Nome: " .      $servidor_publico-> Nome      . "<br>");
              echo("Matrícula: " . $servidor_publico-> Matricula . "<br>");
              echo("DtNasc: " .    $servidor_publico-> DtNasc    . "<br>");
              echo("CPF:" .        $servidor_publico-> CPF       . "<br>");
             */
              error_reporting(0);
            if ($servidor_publico->CPF == $data->cpf and $servidor_publico <> "") {
                echo("servidor validado");
                TSession::setValue('logged', TRUE);
                TSession::setValue('username', $data->cpf);
                //AdiantiCoreApplication::gotoPage('D'); // reload
                // $this->onLogout();
                \Adianti\Widget\Base\TScript::create("window.location = 'index.php?class=Home&method=&logged=" . TSession::getValue('logged') . "&username=" . TSession::getValue('username') . "'");
            } else {


                echo("<p>Desculpe, mas o sistema é <b>EXCLUSIVO PARA SERVIDORES DO ESTADO</b>, caso esteja com problemas,
                entre em contato com suporte através do ícone laranja localizado no canto direito da página.<p>
                <p>Caso você seja Servidor dos Órgãos <b>IPEM, CAERN, UERN, POTIGÁS, ENGERN E DEFENSORIA PÚBLICA</b>,
                aguarde! Os seus dados cadastrais estão sendo implantados no Programa e em breve você poderá acessa-lo.</p>

                <p>Caso você seja <b>PENSIONISTA</b>, procure o <b>IPERN</b> para atualizar seus dados cadastrais.</p>");


                //  new TMessage('error', $e->getMessage());
                TSession::setValue('logged', FALSE);
            }
        }
    }