newsige

Estou com o mesmo problema. O detalhe é que mesmo consultando o arquivo xml ele não retorna o protocolo de autorização.

Muito obrigado mesmo Italo. Não tinha encontrado esse posto no fórum e postei em outro o erro nos schemas que estava acontecendo... mas era justamente os dígitos do ano. Obrigado mesmo.

Boa tarde, Hoje fui tentar inutilizar uma faixa de numeração de NFE e apresentou uma falha nos schemas. Já tentei atualizar os schemas e o erro persiste. Alguem sabe me informar se houve alguma mudança ou algo parecido? Obrigado pela atenção.

Resolvido como o Alexandreac informou. A function ficou assim: function TACBrConsultaCPF.Consulta(const ACPF, DataNasc, ACaptcha: String; ARemoverEspacosDuplos: Boolean): Boolean; var Post: TStringStream; Erro: String; Resposta : TStringList; begin Erro := ACBrValidadorValidarCPF( ACPF ) ; if Erro <> '' then raise EACBrConsultaCPFException.Create(Erro); //txtCPF=11122334410&txtToken_captcha_serpro_gov_br=299218104152138191166941752496584741018616278361624164&txtTexto_captcha_serpro_gov_br=ZCI8B9&Enviar=Consultar Post:= TStringStream.Create(''); try //acredito que irão mudar esse tempTxtCPF, tempTxtNascimento, temptxtToken e temptxtTexto_captcha_serpro_gov_br para como era anteriormente Post.WriteString('tempTxtCPF='+ACPF+'&'); Post.WriteString('tempTxtNascimento='+datanasc+'&'); Post.WriteString('temptxtToken_captcha_serpro_gov_br='+FTokenCaptcha+'&'); Post.WriteString('txtTexto_captcha_serpro_gov_br='+Trim(ACaptcha)+'&'); Post.WriteString('temptxtTexto_captcha_serpro_gov_br='+Trim(ACaptcha)+'&'); Post.WriteString('Enviar=Consultar'); Post.Position:= 0; HttpSend.Clear; HttpSend.Document.Position:= 0; HttpSend.Document.CopyFrom(Post, Post.Size); HTTPSend.MimeType := 'application/x-www-form-urlencoded'; HTTPPost('http://www.receita.fazenda.gov.br/aplicacoes/atcta/cpf/ConsultaPublicaExibir.asp'); Erro := VerificarErros(RespHTTP.Text); if Erro = '' then begin Result:= True; Resposta := TStringList.Create; try Resposta.Text := StripHTML(RespHTTP.Text); RemoveEmptyLines( Resposta ); //DEBUG: //Resposta.SaveToFile('C:\temp\cpf.txt'); FCPF := LerCampo(Resposta,'No do CPF:'); FNome := LerCampo(Resposta,'Nome da Pessoa Física:'); FSituacao := LerCampo(Resposta,'Situação Cadastral:'); FEmissao := LerCampo(Resposta,'Comprovante emitido às:'); FCodCtrlControle := LerCampo(Resposta,'Código de controle do comprovante:'); FDigitoVerificador := LerCampo(Resposta,'Digito Verificador:'); finally Resposta.Free; end ; if Trim(FNome) = '' then raise EACBrConsultaCPFException.Create('Não foi possível obter os dados.'); if ARemoverEspacosDuplos then begin FNome := RemoverEspacosDuplos(FNome); end; end else begin Result:= False; raise EACBrConsultaCPFException.Create(Erro); end; finally Post.Free; end; end; Estou encaminhando o arquivo em anexo. ACBrConsultaCPF.pas

Boa noite, Comigo ocorre 19 erros, incluindo esse mesmo erro que o Raffael comentou. Já desinstalei, efetuei a limpeza conforme segue nos tópicos anteriores e mesmo assim... o AcbrInstall não consegue instalar sozinho, tenho que instalar manualmente, e quando vou instalar o Acbr ESC POS ele repassa esses mesmos erros indicados acima. Alguém tem algum tipo de informação diferente para passar?

Obrigado mesmo Gelson, Implantei aqui e funcionou no Delphi 7 também. Abraço.

Se eu não me engano você precisa de um certificado com padrão ICP Brasil para funcionar. Confira se seu certificado é desse padrão para poder testar melhor o exemplo.

Boa noite a todos... então o problema que indiquei acima é o mesmo que o Adriano indicou. Como foi mencionado para atualizar os fontes... tentei mas acho que o servidor do SVN está com problema pois esta dando erro quando tento acessar com o tortoise... indica que a pasta temporária do servidor esta com problemas... tentei em duas máquinas diferentes. O que pode ser?

Então... eu dei uma olhada nos fontes do programa demo que veio... Ele gera a RPS normalmente ... mas se utilizo o botão Gerar e enviar lote ele da um erro gigante dizendo que não foi possível carregar o arquivo: <EnviarLoteRpsEnvioxmlns.................................... e por ai vai... o erro é tão grande que não da nem para interpretar. O que poderia ser?

Fiquei sabendo que Maringá teria sido incluída na ACBR... eu vi no fonte do ACBrProvedorISSe.pas que Maringá já está incluída. Nesse caso seria somente incluir o nome de Maringá na combobox de cidades e colocar os schemas dentro da pasta ISSe? Onde colocaria os Schemas fornecidos pela cidade?

Existe algum demo para a implementação da NFSE para Maringá? Ou é o mesmo demo que vem com os fontes?