Italo Giurizzato Junior

Bom dia, Por favor faça um teste com a unit em anexo. BHISS.Provider.pas

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Boa tarde, Na unit GeisWeb.Provider você tem as function de cada serviço que o provedor implementou em seu webservice. TACBrNFSeXWebserviceGeisWeb = class(TACBrNFSeXWebserviceSoap11) private function GetNameSpace: string; function GetSoapAction: string; function GetAliasCidade: string; public function RecepcionarSincrono(ACabecalho, AMSG: String): string; override; function ConsultarLote(ACabecalho, AMSG: String): string; override; function ConsultarNFSe(ACabecalho, AMSG: String): string; override; function Cancelar(ACabecalho, AMSG: String): string; override; function TratarXmlRetornado(const aXML: string): string; override; property NameSpace: string read GetNameSpace; property SoapAction: string read GetSoapAction; property AliasCidade: string read GetAliasCidade; end; No caso do provedor GeisWeb temos os serviços: RecepcionarSincrono, ConsultarLote, ConsultarNFSe e Cancelar.

Boa tarde, Como não sei como é o retorno desses outros provedores não tenho como dizer a você o que pode esta de errado. Analisando o XML (soap) de retorno notei que foi retornado o código de erro 31 = Pesquisa sem retorno de NFS-e. Com certeza não esta sendo criado a lista de notas. Antes desses IF você esta verificando se o valor de Count é maior que zero? if ACBrNFSeX1.NotasFiscais.Count > 0 then

Bom dia a todos, Em vez de carregar todos os XML das notas a serem impressas independente se estão canceladas ou não, porque não carregar somente as não canceladas, marque a propriedade Cancelada como False e manda imprimir, depois limpa a lista de notas carrega todas as canceladas, marque a propriedade Cancelada com o valor True e manda imprimir. A sua rotina pode fazer isso tranquilamente a única diferença para o usuário é que os primeiros DANFE são de notas não canceladas e os últimos de notas canceladas.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia Flavio, No antigo abra a unit que gera o XML e comente a linha que gere essa tag. A unit é pnfsNFSeW_ISSDSF. Se a nota for emitida com sucesso, favor disponibilizar o XML de envio do lote gerado pelo componente antigo para que eu possa comparar com o que é gerado pelo novo. Só assim vamos saber o que esta ocorrendo.

Bom dia Guilherme, Eu devo ter alterado as URLs como base no manuais da própria IPM. Mas pelo jeito eles não checam se o manual que esta sendo disponibilizado esta com alguma informação errada. Paciência. Muito obrigado pela correção, ainda hoje estarei enviando para o SVN.

Bom dia, O XML da consulta do lote esta sendo gerado conforme o schema disponibilizado pelo provedor. O Envio, a consulta a NFS-e e o cancelamento esta ocorrendo sem nenhum erro desse tipo, somente a consulta ao lote. Pode ser um problema no webservice deles.

Bom dia, Favor atualizar os fontes e faça novos testes.

Boa noite, Favor realizar um teste com a unit em anexo. ACBrNFSeXLerXml_ABRASFv2.pas

Boa noite Flavio, Será que esse provedor não passa o dia inteiro recepcionando os lotes e depois realiza o processamento de madrugada?

Boa noite Gabriel, Acabei de fazer um teste com o programa exemplo, veja o resultado: Como você pode ver não ocorre erro de validação e sim a rejeição que diz que o contribuinte não foi encontrado na base de dados. O CNPJ foi trocado por xxxxxxxxxxxxxxx para não expor o que foi utilizado na tentativa de envio.

Boa noite Jeanny, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-2645

Gilson, Por essa imagem noto que os seus fontes estão desatualizados, pois já estamos com 1355 cidades atendidas pelo componente. Eu realmente não sei o que pode esta ocorrendo pois nos testes que eu realizei não ocorreu esse erro de validação.

Boa tarde Joemil, O componente cria uma pasta chamada Recibos e coloca dentro dela os XML dos Rps, quando o webservice retorna o XML da NFS-e ele cria uma pasta chamada Notas e coloca dentro dela os XML das notas. Essas pastas são criadas dentro do Path que você definiu.

Boa tarde José, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-2644

Boa tarde Amauri, Quais são os valores de: SSLLib, CryptLib, HttpLib, XmlSignLib e SLLType ?

Boa tarde Guilherme, Necessito do XML de retorno dessa consulta para poder analisar o problema.

Boa tarde Gabriel, A aplicação que você esta utilizando esta realmente utilizando o schema corrigido? Não adianta nada você atualizar todos os fontes de todas as pastas do ACBr, sendo que a aplicação esta se utilizando dos schemas que estão em outra pasta que não foi atualizada com os schemas corrigidos.

Boa tarde Anadilson, Favor atualizar os fontes e faça novos testes.

Boa tarde Gilson, Esse erro também ocorre com o programa exemplo?

Boa tarde Gibran, Tente dessa forma: ConfigGeral.QuebradeLinha := '
'; Lembre-se que na sua aplicação você vai ter que incluir também essa sequencia de caracteres como quebra de linha na discriminação do serviço. Exemplo: Discriminacao := 'Texto da primeira linha
Texto da segunda linha';

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Boa tarde, Já inclui na minha lista de tarefas para analisar o problema. TK-2641