Alan Lucas

Olá problema resolvido, Eu estava esquecendo de abater a desoneração do ICMS do valor da nota, podem fechar o tópico. Obrigado!

Olá, Estou tentando utilizar a function abaixo porem estou recebendo a mensagem da img1 Em anexo o xml que validei tanto no site da tecnospeed quanto da sefazrs e passou sem erro img2 e img3 Obs: Dependendo da CST se for calcular só ICMS passa, mas se tiver mais cálculos não passa, já atualizei os fontes do ACBr, atualizei os schemas com os do ACBr, tentei com os schemas que a sefaz distribui e nada Como não sei se o validador está correto embora passa a nota, estou postando aqui para o caso de alguém ter alguma luz ou para o caso de ser algo na Function ACBrNFe.NotasFiscais.ValidarRegrasdeNegocios(ErrosRegraNegocio); if ErrosRegraNegocio <> EmptyStr then raise Exception.Create(ErrosRegraNegocio); img1 img2 img3 53231001641028000170550010000000011000000029-nfe.xml

Boa tarde Italo, Acabei vendo sua mensagem só hoje. Resolvido obrigado pelo empenho.

Boa tarde Italo, Estou usando essa versão do Delphi Embarcadero® Delphi 10.3 Version 26.0.36039.7899

Opa Italo boa tarde, Então eu mudei de local os schemas para encurtar o caminho, mas em ambos os caminhos estava setado corretamente para onde estavam os schemas tanto que deu erro na validação, se não encontrasse os schemas o erros seria outro não concorda? De qualquer forma depois das alterações na classe que vc sugeriu consegui emitir a NFS-e sem erro nenhum

Boa tarde Italo, Obrigado pela dica, fiz conforme vc sugeriu e deu certo validou sem problema, segue a unit em anexo. Entendo que só eu reportei esse problema, mas talvez seja porque aqui em Brasília só deve entrar em funcionar em 01.01.2023 ISSNet.GravarXml.pas

Olá Italo, Alterei na classe ACBrNFSeXGravarXml.pas na linha 190 de: FFormatoAliq := tcDe4; para: FFormatoAliq := tcDe2; Com isso passou na validação e deu certo, contudo com certeza pode afetar outros provedores, mas foi a solução que eu achei

Segue o XML e o print de como está no XML temp1.xml

Não mexi nada no programa de exemplo apenas compilei configurei os parâmetros necessários e quando tento enviar da esse erro. Nele para o ISSNet está assim a alíquota, eu vi no fórum algumas pessoas falando para dividir por 100 mas dá na mesma porque o ACBr normaliza Servico.Valores.Aliquota := 2;

Boa tarde Italo, Está correto o caminho dos schemas tanto que chega a validar dizendo que só aceita 4 dígitos mas está sendo passado com 5 dígitos Segue print de como está

Boa noite Italo, Fiz um teste pelo programa de exemplo e deu o mesmo erro, estou com a última versão atualizei e recompilei hoje, segue imagem do erro Posso está fazendo algo de errado, mas não identifiquei

Olá, Estou tendo o erro abaixo na na validação da alíquota no provedor ISSNet aqui em Brasília Código: X800 Erro de validação: '5.0000' violates totalDigits constraint of '4' the element '{http://www.abrasf.org.br/nfse.xsd}Aliquota' whith value '5.0000' failed to parse No arquivo schema nfse.xsd está configurado dessa forma <xsd:simpleType name="tsAliquota"> <xsd:restriction base="xsd:decimal"> <xsd:totalDigits value="4" /> <xsd:fractionDigits value="2" /> <xsd:minInclusive value="0" /> </xsd:restriction> </xsd:simpleType> Eu vi que já houve esse erro em outros provedores, mas não encontrei nada do ISSNet

Em Brasília entra os serviços no total da nota. Lembrei agora que aqui tem algumas particularidades.

Boa tarde Roberto, Obrigado pelo feedback bom vou verificar mas isso só ocorre na regra de negócio do ACBr quando eu comentei o trecho para não validar foi enviado e autorizado sem erro. O XML de teste está anexo acima

Resolvido, Alterei a linha 1107 da Unit ACBrNFeNotasFiscais.pas de: GravaLog('Validar: 564-Total Produto/Serviço'); if (NFe.Total.ICMSTot.vProd <> fsvProd) then AdicionaErro('564-Rejeição: Total do Produto / Serviço difere do somatório dos itens'); para: GravaLog('Validar: 564-Total Produto/Serviço'); if ((NFe.Total.ICMSTot.vProd + NFe.Total.ISSQNtot.vServ) <> fsvProd) then AdicionaErro('564-Rejeição: Total do Produto / Serviço difere do somatório dos itens'); Pois na validação só estava considerando produtos e não serviços. O problema ocorria quando se adicionava produtos e serviços na nota, o fsvProd vem carregado com o valor total dos produtos e serviços e estava sendo comparado apenas com os produtos gerando erro. Não sei se foi a melhor solução mas passou sem problema rs... Forte abraço.

Olá, Estou com um problema ao tentar validar as regras de negocio pelo ACBr está me retornando o seguinte erro em anexo... Para validar eu uso o seguinte código: DM.ACBrNFe1.NotasFiscais.ValidarRegrasdeNegocios(ErrosRegraNegocio); if ErrosRegraNegocio <> '' then raise Exception.Create(ErrosRegraNegocio); Eu achei que estava errando em algum calculo mas se eu remover esse trecho a nota é autorizada normalmente Segue em anexo o xml caso alguém tenha alguma dica fico agradecido 53180126850336000137650010000000049000000046-nfe.xml

Olá Gustavo, Dia 14/06 o Daniel subiu para o SVN todas as correções necessárias. Está totalmente funcional.

Olá Daniel, Desculpa não mandei no primeiro post mas segue fonte com um adendo agora a consulta também trás a data da inscrição do CPF. Aproveitei e implementei esse campo no componente e mudei o exemplo ACBrConsultaCPF.pas Delphi.zip

Olá, Houve uma alteração no endereço onde é feito a consulta do CPF e por conta disso o ACBrConsultaCPF não estava funcionando corretamente Segue fonte com as correções necessárias. Alan Lucas ACBrConsultaCPF.pas

Ruan Sousa, O código que identifica o cancelamento homologado é cStat = 135 ou 155 cStat = 135 para cancelamento homologado dentro do prazo cStat = 155 para cancelamento homologado fora do prazo Pegue esse retorno aqui: ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat Alan Lucas http://www.dftech.com.br