murilo cosme da silva

Bom dia, Mais uma vez sei que muito tópicos são repetitivos, mais não identifiquei como pegar todos os retornos assim que executo a função enviar ``ACBrNFe1.Enviar`` dentro desta funcao tem varias mensagens lote, lote recebido, e lote processado, existe uma path para salvar automaticamente esta mensagem mais não entendi como pegar em tempo real para salvar algumas mensagem no banco de dados, entendo que não posso mexer dentro do código do componente já que se houver alguma alteração no fonte vou perder este código, pelo menos é o que eu acredito, alguém tem uma dica ou se este postagem já exista manda um link para que eu possa entender, já fiz algumas busca mais nada do tipo que estou precisando. Agradeço desde já.

Boa tarde, Sei que tem muitos tópicos repetidos mais não estou identificando um com este problema, caso já tenha em algum tópico peço desculpa pela repetição de postagem. estou gerando uma NFe na versão 3.10 hora de validar ok, mais quando vou enviar dentro desta função a versaoDF mudar para ve200, e ai o xml todo e automaticamente ajustado para versão 2.00. procedure TNotasFiscais.Assinar; Self.Items.NFe.infNFe.Versao := DFeUtil.StringToFloat(GetVersaoNFe(FConfiguracoes.Geral.ModeloDF, FConfiguracoes.Geral.VersaoDF, LayNfeRecepcao));

bom dia a todos, estou com dificuldade sobre identificar este erro na versão 3.10, mudou algo sobre NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL, porque o CNPJ coloco 99.999.999/0001-91 e a inscrição esta isento como fazia antes, mais observei que ele criou outro parametro: <indIEDest>1</indIEDest> <IE>ISENTO</IE> Erro Completo: Falha na validação dos dados da nota 163 'ISENTO' violates pattern constraint of '[0-9]{2,14}'. The element '{http://www.portalfiscal.inf.br/nfe}IE'with value 'ISENTO' failed to parse. e se alguém tem um link de onde vejo o manual correspondente ao xml 3.10. agradeço desde já. aproveitando o momento alguém tem como responder sobre um comentário que eu vi sobre pagar mensalidade no valor 150,00 reais aparte de 15 mensagem, ou podemos colaborar com outros valores.

Bom dia, Estou com uma dificuldade para assinar e valida NFe 3.10, dentro da função assinar nesta propriedade. Self.Items.NFe.infNFe.Versao := DFeUtil.StringToFloat(GetVersaoNFe(FConfiguracoes.Geral.ModeloDF, FConfiguracoes.Geral.VersaoDF, 'a versão que ele trás aqui e sempre a ve200' LayNfeRecepcao)); Mesmo eu configurando a versão:= para ve310, como mostra abaixo. ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;

Bom dia, Alguém sabe como posso fazer uma analise nos retornos de erra para printar na tela para os clientes.

Boa noite, tem como solicitar a informação de que certificado é na hora de enviar, ou só pode mediante pré cadastro. porque para mim seria mais interessante passa no momento de assinar e enviar.

Boa tarde, Como preencher corretamente o ambiente no caso eu passo 1 como string, que parâmetro eu uso para dizer o ambiente. ACBrNFe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(TRUE,'1');

Valeu, muito obrigado pela dica.

Já vi mais minha duvida é na variação do cst, no caso se for cst040, mando toda as tag e o componente lança de acordo com o st ? with ICMS do begin CST := cst00; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := 100; ICMS.pICMS := 18; ICMS.vICMS := 18; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST:= 0; ICMS.vBCST := 0; ICMS.pICMSST := 0; ICMS.vICMSST := 0; ICMS.pRedBC := 0; end;

Boa noite como disse em outro tópico que estava acostumado com outro componente estou com uma dificuldade de entender como preencher os st de icms dos itens. Alguém pode me da uma exemplo. é assim que estou tentando preencher: if sSTProd = '101' then begin PreparaICMS(sSTProd); with ICMS do begin CST := cstICMSSN; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := ICMS.vBC; ICMS.pICMS := ICMS.pICMS; ICMS.vICMS := ICMS.vICMS; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := ICMS.pMVAST; ICMS.pRedBCST:= ICMS.pRedBCST; ICMS.vBCST := ICMS.vBCST; ICMS.pICMSST := ICMS.pICMSST; ICMS.vICMSST := ICMS.vICMSST; ICMS.pRedBC := ICMS.pRedBC; end; Agradeço desde já as contribuições de ajuda.

como ta xml <?xml version="1.0"?> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> -<infNFe Id="NFe26141020344939000180550010000001401000000703" versao="2.00"> -<ide> <cUF>26</cUF> <cNF>00000070</cNF> <natOp>VENDA DE MERCADORIA ADQUIRIDA OU RECEBIDA DE TERCEIRO</natOp> <indPag>0</indPag> <mod>55</mod> <serie>1</serie> <nNF>140</nNF> <dEmi>2014-10-15</dEmi> <dSaiEnt>2014-10-15</dSaiEnt> <tpNF>1</tpNF> <cMunFG>2611606</cMunFG> <tpImp>1</tpImp> <tpEmis>1</tpEmis> <cDV>3</cDV> <tpAmb>2</tpAmb> <finNFe>1</finNFe> <procEmi>0</procEmi> <verProc>2.0.5</verProc> </ide> -<emit> <CNPJ>20344939000180</CNPJ> <xNome>V J B PRODUTOS ODONTOLOGICOS EIRELE ME</xNome> <xFant>V J B PRODUTOS ODONTOLOGICOS EIRELE ME</xFant> -<enderEmit> <xLgr>RUA CARLOS GOMES</xLgr> <nro>044</nro> <xBairro>MADALENA</xBairro> <cMun>2611606</cMun> <xMun>RECIFE</xMun> <UF>PE</UF> <CEP>50720100</CEP> <cPais>1058</cPais> <xPais>Brasil</xPais> <fone>8132276079</fone> </enderEmit> <IE>057863202</IE> <IEST>00000000000000</IEST> <CRT>3</CRT> </emit> -<dest> <xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome> -<enderDest> <xLgr>RUA ALBA VALDEZ</xLgr> <nro>017</nro> <xBairro>TIMBI</xBairro> <cMun>2603454</cMun> <xMun>CAMARAGIBE</xMun> <UF>PE</UF> <CEP>54774430</CEP> <cPais>1058</cPais> <xPais>Brasil</xPais> </enderDest> <IE>5897694</IE> </dest> -<total> -<ICMSTot> <vBC>0.00</vBC> <vICMS>0.00</vICMS> <vBCST>0.00</vBCST> <vST>0.00</vST> <vProd>22.20</vProd> <vFrete>0.00</vFrete> <vSeg>0.00</vSeg> <vDesc>0.00</vDesc> <vII>0.00</vII> <vIPI>0.00</vIPI> <vPIS>0.37</vPIS> <vCOFINS>1.69</vCOFINS> <vOutro>0.00</vOutro> <vNF>22.20</vNF> </ICMSTot> </total> -<transp> <modFrete>0</modFrete> </transp> -<infAdic> <infCpl>Val aprox Tributos: R$ 7,57 (34,10%) Fonte:IBPT</infCpl> </infAdic> </infNFe> </NFe>

Cara ainda não consigo enteder desta forma vamos ao exemplo que temos: with ACBrNFe1.NotasFiscais.Add.NFe do begin Ide.cNF := StrToInt(NumNFe); //Caso não seja preenchido será gerado um número aleatório pelo componente Ide.natOp := 'VENDA PRODUCAO DO ESTAB.'; Ide.indPag := ipVista; Ide.modelo := 55; Ide.serie := 1; Ide.nNF := StrToInt(NumNFe); Ide.dEmi := Date; //depois na linha 1857 Emit.CNPJCPF := edtEmitCNPJ.Text; Emit.IE := edtEmitIE.Text; Emit.xNome := edtEmitRazao.Text; Emit.xFant := edtEmitFantasia.Text; Emit.EnderEmit.fone := edtEmitFone.Text; Emit.EnderEmit.CEP := StrToInt(edtEmitCEP.Text); Emit.EnderEmit.xLgr := edtEmitLogradouro.Text; //depois na linha 2146 with Det.Add do begin Prod.nItem := 1; // Número sequencial, para cada item deve ser incrementado Prod.cProd := '123457'; Prod.cEAN := ''; Prod.xProd := 'Descrição do Serviço'; Prod.NCM := '99'; Prod.EXTIPI := ''; Prod.CFOP := '5933'; Prod.uCom := 'UN'; //depois na linha 2302 exporta.UFembarq := '';; exporta.xLocEmbarq := ''; compra.xNEmp := ''; compra.xPed := ''; compra.xCont := ''; end; ==>" acredito que este end finaliza o with lá do inicio, então logo entendo que tudo esta com ACBrNFe1.NotasFiscais.Add.NFe embutido, porque todas as outras tags vieram ok, se fosse desta forma para cada declaração feita antes estaria uma nova nota e não foi isto que aconteceu tudo esta aparecendo no xml emitente, destinatário, total menos o produto "

Eu já vi é não vejo diferença no que ta lá com o que estou escrevendo. no acbr with ACBrNFe1.NotasFiscais.Add.NFe do begin Ide.cNF := StrToInt(NumNFe); ... //Adicionando Produtos with Det.Add do begin Prod.nItem := 1; ... meu with ACBrNFe1.NotasFiscais.Add.NFe.Det.Add do begin Prod.nItem := iCont; Prod.cProd := Produto.cProd; Prod.cEAN := Produto.cEAN; Prod.xProd := Produto.xProd; Prod.NCM := Produto.NCM; Prod.EXTIPI := Produto.ExTIPI; Prod.CFOP := Produto.CFOP; Prod.uCom := Produto.uCom; Prod.qCom := StrToFloat(Produto.qCom); Prod.vUnCom := StrToFloat(Produto.vUnCom); Prod.vProd := StrToFloat(Produto.vProd); Prod.cEANTrib:= Produto.cEANTrib; Prod.uTrib := produto.uTrib; Prod.qTrib := StrToFloat(produto.qTrib); Prod.vUnTrib := StrToFloat(produto.vUnTrib); Prod.vOutro := StrToFloat(Produto.vOutro); Prod.vFrete := StrToFloat(Produto.vFrete); Prod.vSeg := StrToFloat(Produto.vSeg); Prod.vDesc := StrToFloat(Produto.vDesc); só que no meu estou usando with separados.

ACBrNFe1.DANFE.TipoDANFE qual a variável para ele.

QUE TIPO É ESTA VARIÁVEL ''tnEntrada'' NÃO CONSIGO DECLARAR NO PROJETO

O XML NAO APARECE OS ITENS SO CABEÇALHO, EMITENTE, DESTINATARIO E TOTAL OS ITENS ESTÃO SEM APARECER NO XML

with ACBrNFe1.NotasFiscais.Add.NFe.Det.Add do begin Prod.nItem := iCont; Prod.cProd := Produto.cProd; Prod.cEAN := Produto.cEAN; Prod.xProd := Produto.xProd; Prod.NCM := Produto.NCM; Prod.EXTIPI := Produto.ExTIPI; Prod.CFOP := Produto.CFOP; Prod.uCom := Produto.uCom; Prod.qCom := StrToFloat(Produto.qCom); Prod.vUnCom := StrToFloat(Produto.vUnCom); Prod.vProd := StrToFloat(Produto.vProd); Prod.cEANTrib:= Produto.cEANTrib; Prod.uTrib := produto.uTrib; Prod.qTrib := StrToFloat(produto.qTrib); Prod.vUnTrib := StrToFloat(produto.vUnTrib); Prod.vOutro := StrToFloat(Produto.vOutro); Prod.vFrete := StrToFloat(Produto.vFrete); Prod.vSeg := StrToFloat(Produto.vSeg); Prod.vDesc := StrToFloat(Produto.vDesc);

bom dia, valeu cara muito obrigado por responder, mais não conseguir visualizar no exemplo como alimentar as tags só vejo como dar um openfile em um arquivo já existente. E que eu usava um componente da empresa ncs e ta tinha cada no e tags para ser alimentada e não estou identificando isto no exemplo.

criando um xml com o componente, quais as tags.