Sergio Sartori

bom dia Solivan. Então, mas como você faz com a entrada? porque dividir o valor restante em parcelas tudo bem, mas e o valor de entrada? vc lança como na nota ?

obrigado Ricardo. vou fazer a correção. e testar Pessoal obrigado a todos que responderão, um Feliz Ano Novo a todos, muita paz, alegria. Deus abençoe a todos vocês neste Novo Ano. vou precisar muito da Ajuda de vocês. Abraço a todos.

Bom dia a todos, de ante mão já saldo a todos com um Feliz Anos Novo, com muita paz, alegria trabalho e sucesso. pessoal estou com uma duvida a respeito da forma de pagamento na NFe. eu posso na NFe usar uma forma de pagamento por exemplo: um valor de 1000,00 o cliente da uma entrada de 400,00 e parcelar o restante, 600,00 isso é possível na NFe ? pode ser feito não pode ser feito. pelo que me lembro não achei nada a respeito na nota técnica. se alguém puder tirar minha duvida, e for possível, me envie um exemplo por favor.!

Boa tarde Pessoal. obrigado pelo retorno. fiz assim: cStat := IntToStr(frmListaNFe.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.cStat); motivo := frmListaNFe.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo ; nProt := frmListaNFe.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; dhRegEvento := DateToStr(frmListaNFe.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento); vChaveCancelamento := frmListaNFe.ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe; frmListaNFe.AcbrNfe1.Configuracoes.Arquivos.Salvar := True; frmListaNFe.AcbrNfe1.Configuracoes.Arquivos.SalvarEvento := True; frmListaNFe.AcbrNfe1.Configuracoes.Arquivos.PathNFe := vCaminho; frmListaNFe.AcbrNfe1.Configuracoes.Arquivos.PathEvento := 'C:\sgmsistemagestao\Nfe\Calcelada'+ vPasta +'\'+vChaveCancelamento+'-procNFe.XML'; frmListaNFe.AcbrNfe1.Configuracoes.Arquivos.EmissaoPathNFe := True; mas não grava nada na pasta.

Boa tarde pessoal. estou com dificuldade, duvidas. é o seguinte, quando eu peço o cancelamento da nfe, o cancelamento é feito normalmente, porem aonde é gerado o xml de cancelamento ? e o pdf do mesmo ? isso esta ocorrendo com a Carta de correção tambem, e não tenho aminima ideia de como resolver isso. alguem pode me ajudar por favor? alguma rotina de exemplo ? obrigado.

Boa tarde Pessoal. Alguem pode me ajudar? como que eu faço para que saia o valor aproximado dos tributos, no cupom Fed Est . estou fazendo assim Total.vCFeLei12741 := DM_LANCHE.cds_itensVTOTTRIB_FED.AsFloat; mais ai só sai o fed tem outra tag que eu possa listar o total de cada tributo? já dei uma olhada no demo mas não achei nada sobre isso.

Bom a Todos. se alguém puder me ajudar, estou com dificuldade para entender como que eu faço o calculo do fundo a combate a pobreza. a duvida é: o calculo é feito por produto ou pelo total da NFe? só devo aplicar esse calculo para empresas fora do estado? se o calculo por por produtos devo somar o resultado com o total da nota? devo pegar a bc icms do produto ou o valor do icms para fazer o calculo? tem a questão da st também . estou precisando de ajuda se alguém tiver um exemplo fico grato.

Bom dia a todos. Pessoal estou com problema ao tentar cancelar uma nfe. ao executar o cancelamento da este erro : TDFeSSLXmlSignClass.Assinar não implementado já olhei o demo mas consigo achar aonde que eu estou errando. por favor se alguém puder me ajudar nisso, fico muito agradecido. segue o codigo cnpj := txtCNPJ; chave := chNFe; Justificativa := xJust; Protocolo := vProtocolo; //***************************************************************************** // Cancelamento NFe pela Chave de Acesso. //***************************************************************************** if not(InputQuery('WebServices Eventos: Cancelamento', 'Chave da NF-e', Chave)) then exit; Chave := Trim(OnlyNumber(Chave)); idLote := '1'; if not(InputQuery('WebServices Eventos: Cancelamento', 'Identificador de controle do Lote de envio do Evento', idLote)) then exit; CNPJ := copy(Chave,7,14); if not(InputQuery('WebServices Eventos: Cancelamento', 'CNPJ ou o CPF do autor do Evento', CNPJ)) then exit; if not(InputQuery('WebServices Eventos: Cancelamento', 'Protocolo de Autorização', Protocolo)) then exit; Justificativa := 'Justificativa do Cancelamento'; if not(InputQuery('WebServices Eventos: Cancelamento', 'Justificativa do Cancelamento', Justificativa)) then exit; ACBrNFe1.EventoNFe.Evento.Clear; with ACBrNFe1.EventoNFe.Evento.New do begin infEvento.chNFe := Chave; infEvento.CNPJ := CNPJ; infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := Justificativa; infEvento.detEvento.nProt := Protocolo; end; ACBrNFe1.EnviarEvento(StrToInt(idLote)); cStat := IntToStr(ACBrNFe1.WebServices.EnvEvento.EventoRetorno.cStat); motivo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo ; nProt := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; dhRegEvento := DateToStr(ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento); vChaveCancelamento := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe;

Boa tarde pessoal como que eu faço para que no xml saia de desta forma. ou seja a parte da st saia zerada. se eu deixar as st com valor zero tambem não sai. <ICMSSN900> <orig>0</orig> <CSOSN>900</CSOSN> <modBC>0</modBC> <pRedBC>0.00</pRedBC> <vBC>91.56</vBC> <pICMS>18.0000</pICMS> <vICMS>16.48</vICMS> <modBCST>0</modBCST> <pMVAST>0.00</pMVAST> <pRedBCST>0.00</pRedBCST> <vBCST>0.00</vBCST> <pICMSST>0.00</pICMSST> <vICMSST>0.00</vICMSST> <pCredSN>0.00</pCredSN> <vCredICMSSN>0.00</vCredICMSSN> </ICMSSN900> fiz assim : if dmnfe.cdsNfe_itensCFOP.AsString = '5411' then begin if dmnfe.cdsNfe_itensICMS_CSOSN.AsInteger = 900 then begin Imposto.ICMS.CSOSN := csosn900; Imposto.ICMS.modBC := dbiValorOperacao;//dbiMargemValorAgregado; Imposto.ICMS.pRedBC := 0; Imposto.ICMS.vBC := DMNFE.cdsNfe_itensICMS_VBC.AsFloat; Imposto.ICMS.pICMS := DMNFE.cdsNfe_itensICMS_PICMS.AsFloat; Imposto.ICMS.vICMS := DMNFE.cdsNfe_itensICMS_VICMS.AsFloat; Imposto.ICMS.modBCST := dbiMargemValorAgregado; Imposto.ICMS.pMVAST := 0; Imposto.ICMS.pRedBCST := 0; Imposto.ICMS.vBCST := 0; Imposto.ICMS.pICMSST := 0; Imposto.ICMS.vICMSST := 0; Imposto.ICMS.pCredSN := 0; Imposto.ICMS.vCredICMSSN := 0; end; end; por favor, estou precisando ajuda.

Neste caso então vai ser melhor contratar um componente pago mesmo, porque ai você tem todo o respaldo. Fiscal e a garantia de estar correto a forma de calcular os impostos da nfe. Abraço e Obrigado pela resposta.

Boa tarde a Todos. Pessoal estou precisando de ajuda como que eu faço os calculos dos impostos na nfe quando a empresa for simples nacional e quando for normal. não tenho experiencia nessa parte, quando o produto for substituição tributaria, quando for isento, quando for tributado. e tambem o como que eu calculo imposto fundo de pobreza. se alguem puder me ajudar, com algum exemplo completo fico muito agradecido, estou começando com acbr mas não tenho conseguido muita coisa sobre isso. se essas informações não for possivel ai vou ser obrigado aquirir componente pago para documentos fiscais, para ter suporte sobre esses calculos , mais isso é o plano b. desde já agradeço pela atenção.

Boa noite. Alguem poderia me ajudar, como que faço calculo icms, icmsst venda empresa normal para simples nacional NFE ? já olhei no exemplo do acbr, mas lá não tem calculos de tributos. pelos menos eu não encontrei. desde já agradeço.

Boa tarde a todos. pessoal alguem poderia me ajudar? estou desenvolvendo nfe e não tenho muita experiencia nesta area, como que Calcular vICMSST CST 10, 30, 70 ou 90 regime normal venda dentro e fora do estado.?

BigWings sua dica foi, perfeita. Obrigado por sua atenção.

Obrigado deu certo, isto não esta no demo do acbr. Obrigado.

Boa tarde a todos. se possível alguém poderia me explicar como que eu faço para inserir + de um produto no xml? estou fazendo assim : mas somente de 5 produtos só grava o ultimo no xml. //****************************************************************************** // produtos //****************************************************************************** vItens:= 0; Produto := NotaF.NFe.Det.Add; Produto.Prod.nItem:= vItens; vItens := 0; dmnfe.cdsNfe_itens.First; while not dmnfe.cdsNfe_itens.Eof do begin Inc(vItens); Produto.Prod.nItem := vItens; // Número sequencial, para cada item deve ser incrementado Produto.Prod.cProd := IntToStr(dmnfe.cdsNfe_itensCPROD.AsInteger);//'123456'; Produto.Prod.cEAN := dmnfe.cdsNfe_itensCEAN.AsString; Produto.Prod.xProd := dmnfe.cdsNfe_itensXPROD.AsString; Produto.Prod.NCM := dmnfe.cdsNfe_itensNCM.AsString; // Tabela NCM disponível em http://www.receita.fazenda.gov.br/Aliquotas/DownloadArqTIPI.htm Produto.Prod.EXTIPI := ''; Produto.Prod.CFOP := IntToStr(dmnfe.cdsNfe_itensCFOP.AsInteger); Produto.Prod.uCom := dmnfe.cdsNfe_itensUCOM.AsString; Produto.Prod.qCom := dmnfe.cdsNfe_itensQCOM.AsFloat; Produto.Prod.vUnCom := dmnfe.cdsNfe_itensVUNCOM.AsFloat; Produto.Prod.vProd := dmnfe.cdsNfe_itensVPROD.AsFloat; Produto.Prod.cEANTrib := dmnfe.cdsNfe_itensCEANTRIB.AsString; Produto.Prod.uTrib := 'UN'; Produto.Prod.qTrib := 1; Produto.Prod.vUnTrib := 100; Produto.Prod.vOutro := 0; Produto.Prod.vFrete := 0; Produto.Prod.vSeg := 0; Produto.Prod.vDesc := 0; // Produto.Prod.CEST := dmnfe.cdsNfe_itensCest.AssTring; dmnfe.cdsNfe_itens.Next; end; Produto.infAdProd := 'Informacao Adicional do Produto'; ACBrNFe1.NotasFiscais.Items[0].GravarXML('Teste.xml', ExtractFilePath(ParamStr(0))); ACBrNFe1.NotasFiscais.Clear;

Obrigado Ricardo Rohde. Isso mesmo valeu.

o acbrnfe1 não esta reconhecendo ipvista. como que eu resolvo isso? lguem pode me judar. With ACBrNFe1.NotasFiscais.Add do begin Nfe.Ide.indPag := ipVista ; <- esta dando erro end;