Jump to content

2 Dia do ACBr

O Dia da Automação Comercial está chegando!
Inscreva-se

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

niloblack

ANSWERED Rejeição: Não informada vBCSTRet, pST, vICMSSubstituto e vICMSSTRet

Recommended Posts

@EMBarbosa, eu testei com o fonte conforme sua alteração mesmo, ou seja, removendo o if que impedia a geração das tags caso elas fossem zeradas.

Depois fiz o teste com essa alteração que mencionei e funcionou, tanto para NFe quanto para NFCe.

Segue fonte: pcnNFeW.pas

Edited by Leonardo de Alice
  • Like 1

Share this post


Link to post
Share on other sites
15 horas atrás, Leonardo de Alice disse:

@EMBarbosa, eu testei com o fonte conforme sua alteração mesmo, ou seja, removendo o if que impedia a geração das tags caso elas fossem zeradas. 

Não existe mais esse if que você mencionou. Por isso eu que disse que você não testou com a alteração que enviei ao SVN.

  • Thanks 1

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.

Share this post


Link to post
Share on other sites

Sim @EMBarbosa, esse if não existe mais, mas meus primeiros testes foram justamente removendo ele.

Ou seja, ao remover ele as tags eram SEMPRE escritas, o que gerou o problema na emissão de NFe com Consumidor Final e na NFCe.

Foi após isso que resolvi fazer o if que compartilhei com vocês.

Porém agora estou analisando outro problema, que está dando em produção, pois essas regras são passarão a ser válidas após a data de implementação.

Assim que eu testar as mudanças e der certo, compartilho aqui.

Share this post


Link to post
Share on other sites

 

23 minutos atrás, Leonardo de Alice disse:

Porém agora estou analisando outro problema, que está dando em produção, pois essas regras são passarão a ser válidas após a data de implementação.

Assim que eu testar as mudanças e der certo, compartilho aqui.

A nota técnica (NT) 005/2018 adiou para algumas UFs a implantação disso em produção pra 07/05/2019. Para outras isso passa a valer em produção no último dia útil de abril.

Veja a página 4, "Histórico de Alterações / Cronograma" da referida NT.

  • Like 1
  • Thanks 1

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.

Share this post


Link to post
Share on other sites

Obrigado pela dica @EMBarbosa, já estou ciente dos prazos.

Conforme já citei, a correção que eu tinha feito para gerar as tags vBCSTRet, pST, vICMSSubstituto e vICMSSTRet sempre que for NFe e Não Consumidor Final, só funcionou para o ambiente de Homologação, no ambiente de Produção o ero retornado é "Falha no Schema XML do lote de NFe".

Para resolver isso eu criei a propriedade TagNT2018005 dentro de NFe.Configuracoes.Geral e estou usando ela com três opções no pcnNFeW.pas, conforme código abaixo.

  if(((FOpcoes.TagNT2018005 = 0)and((nfe.Det[i].Imposto.ICMS.vBCSTRET > 0)or(nfe.Det[i].Imposto.ICMS.vICMSSTRET > 0)))or
     ((FOpcoes.TagNT2018005 = 1)and(nfe.Ide.modelo = 55)and(nfe.Ide.indFinal <> cfConsumidorFinal))or
     ((FOpcoes.TagNT2018005 = 2)))then
  begin
    iTag := IIf((FOpcoes.TagNT2018005 = 0), 0, 1);

Essa variável iTag eu uso no 6º parâmetro do Gerador.wCampo da tag vICMSSubstituto para definir se ela será ou não escrita se valor for ZERO.

Para funcionar em PRODUÇÃO, a propriedade TagNT2018005 tem que estar 0.

Para funcionar em HOMOLOGAÇÃO, a propriedade TagNT2018005 tem que estar 1.

A opção 2 eu criei por precaução, não sei se teremos esse caso.

No meu sistema criei um campo no banco de dados que vai definir essa propriedade do ACBr, dessa forma eu consigo atualizar todos os clientes que preciso, deixando a opção 0 habilitada; depois, quando entrar em vigor a NT 2018.005 eu habilito via update a opção 1.

É um ajuste temporário, semelhante ao que foi feito com a propriedade NFe.Configuracoes.Geral.CamposFatObrigatorios um tempo atrás.

  • Like 2

Share this post


Link to post
Share on other sites

Boa tarde, pessoal! Atualizei os fontes e os schemas, porém o erro referente à falha nos schemas de lote persiste em produção. Será que alguém pode me dar uma luz?

 

Obrigado.

Share this post


Link to post
Share on other sites

@Lincoln D, verifica se as tags vBCSTRet, pST, vICMSSubstituto e vICMSSTRet estão presentes em seu XML, e se o valor delas é ZERO.

Se sim, o problema está ai, elas não podem constar no XML com valor zerado no ambiente de PRODUÇÃO, pois os servidores ainda não estão preparados para validar dessa forma.

Share this post


Link to post
Share on other sites
38 minutos atrás, Lincoln D disse:

Boa tarde, pessoal! Atualizei os fontes e os schemas, porém o erro referente à falha nos schemas de lote persiste em produção. Será que alguém pode me dar uma luz?

 

Obrigado.

Olá Lincoln,

   Esse me parece ser outro erro e não tem relação com este tópico.

 


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.

Share this post


Link to post
Share on other sites

@Leonardo de Alice, realmente, as tags que você mencionou estavam sendo geradas independente da configuração que eu fizesse. Daí comentei a parte do código que as gerava e as mesmas não apareceram no XML. Porém a mensagem de erro continua persistindo em ambiente de PRODUÇÃO. 

@EMBarbosa, realmente o erro parece não ter relação com que foi discutido aqui, mas pensei nessa hipótese pelo fato da nota que o usuário está tentando emitir ser de substituição tributária, CSOSN 500 e pelo fato de alguns usuários terem recebido tal mensagem de erro "Falha no Schema do Lote de NFe"

Outros usuários de MG que não contribuem em regime de substituição tributária conseguiram emitir suas notas normalmente.

Fiquei sem norte depois dessa.

  • Like 1

Share this post


Link to post
Share on other sites

acbr atualizado svn 16876 , esta dando erro schema quando envio para producao.  enviando em homologacao o erro nao acontece.

quando volto a versao svn para 16850 ( chute ) , a nfce em producao vai normalmente.

 

 

Share this post


Link to post
Share on other sites

@Leonardo de Alice, cara, retiro o que eu disse. Na verdade o problema estava relacionado ao que você falou também, pois independente do que eu fizesse, colocando zeros ou ou não informando as referidas tags, as mesmas apareciam zeradas no XML. Então, como disse, comentei a parte do código que adicionava essas tags, mas o erro persistiu. Porém fiz a validação do XML e vi que as tags referentes ao responsável técnico também estavam sendo adicionadas antes do prazo de reconhecimento. Comentei essa última parte e tudo voltou a funcionar.

Agora está tudo redondo.

Obrigado.

  • Like 1

Share this post


Link to post
Share on other sites

Olá, 

Para o Paraná somente comentado todos os campos para validar a nota em produção.

Só para que tenha conhecimento.

att


Elias Jakubowski

LS Technologies - www.lstech.com.br

Share this post


Link to post
Share on other sites

Bom dia @EMBarbosa, tudo bem.  Só para dar o feedback conforme pedido.

Ontem pela por volta das 8:00 da manhã, refiz novamente o download via SVN ACBr conforme suas instruçoes  e instalei novamente no meu Delphi Seattle.

Como ontem foi uma correria, somente hoje consegui fazer  teste de emissão de Danfes no ambiente de homologação, lembrando que eu estou no estado de  São Paulo.

Consegui emitir nota fiscal numa boa, tanto para dentro do meu estado como para fora também.

Segue em anexo os XML's  caso seja útil para alguém do foro.

Venho lembrar que eu só utilizo Danfe e emito SAT para pessoa física.

Agora gostaria de saber, se estas alterações que o @Leornado de Alice fez no arquivo pcnNfew.pas, serão implementadas no ACBr?

Mais uma vez agradeço a atenção de todos.

Nota123039.XML Nota123040.XML Nota123041.XML

  • Like 1

Share this post


Link to post
Share on other sites

xml em homologacao esta normal , mas a sefaz AM esta dando erro em producao por causa dos campos q estao zerados vicmssubstituicao

Share this post


Link to post
Share on other sites
Em 11/04/2019 at 11:34, Leonardo de Alice disse:

só funcionou para o ambiente de Homologação, no ambiente de Produção o ero retornado é "Falha no Schema XML do lote de NFe". 

Suspeitei desde o princípio...

Em 11/04/2019 at 11:34, Leonardo de Alice disse:

No meu sistema criei um campo no banco de dados que vai definir essa propriedade do ACBr, dessa forma eu consigo atualizar todos os clientes que preciso, deixando a opção 0 habilitada; depois, quando entrar em vigor a NT 2018.005 eu habilito via update a opção 1.

É um ajuste temporário, semelhante ao que foi feito com a propriedade NFe.Configuracoes.Geral.CamposFatObrigatorios um tempo atrás.

Se quiser anexar essas alterações, poderemos analisar. Pensamos em algo semelhante ao discutirmos entre os devs sobre esse problema.

7 horas atrás, Paulo Aguiar disse:

@EMBarbosa Esse caso está em analise para correção SVN ? 

7 horas atrás, info02serraf disse:

Agora gostaria de saber, se estas alterações que o @Leornado de Alice fez no arquivo pcnNfew.pas, serão implementadas no ACBr?

Vejam a mensagem acima.

  • Like 2

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.

Share this post


Link to post
Share on other sites

Também tive este problema aqui em MG.

Fiz a alteração no arquivo pcnNFeW.pas para não gerar os campos vBCSTRet, vICMSSTRet e  vICMSSubstituto caso fossem zeradas e recompilar o ACBr_NFe.

                    if (nfe.Det.Imposto.ICMS.vBCSTRET > 0) or (nfe.Det.Imposto.ICMS.vICMSSTRET > 0) then
                    begin
                      iTag := IIf((FOpcoes.TagNT2018005 = 0), 0, 1);
                      Gerador.wCampo(tcDe2, 'N26', 'vBCSTRet  ', 01, 15, 1, nfe.Det.Imposto.ICMS.vBCSTRET, DSC_VBCSTRET);

                      if (NFe.infNFe.Versao >= 4) then
                      begin
                        Gerador.wCampo(IIf(FUsar_tcDe4,tcDe4,tcDe2), 'N26.1', 'pST', 01, IIf(FUsar_tcDe4,07,05), 1, nfe.Det.Imposto.ICMS.pST, DSC_PST);
                        // Algumas UF estão exigindo o campo abaixo preenchido mesmo quando for zero.
                        Gerador.wCampo(tcDe2, 'N26b', 'vICMSSubstituto', 01, 15, iTag, nfe.Det.Imposto.ICMS.vICMSSubstituto, DSC_VICMSSUBSTITUTO);
                      end;
                      Gerador.wCampo(tcDe2, 'N27', 'vICMSSTRet', 01, 15, 1, nfe.Det.Imposto.ICMS.vICMSSTRET, DSC_VICMSSTRET);
                    end;

  • Like 1

Share this post


Link to post
Share on other sites

Bom dia,

Como pode ser notado no decorrer do tópico, foram feitos vários testes..ainda estamos analisando e testando as modificações.

Sugiro que acompanhe o tópico e o svn para se manter atualizado quanto a finalização deste assunto.

Att.

  • Like 2

Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites

haaaaaaa legal. Bem, então por hora, atualizei o SVN, peguei os fontes (3 .pas) que o Leonardo de Alice postou, recompilei o ACBr e show. Tudo funcionando.... mas no meu caso eram os clientes CSOSN 500 o problema. Muito Obrigado.

  • Like 2

Share this post


Link to post
Share on other sites
Em 12/04/2019 at 11:17, jmcsoftware disse:

xml em homologacao esta normal , mas a sefaz AM esta dando erro em producao por causa dos campos q estao zerados vicmssubstituicao

Bom, acredito que seja porque ainda não atualizaram as webservices. Aqui em PE, a WebService só estará disponível para receber esses campo a partir do dia 07 de maio.

Share this post


Link to post
Share on other sites
1 hora atrás, niloblack disse:

Bom, acredito que seja porque ainda não atualizaram as webservices. Aqui em PE, a WebService só estará disponível para receber esses campo a partir do dia 07 de maio.

em são paulo homologação esta normal também, somente em produção que esta dando erro. estou com 2 clientes assim com problema. vamos aguardar os moderados do ACbr, acredito que vão solucionar isso, como sempre o fizeram com muito competencia. obrigado a todos

  • Like 1

Share this post


Link to post
Share on other sites
15 horas atrás, Antonio Paulo Mangili disse:

em são paulo homologação esta normal também, somente em produção que esta dando erro. estou com 2 clientes assim com problema. vamos aguardar os moderados do ACbr, acredito que vão solucionar isso, como sempre o fizeram com muito competencia. obrigado a todos

Aqui eu coloquei um if.

if (Ide.tpAmb = taHomologacao) or ((Ide.tpAmb = taProducao) and (Date >= StrToDate('07/05/2019'))) then
begin
  ICMS.CST := cst60;
  ICMS.vBCSTRet        := 0.00;
  ICMS.pST             := DM1.QrItensNFe.FieldByName('taxaparaconsumidorfinal').AsCurrency;
  ICMS.vICMSSubstituto := 0.00; // Valor do ICMS Próprio do Substituto cobrado em operação anterior
  ICMS.vICMSSTRet      := 0.00;
end
  else
  begin
    ICMS.CST := cst60;
    ICMS.pST := DM1.QrItensNFe.FieldByName('taxaparaconsumidorfinal').AsCurrency;
  end;

 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

×
×
  • Create New...