Heronim Antonio Marçal

Resposta!

Chegou outra resposta de outra prefeitura...

Acabo de receber uma resposta: Se você está enviado diretamente via SOAP, o XML não está completo o Serviço EnviarLoteRpsEnvio necessita de 3 parâmetros identificação do prestador, hash de autenticação e arquivo do lote, Ex.:: o hash, é obtido através de outro serviço necessário antes do envio: autenticarContribuinte (CNPJ, Senha) Complementando a transmissão via SOAP requer que seu XML (somente o Lote de RPS) as formatações HTML devem ser trocadas por seus caracteres especiais, como no exemplo acima, normalmente as IDE'S' que consomem Werbservices fazem essa conversão automática, quando apontados para campos do Tipo String, porém a transmissão diretamente via SOAP é necessária a conversão.

Pois é, apanhando e apanhando... Pelo que entendi o hash deve ser gerado, achei uma única menção no manual "03 - Layout Web Service da Municipalidade v1.07.doc" enviado em anexo. layout_rps.zip

Obrigado pelo retorno, Ítalo. Quanto ao problema no CNPJ, recebi a seguinte resposta do suporte do provedor:

Boa tarde, Ítalo, Vi que houve uma mudança no nome do arquivo PDF, mas notei que está gerando com as barras e traços no CNPJ, impossibilitando que o arquivo seja gravado. Exemplo: 32261907.211.082/0001-6256000000000-nfse.pdf Posso alterar o código mas não sei qual função vcs usam para eliminar estes caracteres.

Ok, obrigado pela dica.

Bom dia Ítalo, Vou checar aqui, forcei a mudança justamente pq gerava o arquivo como nomes diferentes.

Segue conforme solicitado ACBrNFSeNotasFiscais.pas

Senhores, Fiz a alteração abaixo pq notei que a geração do nome do arquivo PDF na criação do PDF não era a mesma do envio do email, gerando a mensagem de que o arquivo não existia. //ACBrNFSeNotasFiscais if (EnviaPDF) then begin if Assigned(DANFSE) then begin DANFSE.ImprimirDANFSEPDF(FNFSe); if Configuracoes.Arquivos.NomeLongoNFSe then begin NomeArq := GerarNomeNFSe(UFparaCodigo(NFSe.PrestadorServico.Endereco.UF), NFSe.DataEmissao, NFSe.PrestadorServico.IdentificacaoPrestador.CNPJ, StrToIntDef(NFSe.Numero, 0)); NomeArq := DANFSE.PathPDF + NomeArq + '-nfse.pdf'; end else NomeArq := NFSe.Numero + NFSe.IdentificacaoRps.Serie; // Correção aplicada do nome do arquivo para o envio de e-mail // NomeArq := PathWithDelim(DANFSE.PathPDF) + NumID[FNFSe] + '-nfse.pdf'; AnexosEmail.Add(NomeArq); end; end;

Ítalo, O problema do CNPJ cessou, agora ocorre outra mensagem, seguem os arquivos. Se puder me orientar agradeço. 1-env-lot-soap.xml 1-rec.xml 1-rec-soap.xml 1-env-lot.xml

Prezado Ítalo, Posso enviar o usuário e senha para teste, vc acha que ajudaria?

Prezado Ítalo, O CNPJ do prestador está preenchido, eu alterei no xml o CNPJ para 111111111111111 assim como a inscrição municipal e a razão social para manter os dados do cliente sob sigilo.

Prezado Ítalo, Segue em anexo o resultado da alteração. 1-rec.xml 1-rec-soap.xml 1-env-lot.xml 1-env-lot-soap.xml

Prezado Ítalo, Segue conforme solicitado EL.ini Cidades.INI

Em anexo o resultado. 1-env-lot-soap.xml 1-rec.xml 1-rec-soap.xml 1-env-lot.xml

Segue conforme solicitado: 1-env-lot-soap.xml 1-rec.xml 1-rec-soap.xml 1-env-lot.xml

Ok, em anexo conforme solicitado. 1-rec.xml 1-env-lot.xml

Segue em anexo. Troquei os dados do prestador por razão de confidencialidade. 1UNICA-rps.xml

Prezado Ítalo, Fiz teste com o demo conforme sua indicação, ocorreram as seguintes mensagens conforme imagem em anexo.

Prezado Ítalo, Já migrei quase todos os clientes para o trunk2, mas estou tendo dificuldades com o EL. Hoje acertei a questão do certificado, notei que ainda que eu configure para não usar o certificado, quando há certificado informado o componente aciona no envio. Retirei o certificado e parou de dar problema nas linhas abaixo: if (FPConfiguracoes.Certificados.NumeroSerie <> '') then // Tem Certificado carregado ? if FPConfiguracoes.Certificados.VerificarValidade then if (FPDFeOwner.SSL.CertDataVenc < Now) then raise EACBrDFeException.Create('Data de Validade do Certificado já expirou: ' + FormatDateBr(FPDFeOwner.SSL.CertDataVenc)); Ainda assim ele não envia, mesmo colocando timeout 30000 conforme indicado, ocorrendo a mensagem na imagem em anexo, como resolvo?

Senhores, Na geração do SAT a TAG do CST está ficando em branco, o que pode estar errado? Resolvido... Resolvido... erro de configuração...

Fiz exatamente isso Juliomar! Vlw!

Obrigado, Daniel, funcionou beleza!

Senhores, estou com o erro em anexo ocorrendo quando executo o Delphi XE8/XE9. Ao executar o instalador tudo funciona ok, mas ao entrar no Delphi ocorre a mensagem, o que estou fazendo errado? Já tente o Fastreport trial e a versão que vem com Delphi, em ambas ocorre o mesmo.