Jump to content

dev botao

Geração de Tributo ICMS


tborges
Go to solution Solved by José M. S. Junior,
  • Este tópico foi criado há 852 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Estou obtendo a seguinte validação de regra de negócio de uma NFe.

image.png.b2603992ea4c920b608afa6ac6e10c6b.png

se eu continuar e mandar validar obtenho mais esta mensagem.

image.png.e83f78d04244519835a66f9dc1975e70.png

o String Ini da Classe gerada é este...local onde obtive o string ' ACNFe.CarregarNota(ACNotaFiscal)'

[Produto001]
cProd=025
cEAN=17898955143022
cEANTrib=17898955143022
xProd=Achocolatado EstraFoods Pacote 200 Gr
NCM=18069000
CEST=1700600
CFOP=5.401
uCom=PCT
qCom=400,000000
vUnCom=0,540000
vProd=216,00
uTrib=PCT
qTrib=400,000000
vUnTrib=0,540000
vFrete=0,000000
vSeg=0,000000
vDesc=0
indTot=1
nItemPed=1
pDevol=0
vIPIDevol=0
vTotTrib=12,96
indEscala=S

[rastro001001]
qLote=0
dFab=01/01/0001
dVal=01/01/0001

[ICMS002]
orig=0
CSOSN=201
modBCST=4
pMVAST=33,3300
vBCST=287,99
pICMSST=18,0000
vICMSST=12,96
pCredSN=0,0000
vCredICMSSN=0,00

[Total]
vBC=0
vICMS=0
vICMSDeson=0
vBCST=287,99
vST=12,96
vProd=216,000000
vFrete=0,000000
vSeg=0,000000
vDesc=0,000000
vII=0
vPIS=0
vCOFINS=0
vOutro=0,000000
vNF=228,960000
vFCP=0,00
vFCPST=0,00
vFCPSTRet=0
vIPI=0
vTotTrib=12,96
vIPIDevol=0
 

O Codigo que gerou a Classe ACNotaFiscal = New ACBrLib.NFe.NotaFiscal é este

image.thumb.png.f3ec24ac13e71b1e0a2777822a2f46ce.png

 

Se observarem a Section [ICMS002] é a unica incorreta, se eu editar a string para [ICMS001] gravar um arquivo texto, chamar via CarregarINI, não ocorre nenhuma mensagem.

Minha pergunta é : No codigo acima esta faltando alguma linha para definir que a Sections que foi gerada é '001' ou o Metodo da Classe esta contanto o [ICMS] incorretamente?

 

Tiago Borges
Head de Produtos

separado.png

logo.gif


Cel: (12) 98190.3952
Site:
www.estrategiasoftware.com.br

Link to comment
Share on other sites

  • Membros Pro

Junior aproveitando olhe este outro problema.

Se antes disso você carregar um ini como abaixo, ai ele permite carregar o xml, mas no meu caso eu preciso é que carregue o xml.

        Dim StrIni As String = IO.File.ReadAllText("C:\Temp\1302.txt")
        ACNFe.CarregarINI(StrIni)
        Dim X As String = ACNFe.ObterIni(0)
 

image.thumb.png.80d82a78114a2d794bedda9685fbcf01.png

NFe.xml

Tiago Borges
Head de Produtos

separado.png

logo.gif


Cel: (12) 98190.3952
Site:
www.estrategiasoftware.com.br

Link to comment
Share on other sites

  • Moderadores
  • Solution
2 horas atrás, tborges disse:

Se antes disso você carregar um ini como abaixo, ai ele permite carregar o xml, mas no meu caso eu preciso é que carregue o xml.

Boa tarde,

Se entendi correto, voce deseja carregar um xml já gerado para a lib, nesse caso use o método NFE_CarregarXML()

https://acbr.sourceforge.io/ACBrLib/NFE_CarregarXML.html

O método NFE_ObterXML tem efeito contrário, ele retorna o XML da NFe gerado pela lib, se já estiver carregado os dados na ACBrLibNFe.

Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

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

Link to comment
Share on other sites

  • Membros Pro

O que esta dizendo é que jamais poderei usar um código como o abaixo.(Pegar um xml do em algum lugar e carregar na Lib)

Isso mesmo?  tenho que tomar o caminho de NFE_CarregarXML(), apesar de os exemplos nas Demos estarem .CarregarXML(str)!

Desculpe pela falta de conhecimento sobre os dois métodos, mas preciso saber alguns 'porques', para que eu possa montar um Classe de Negócio sobre a ACBrLIB com a maior performance possível.

E .CarregarXML(stringxml) seria uma 'baita' mão na roda, em um sufoco no Cliente, poderia editar o XML, carrega-lo e enviar a SEFAZ.

Grato pela atenção, e código abaixo jamais?

Dim ACNFe As New ACBrNFe

ACNFe.Config(.......)

Dim StrIni As String = IO.File.ReadAllText("C:\Temp\NFe.xml")
ACNFe.CarregarXML(StrIni)
 

 

Tiago Borges
Head de Produtos

separado.png

logo.gif


Cel: (12) 98190.3952
Site:
www.estrategiasoftware.com.br

Link to comment
Share on other sites

  • Moderadores
32 minutos atrás, tborges disse:

Dim ACNFe As New ACBrNFe

ACNFe.Config(.......)

Dim StrIni As String = IO.File.ReadAllText("C:\Temp\NFe.xml")
ACNFe.CarregarXML(StrIni)

Dessa forma está correto, esse método você pode carregar um XML de NFe na lib, pode ser passando o path do xml ou o conteúdo do mesmo como parâmetro. Só precisa ser um XML de NFe válido no padrão SEFAZ.

Após carregar o XML você pode utilizar os métodos para Assinar, Validar, Enviar e Imprimir...

Está ocorrendo algum erro ao carregar o xml? Se sim por favor anexe o log da lib para que possamos analisar.

 

Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

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

Link to comment
Share on other sites

  • Membros Pro

Junior bom dia.

       AGENFe.Configuracao(ACNFe, dtEmpresa.Rows(0), dhEmi, CInt(Controls("NFeAmbiente").Text))

        Dim FNFe As String = IO.File.ReadAllText("C:\Temp\NFe.xml")
        ACNFe.CarregarXML(FNFe)
        ACNFe.Assinar()
        ACNFe.Validar()
        ACNFe.Imprimir()

 

Este código nada acontece, passa 'batido' por todas as linhas e nada ocorre.

Em anexo o xml carregado.

NFe.xml

Tiago Borges
Head de Produtos

separado.png

logo.gif


Cel: (12) 98190.3952
Site:
www.estrategiasoftware.com.br

Link to comment
Share on other sites

  • Moderadores

Bom dia @tborges,

O cabeçalho desse XML está fora do padrão, por isso o componente não identifica como sendo um xml e não está carregando. Adicione o encoding UTF-8 no xml e a tag <NFe> como sendo o grupo principal.

exemplo:

<?xml version="1.0" encoding="UTF-8"?>

-<NFe xmlns="http://www.portalfiscal.inf.br/nfe">

O XML completo deve ficar dessa forma:

NFe.xml

Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

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

Link to comment
Share on other sites

  • Este tópico foi criado há 852 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.