Italo Giurizzato Junior

Boa tarde Eraldo, Fizemos uma correção na leitura do campo: categCombVeic. A geração do arquivo INI deverá ser da seguinte forma: [valePed] categCombVeic=06 [valePed001] CNPJForn=00000000000000 CNPJPg=000000000000000 nCompra=00000000 vValePed=0.00 ou [valePed] categCombVeic=06 [disp001] CNPJForn=00000000000000 CNPJPg=000000000000000 nCompra=00000000 vValePed=0.00 uma vez que os campos: CNPJForn, CNPJPg, ... se referem as informações dos dispositivos do vale-pedágio. Por favor aguarde a liberação de uma nova versão do ACBrMonitor Plus.

Thiago, Acredito ter descoberto o problema. Não estava sendo informado a Insc. Municipal do Tomador. Deixei essa tag como opcional. Favor atualizar os fontes e faça novos testes.

Boa tarde a todos, Me parece que esse provedor já esta implementado só que com outro nome. Favor postar as URLs de produção e homologação para que eu possa analisar.

Boa tarde Thiago, Se possível anexe os XMLs gerados tanto do programa antigo quanto do novo.

Comparei a rotina que faz a assinatura adicional praticamente esta igual, só fiz uma pequena alteração. Mudei também para pegar o valor atribuído no campo Transacao. Vamos ver se agora gera exatamente igual. SP.Provider.pas

Boa tarde, Vou tentar descobrir porque esta gerando a tag <Assinatura> diferente do outro.

Bom dia, Você atualizou todas as pastas do ACBr? Procure sempre atualizar todas as pastas. Esses erros se referem ao programa exemplo.

Bom dia Eraldo, Já estou analisando o problema e acredito vai ser necessário fazer algumas alterações. Por favor aguarde.

Mandei para o SVN mais uma correção no que se refere ao valor total da dedução que estava sendo gerado 0.00 em vez de apenas 0. O digestvalue e a assinatura estão diferente por conta da tag <Discriminacao> que no lote de numero 13 consta como quebra de linha o caractere ";" e no lote de numero 35 é "|"; Por favor atualize os fontes.

Pelo o que eu descobri sobre a tag <transacao> é { Tag <transacao> Informe se os RPS a serem substituídos por NFS-e farão parte de uma mesma transação. True - Os RPS só serão substituídos por NFS-e se não ocorrer nenhum evento de erro durante o processamento de todo o lote; False - Os RPS válidos serão substituídos por NFS-e, mesmo que ocorram eventos de erro durante processamento de outros RPS deste lote. }

Thiago, No teste que fiz informei uma IM com 8 dígitos.

Nessa assinatura? Se você tem os dois componentes instalados (ACBrNFSe e ACBrNFSeX) e verifica se ocorre o mesmo problema. Se não ocorrer com o ACBrNFSe, por favor anexe o XML de envio do componente antigo e o XML de envio gerado pelo novo para que possamos analisar.

Boa tarde Thiago, Acabei de fazer um teste com o programa exemplo e não tive esse erro. Você configurou ele para pegar os schemas da pasta: ...\Exemplos\ACBrDFe\ACBrNFSe\Schemas\Digifred ?

Acredito que agora vai funcionar. SP.GravarXml.pas SP.Provider.pas

Boa tarde Edu, Lhe convido a iniciar os testes com o novo componente de emissão de NFS-e: ACBrNFSeX. Por favor atualize todos os fontes de todas as pastas, note que na lista de componentes do Instalador temos agora o componente ACBrNFSeX e o componente novo para emissão do DANFSE feito em Fortes Report, em breve teremos também em Fast Report. O componente antigo ACBrNFSe não vai mais receber melhorias ou correções. Manual de Migração https://www.projetoacbr.com.br/forum/topic/63017-manual-de-migração-para-o-novo-componente-de-emissão-de-nfs-e/

Boa tarde Thiago, Apesar do seu problema também ser de validação do XML, por ser outro provedor seria interessante que fosse criado um outro tópico para tratarmos do provedor Digifred. Mas me parece que o seu problema é que a Insc. Municipal não foi informada.

Boa tarde raosistemas, Na unit SP.GravarXml na function GerarXml faça a seguinte alteração: Opcoes.SuprimirDecimais := True; Opcoes.DecimalChar := '.'; Opcoes.QuebraLinha := FAOwner.ConfigGeral.QuebradeLinha; Veja se resolve o problema.

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

Olá Pessoal, Uma empresa que vende e realiza o transporte de sua mercadoria normalmente fazem seguro da carga que esta sendo transportada. A averbação é a declaração das mercadorias em estado de risco. O que vai ser apresentado abaixo é como averbar uma NF-e se utilizando do componente ACBrANe e a empresa responsável pela averbação será a AT&M. A averbação de uma NF-e é muito simples, os passos são: 1. Emitir a NF-e utilizando o componente ACBrNFe; 2. Averbar a NF-e utilizando o componente ACBrANe; O programa exemplo do componente ACBrANe é bastante simples e de fácil compreensão. Abaixo a rotina que alimenta o componente ACBrANe para realizar a averbação de uma NF-e: procedure TfrmACBrANe.AlimentarComponente(ANomeArq: String); begin ACBrANe1.Documentos.Clear; with ACBrANe1.Documentos.Add.ANe do begin // ATM Usuario := ACBrANe1.Configuracoes.Geral.Usuario; Senha := ACBrANe1.Configuracoes.Geral.Senha; codatm := ACBrANe1.Configuracoes.Geral.CodATM; // ELT NomeArq := ExtractFileName(ANomeArq); CNPJ := ACBrANe1.Configuracoes.Geral.CNPJEmitente; // ATM e ELT xmlDFe := DocNFeCTe; end; end; O componente permite averbar documentos com a AT&M e ELT, como dito estamos exemplificando o processo com base na AT&M. Para a AT&M precisamos informar o Usuário, Senha e o Código AT&M gerado para cada usuário. A variável DocNFeCTe é do tipo string e ela contem o conteúdo do XML. Detalhe importante: podemos averbar uma NF-e ou CT-e, nessa postagem estarei mostrando a averbação de uma NF-e, logo o conteúdo da variável DocNFeCTe do programa exemplo vai conter o XML de uma NF-e. Após alimentar o componente com os dados necessários, basta executar o método Enviar, como é mostrado pela codificação do botão [Criar e Enviar] do programa exemplo. A questão maior é quando o segurado possui coberturas adicionais em sua apólice tais como: Operação de carga e descarga, içamento de carga, contêiner, acessórios, entre outros. No Manual da AT&M (WebService 2.0 - REST 1.1) temos no item 21.0 e subitens uma relação das coberturas adicionais e os seus valores padrões. A titulo de exemplo vamos pegar a cobertura: Operação de Carga e Descarga. O valor padrão é "N" ou seja o segurado não tem essa cobertura. Caso o segurado venha a ter se faz necessário constar no XML da NF-e a informação que ele tem a cobertura para a Operação de Carga e Descarga. Como fazer isso? Vamos utilizar (conforme consta no manual da AT&M) o grupo de observação do contribuinte. Exemplo genérico: with InfAdic.ObsCont.New do begin xCampo := 'Nome do Campo'; xTexto := 'Valor do Campo'; end; Informando que o segurado tem cobertura para a Operação de Carga e Descarga na rotina que alimenta o componente ACBrNFe: with InfAdic.ObsCont.New do begin xCampo := 'OCD'; xTexto := 'S'; end; Isso vai fazer com que ao gerar o XML da NF-e ele vai conter as tags: <infAdic> <obsCont xCampo =“OCD”> <xTexto>S</xTexto> </obsCont> </infAdic> Vamos supor que o segurando além de ter a cobertura de Operação de Carga e Descarga tenha também a cobertura para içamento de carga da mercadoria. with InfAdic.ObsCont.New do begin xCampo := 'OCD'; xTexto := 'S'; end; with InfAdic.ObsCont.New do begin xCampo := 'IC'; xTexto := 'S'; end; No XML teremos: <infAdic> <obsCont xCampo =“OCD”> <xTexto>S</xTexto> </obsCont> <obsCont xCampo =“IC”> <xTexto>S</xTexto> </obsCont> </infAdic> Um XML com esses dados vai ser autorizado pela SEFAZ sem nenhum problema, uma vez que essas informações são observações do contribuinte informadas no XML de forma estruturada. Ao enviar o XML da NF-e com essas tag para o webservice da AT&M ela identifica essas informações no XML e averba a NF-e levando em consideração as coberturas informadas. Detalhe Importante: O grupo obsCont só pode ocorrer no XML no máximo 10 vezes (no exemplo acima temos 2 ocorrências), logo não informe uma cobertura que você não tenha ou com o seu valor padrão. Exemplo: Se o segurado tenha uma cobertura para uma mercadoria especifica deverá constar no XML, caso contrario não informe. <infAdic> <obsCont xCampo =“MERCESPECIFICA”> <xTexto>S</xTexto> </obsCont> </infAdic> Espero ter ajudado.

Boa tarde Paulo, Veja esse artigo: Espero que ele lhe ajude a compreender melhor como funciona a averbação de uma carga com algumas coberturas adicionais.

Olá Pessoal, Normalmente as transportadora fazem seguro da carga que esta sendo transportada. A averbação é a declaração das mercadorias em estado de risco. O que vai ser apresentado abaixo é como averbar um CT-e se utilizando do componente ACBrANe e a empresa responsável pela averbação será a AT&M. A averbação de um CT-e é muito simples, os passos são: 1. Emitir o CT-e utilizando o componente ACBrCTe; 2. Averbar o CT-e utilizando o componente ACBrANe; O programa exemplo do componente ACBrANe é bastante simples e de fácil compreensão. Abaixo a rotina que alimenta o componente ACBrANe para realizar a averbação de um CT-e: procedure TfrmACBrANe.AlimentarComponente(ANomeArq: String); begin ACBrANe1.Documentos.Clear; with ACBrANe1.Documentos.Add.ANe do begin // ATM Usuario := ACBrANe1.Configuracoes.Geral.Usuario; Senha := ACBrANe1.Configuracoes.Geral.Senha; codatm := ACBrANe1.Configuracoes.Geral.CodATM; // ELT NomeArq := ExtractFileName(ANomeArq); CNPJ := ACBrANe1.Configuracoes.Geral.CNPJEmitente; // ATM e ELT xmlDFe := DocNFeCTe; end; end; O componente permite averbar documentos com a AT&M e ELT, como dito estamos exemplificando o processo com base na AT&M. Para a AT&M precisamos informar o Usuário, Senha e o Código AT&M gerado para cada usuário. A variável DocNFeCTe é do tipo string e ela contem o conteúdo do XML. Detalhe importante: podemos averbar uma NF-e ou CT-e, nessa postagem estarei mostrando a averbação de um CT-e, logo o conteúdo da variável DocNFeCTe do programa exemplo vai conter o XML de um CT-e. Após alimentar o componente com os dados necessários, basta executar o método Enviar, como é mostrado pela codificação do botão [Criar e Enviar] do programa exemplo. A questão maior é quando o segurado possui coberturas adicionais em sua apólice tais como: Operação de carga e descarga, içamento de carga, contêiner, acessórios, entre outros. No Manual da AT&M (WebService 2.0 - REST 1.1) temos no item 16.0 e subitens uma relação das coberturas adicionais e os seus valores padrões. A titulo de exemplo vamos pegar a cobertura: Operação de Carga e Descarga. O valor padrão é "N" ou seja o segurado não tem essa cobertura. Caso o segurado venha a ter se faz necessário constar no XML do CT-e a informação que ele tem a cobertura para a Operação de Carga e Descarga. Como fazer isso? Vamos utilizar (conforme consta no manual da AT&M) o grupo de observação do contribuinte. Exemplo genérico: with compl.ObsCont.New do begin xCampo := 'Nome do Campo'; xTexto := 'Valor do Campo'; end; Informando que o segurado tem cobertura para a Operação de Carga e Descarga na rotina que alimenta o componente ACBrCTe: with compl.ObsCont.New do begin xCampo := 'OCD'; xTexto := 'S'; end; Isso vai fazer com que ao gerar o XML do CT-e ele vai conter as tags: <compl> <ObsCont xCampo =“OCD”> <xTexto>S</xTexto> </ObsCont> </compl> Vamos supor que o segurando além de ter a cobertura de Operação de Carga e Descarga tenha também a cobertura para içamento de carga da mercadoria. with compl.ObsCont.New do begin xCampo := 'OCD'; xTexto := 'S'; end; with compl.ObsCont.New do begin xCampo := 'IC'; xTexto := 'S'; end; No XML teremos: <compl> <ObsCont xCampo =“OCD”> <xTexto>S</xTexto> </ObsCont> <ObsCont xCampo =“IC”> <xTexto>S</xTexto> </ObsCont> </compl> Um XML com esses dados vai ser autorizado pela SEFAZ sem nenhum problema, uma vez que essas informações são observações do contribuinte informadas no XML de forma estruturada. Ao enviar o XML do CT-e com essas tag para o webservice da AT&M ela identifica essas informações no XML e averba o CT-e levando em consideração as coberturas informadas. Detalhe Importante: O grupo ObsCont só pode ocorrer no XML no máximo 10 vezes (no exemplo acima temos 2 ocorrências), logo não informe uma cobertura que você não tenha ou com o seu valor padrão. Exemplo: Se o segurado tenha uma cobertura para uma mercadoria especifica deverá constar no XML, caso contrario não informe. <compl> <ObsCont xCampo =“MERCESPECIFICA”> <xTexto>S</xTexto> </ObsCont> </compl> Espero ter ajudado.

Bom dia Paulo, Que componente você se refere (ACBrANe ou ACBrCTe)? A geração do grupo <compl> com a estrutura apresenta na minha postagem anterior já existe a anos no componente ACBrCTe. A ideia é simples: 1. Ao gerar o XML do CT-e ele deve constar o grupo <compl> (para isso você vai usar o componente ACBrCTe); 2. Enviar o XML do CT-e para a SEFAZ devidamente assinado e validado (para isso você vai usar o componente ACBrCTe); 3. Averbar junto a AT&M o CT-e, para tal devemos enviar o XML do CT-e para a AT&M (para isso você vai usar o componente ACBrANe); Não se faz necessário fazer alteração nenhuma em nenhum dos dois componentes.

Bom dia, Favor realizar novos testes com a unit abaixo: SP.GravarXml.pas Salve ela na pasta: ...\Fontes\ACBrDFe\ACBrNFSeX\Provedores

DJean, Por favor testa com essas novas units: IPM.GravarXml.pas IPM.Provider.pas

Djean, Estranho deveria mostrar a mensagem de rejeição.