GAVOHA

Senhores, tenho um sistema de compra e venda em um cliente de Natal - RN. Preciso implementar a emissão da NFC-e mas não tenho a mínima ideia de por onde começar. Alguém poderia me dizer por onde começar, se há alguma diferença entre os Estados (desculpe se a pergunta for obvia), onde posso encontrar um Modelo para adequar ao meu projeto. ** Delphi Berlin Up2 / Base de dados Mysql.

Eu fiquei na dúvida se era confiável porque o que achei é de 2015. É esse mesmo? Vou fazer como sugeriu,

desculpe... foi uma linha... passou desapercebido

Tentei todas as opções de frente mas não deu... MODALIDADE E FRENTE PODE SER: 0- Por conta do emitente; 1- Por conta do destinatário/remetente; 2- Por conta de terceiros; 9- Sem frete. Transp.modFrete := Variant('9');

Muito obrigado...de fato deu certo! Só retornou o erro abaixo.

Iniciei o Loop.... mas permaneceu (Fiquei na dúvida se encerrei o Loop no lugar correto) //--- INICIO.....ITENS DA NOTA DE PRODUTO iContador := 1; {Posterior 1 será o RecordCount da Tb Detalhe} while iContador < 1 do begin Det.Add.Prod.nItem := iContador; // Número sequencial, para cada item deve ser incrementado Det.Add.Prod.cEAN := '2156'; // Codigo de Barra Det.Add.Prod.cProd := '1304040'; // Codigo Produto Det.Add.Prod.xProd := 'Computador Positivo Master'; Det.Add.Prod.NCM := '94051010'; //Codigo oficial do produto Det.Add.Prod.CEST := '0400'; Det.Add.Prod.CFOP := '5405'; Det.Add.Prod.uCom := 'Unid.'; Det.Add.Prod.qCom := 1; Det.Add.Prod.vUnCom := 1460; Det.Add.Prod.vProd := 1460; // Det.Add.Prod.cEANTrib := '7896523206646'; // Det.Add.Prod.cEANTrib := '84715010'; Det.Add.Prod.vOutro := 0; Det.Add.Prod.vFrete := 0; Det.Add.Prod.vSeg := 0; Det.Add.Prod.vDesc := 0; Det.Add.infAdProd := 'Iformações Adicionais'; Det.Add.Imposto.vTotTrib := 0; //Imposto : ICMS Det.Add.Imposto.ICMS.CST := Variant('00'); //ou 10, 20,30,40,41,50,51,60,70,90 Det.Add.Imposto.ICMS.orig := Variant('0'); // pode ser de 0 à 8 Det.Add.Imposto.ICMS.modBC := Variant('1'); // Margem.. pode ser 0,1,2 Det.Add.Imposto.ICMS.vBC := 0; Det.Add.Imposto.ICMS.pICMS := 0; Det.Add.Imposto.ICMS.vICMS := 0; Det.Add.Imposto.ICMS.modBCST := Variant('0') ;//Opção de 0 à 5 Det.Add.Imposto.ICMS.pMVAST := 0; Det.Add.Imposto.ICMS.pRedBCST:= 0; Det.Add.Imposto.ICMS.vBCST := 0; Det.Add.Imposto.ICMS.pICMSST := 0; Det.Add.Imposto.ICMS.vICMSST := 0; Det.Add.Imposto.ICMS.pRedBC := 0; //Imposto : IPI Det.Add.Imposto.IPI.CST := Variant('99') ; Det.Add.Imposto.IPI.clEnq := '999'; Det.Add.Imposto.IPI.CNPJProd := ''; Det.Add.Imposto.IPI.cSelo := ''; Det.Add.Imposto.IPI.qSelo := 0; Det.Add.Imposto.IPI.cEnq := ''; Det.Add.Imposto.IPI.vBC := 0; Det.Add.Imposto.IPI.qUnid := 0; Det.Add.Imposto.IPI.vUnid := 0; Det.Add.Imposto.IPI.pIPI := 0; Det.Add.Imposto.IPI.vIPI := 0; //imposto: II Det.Add.Imposto.II.vBc := 0; Det.Add.Imposto.II.vDespAdu := 0; Det.Add.Imposto.II.vII := 0; Det.Add.Imposto.II.vIOF := 0; //Imposto : PIS Det.Add.Imposto.PIS.CST := Variant('99'); Det.Add.Imposto.PIS.vBC := 0; Det.Add.Imposto.PIS.pPIS := 0; Det.Add.Imposto.PIS.vPIS := 0; Det.Add.Imposto.PIS.qBCProd := 0; Det.Add.Imposto.PIS.vAliqProd := 0; Det.Add.Imposto.PIS.vPIS := 0; //Imposto : PISST Det.Add.Imposto.PISST.vBc := 0; Det.Add.Imposto.PISST.pPis := 0; Det.Add.Imposto.PISST.qBCProd := 0; Det.Add.Imposto.PISST.vAliqProd := 0; Det.Add.Imposto.PISST.vPIS := 0; //Imposto : COFINS Det.Add.Imposto.COFINS.CST := Variant('99'); Det.Add.Imposto.COFINS.vBC := 0; Det.Add.Imposto.COFINS.pCOFINS := 0; Det.Add.Imposto.COFINS.vCOFINS := 0; Det.Add.Imposto.COFINS.qBCProd := 0; Det.Add.Imposto.COFINS.vAliqProd := 0; //Imposto : COFINSST Det.Add.Imposto.COFINSST.vBC := 0; Det.Add.Imposto.COFINSST.pCOFINS := 0; Det.Add.Imposto.COFINSST.qBCProd := 0; Det.Add.Imposto.COFINSST.vAliqProd := 0; Det.Add.Imposto.COFINSST.vCOFINS := 0; //ISSQN Det.Add.Imposto.ISSQN.vBC := 0; Det.Add.Imposto.ISSQN.vAliq := 0; Det.Add.Imposto.ISSQN.vISSQN := 0; Det.Add.Imposto.ISSQN.cMunFG := 0; Det.Add.Imposto.ISSQN.cListServ := '0'; iCOntador := iContador + 1; end; //--- FIM ..... ITENS DA NOTA DE PRODUTO

Sim... iniciei Carlos,.... Na verdade esse é apenas um teste... atribui o valor 1 a esse contador porque posterior eu iria adicionar outros itens de produto (mas ainda não consegui passar dai). Depois vou fazer o Loop para outros produtos

Bom dia, senhores. É a primeira vez que estou gerando uma NFe. Segui orientações de outros posts de vocês mas estou encontrando dificuldades em identificar meu erro: (mensagem de erro anexo) Se alguém puder me ajudar... AcbrNFe1.Configuracoes.Arquivos.PathSchemas := 'C:\Gavoha\Programacao\Componente\ACBr_Trunk2\Exemplos\ACBrDFe\Schemas\NFe'; ACBrNFe1.Configuracoes.Certificados.ArquivoPFX := 'C:\certificado.pfx'; ACBrNFe1.SSL.CarregarCertificado; ACBrNFe1.NotasFiscais.Clear; with ACBrNFe1.NotasFiscais.Add.NFe do begin Ide.tpAmb := Variant('1'); //0=Produção 1=Homologação Ide.natOp := 'VENDA PRODUCAO DO ESTAB.'; Ide.cNF := 1; Ide.nNF := 000000001; Ide.serie := 1; Ide.dEmi := Date; Ide.dSaiEnt := Date ; Ide.hSaiEnt := Now; Ide.tpNF := Variant('1'); // 0-Entrada 1-Saída Ide.indPag := Variant('0'); Ide.cUF := 15; Ide.cMunFG := 1503093; Emit.CNPJCPF := '18382083000196'; Emit.IE := ''; Emit.xNome := 'HOLY COMERCIO E SERVICOS EIRELI'; Emit.xFant := 'HOLY COMERCIO'; Emit.EnderEmit.fone := '1125929769'; Emit.EnderEmit.xLgr := 'R DO PEREIRO'; Emit.EnderEmit.nro := '2139'; Emit.EnderEmit.xCpl := ''; Emit.EnderEmit.xBairro := 'PITIMBU'; Emit.EnderEmit.cMun := 2408102; Emit.EnderEmit.xMun := 'NATAL'; Emit.EnderEmit.UF := 'RN'; Dest.CNPJCPF := '11929429000184'; Dest.EnderDest.CEP := 59088100; Dest.EnderDest.xLgr := 'Av. Ayrton Senna'; Dest.EnderDest.nro := '835'; Dest.EnderDest.xCpl := ''; Dest.EnderDest.xBairro := 'Neopolis'; Dest.EnderDest.cMun := 2408102; Dest.EnderDest.xMun := 'Natal'; Dest.EnderDest.UF := 'RN'; Dest.EnderDest.fone := '1532599600'; Dest.IE := ''; Dest.xNome := 'ML Antunes de Carvalho'; //--- INICIO.....ITENS DA NOTA DE PRODUTO Det.Add.Prod.nItem := iContador; // Número sequencial, para cada item deve ser incrementado Det.Add.Prod.cEAN := '2156'; // Codigo de Barra Det.Add.Prod.cProd := '1304040'; // Codigo Produto Det.Add.Prod.xProd := 'Computador Positivo Master'; Det.Add.Prod.NCM := '94051010'; //Codigo oficial do produto Det.Add.Prod.CEST := '0400'; Det.Add.Prod.CFOP := '5405'; Det.Add.Prod.uCom := 'Unid.'; Det.Add.Prod.qCom := 1; Det.Add.Prod.vUnCom := 1460; Det.Add.Prod.vProd := 1460; // Det.Add.Prod.cEANTrib := '7896523206646'; // Det.Add.Prod.cEANTrib := '84715010'; Det.Add.Prod.vOutro := 0; Det.Add.Prod.vFrete := 0; Det.Add.Prod.vSeg := 0; Det.Add.Prod.vDesc := 0; Det.Add.infAdProd := 'Iformações Adicionais'; Det.Add.Imposto.vTotTrib := 0; //Imposto : ICMS Det.Add.Imposto.ICMS.CST := Variant('00'); //ou 10, 20,30,40,41,50,51,60,70,90 Det.Add.Imposto.ICMS.orig := Variant('0'); // pode ser de 0 à 8 Det.Add.Imposto.ICMS.modBC := Variant('1'); // Margem.. pode ser 0,1,2 Det.Add.Imposto.ICMS.vBC := 0; Det.Add.Imposto.ICMS.pICMS := 0; Det.Add.Imposto.ICMS.vICMS := 0; Det.Add.Imposto.ICMS.modBCST := Variant('0') ;//Opção de 0 à 5 Det.Add.Imposto.ICMS.pMVAST := 0; Det.Add.Imposto.ICMS.pRedBCST:= 0; Det.Add.Imposto.ICMS.vBCST := 0; Det.Add.Imposto.ICMS.pICMSST := 0; Det.Add.Imposto.ICMS.vICMSST := 0; Det.Add.Imposto.ICMS.pRedBC := 0; //Imposto : IPI Det.Add.Imposto.IPI.CST := Variant('99') ; Det.Add.Imposto.IPI.clEnq := '999'; Det.Add.Imposto.IPI.CNPJProd := ''; Det.Add.Imposto.IPI.cSelo := ''; Det.Add.Imposto.IPI.qSelo := 0; Det.Add.Imposto.IPI.cEnq := ''; Det.Add.Imposto.IPI.vBC := 0; Det.Add.Imposto.IPI.qUnid := 0; Det.Add.Imposto.IPI.vUnid := 0; Det.Add.Imposto.IPI.pIPI := 0; Det.Add.Imposto.IPI.vIPI := 0; //imposto: II Det.Add.Imposto.II.vBc := 0; Det.Add.Imposto.II.vDespAdu := 0; Det.Add.Imposto.II.vII := 0; Det.Add.Imposto.II.vIOF := 0; //Imposto : PIS Det.Add.Imposto.PIS.CST := Variant('99'); Det.Add.Imposto.PIS.vBC := 0; Det.Add.Imposto.PIS.pPIS := 0; Det.Add.Imposto.PIS.vPIS := 0; Det.Add.Imposto.PIS.qBCProd := 0; Det.Add.Imposto.PIS.vAliqProd := 0; Det.Add.Imposto.PIS.vPIS := 0; //Imposto : PISST Det.Add.Imposto.PISST.vBc := 0; Det.Add.Imposto.PISST.pPis := 0; Det.Add.Imposto.PISST.qBCProd := 0; Det.Add.Imposto.PISST.vAliqProd := 0; Det.Add.Imposto.PISST.vPIS := 0; //Imposto : COFINS Det.Add.Imposto.COFINS.CST := Variant('99'); Det.Add.Imposto.COFINS.vBC := 0; Det.Add.Imposto.COFINS.pCOFINS := 0; Det.Add.Imposto.COFINS.vCOFINS := 0; Det.Add.Imposto.COFINS.qBCProd := 0; Det.Add.Imposto.COFINS.vAliqProd := 0; //Imposto : COFINSST Det.Add.Imposto.COFINSST.vBC := 0; Det.Add.Imposto.COFINSST.pCOFINS := 0; Det.Add.Imposto.COFINSST.qBCProd := 0; Det.Add.Imposto.COFINSST.vAliqProd := 0; Det.Add.Imposto.COFINSST.vCOFINS := 0; //ISSQN Det.Add.Imposto.ISSQN.vBC := 0; Det.Add.Imposto.ISSQN.vAliq := 0; Det.Add.Imposto.ISSQN.vISSQN := 0; Det.Add.Imposto.ISSQN.cMunFG := 0; Det.Add.Imposto.ISSQN.cListServ := '0'; //--- FIM ..... ITENS DA NOTA DE PRODUTO Total.ICMSTot.vBC := 0; Total.ICMSTot.vICMS := 0; Total.ICMSTot.vBCST := 0; Total.ICMSTot.vST := 0; Total.ICMSTot.vProd := 0; Total.ICMSTot.vFrete := 0; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := 0; Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := 0; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vOutro := 0; Total.ICMSTot.vNF := 1460; Total.ICMSTot.vTotTrib := 0; Total.ISSQNtot.vServ := 0; Total.ISSQNTot.vBC := 0; Total.ISSQNTot.vISS := 0; Total.ISSQNTot.vPIS := 0; Total.ISSQNTot.vCOFINS := 0; Total.retTrib.vRetPIS := 0; Total.retTrib.vRetCOFINS := 0; Total.retTrib.vRetCSLL := 0; Total.retTrib.vBCIRRF := 0; Total.retTrib.vIRRF := 0; Total.retTrib.vBCRetPrev := 0; Total.retTrib.vRetPrev := 0; Transp.modFrete := Variant('9'); //Poderia ser 0,1,2,9 Transp.Transporta.CNPJCPF := ''; Transp.Transporta.xNome := ''; Transp.Transporta.IE := ''; Transp.Transporta.xEnder := ''; Transp.Transporta.xMun := ''; Transp.Transporta.UF := ''; Transp.retTransp.vServ := 0; Transp.retTransp.vBCRet := 0; Transp.retTransp.pICMSRet := 0; Transp.retTransp.vICMSRet := 0; Transp.retTransp.CFOP := ''; Transp.retTransp.cMunFG := 0; Transp.veicTransp.placa := ''; Transp.veicTransp.UF := ''; Transp.veicTransp.RNTC := ''; //Valores de Cobranca Cobr.fat.nFat := '1'; Cobr.fat.vOrig := 0; Cobr.fat.vDesc := 0; Cobr.fat.vLiq := 0; //Totais Total.ICMSTot.vBC := 0; Total.ICMSTot.vICMS := 0; Total.ICMSTot.vICMSDeson := 0; Total.ICMSTot.vProd := 1460; Total.ICMSTot.vNF := 1460; Total.ICMSTot.vFrete := 0; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := 0; Total.ICMSTot.vTotTrib := 0; end; // gerar arquivo XML ACBrNFe1.NotasFiscais.Assinar; ACBrNFe1.NotasFiscais[0].GerarXML; ACBrNFe1.NotasFiscais[0].GravarXML; ACBrNFe1.NotasFiscais.GerarNFe; ACBrNFe1.NotasFiscais.Validar; ShowMessage('Arquivo gerado em: '+ACBrNFe1.NotasFiscais.Items[0].NomeArq);

Juliomar, de fato deu certo! O único inconveniente é que sempre perco algum componente de dentro da aplicação. Exemplo: A ultima vez apresentou a mensagem de Erro no ACBr_CEP (não me recordo exatamente o nome), quando ignorei ele excluiu um sDBGrid de um dos Forms. Nada grave! Agradeço a ajuda!

Alguém já passou por essa situação?

Fiz o sugerido mas a mensagem permanece aparecendo! Mais alguma dica?

Esse caso ocorro no Delphi XE8. Tenho também o Delphi 7 instalado (que não apresenta esse problema). Marcando essa opção afetará o Delphi 7?

Só para complementar a pergunta, segue a imagem da mensagem que sempre aparece! Agora vou Reinstalar o componente pelo Trunk2 e tudo volta ao normal (até reiniciar a máquina)

Exatamente Sergio. Todos os dias quando ligo o computador, se eu não abro o Trunk2 e faço a instalação do ACBr, o Delphi (XE8) não encontra pacote ou dá erro em algum componente do ACBr, mesmo que eu não esteja usando no momento. Após a instalação tudo fica normal

Senhores, bom dia Tenho o componente e suas funções rodando normalmente, porem, um inconveniente ocorre sempre que ligo o computador pela primeira vez. Sempre tenho que Atualizar e Instalar os Pacotes para que não ocorra erros, mesmo esteja produzindo sem a utilização dos componentes ACBr. Após a instalação diária tudo funciona normalmente. Caso tenha que reiniciar, a re-instalação é certa! Alguém pode me dar uma dica?

Só exemplificando, ... quanto aos campos obrigatórios e opcionais, encontrei um link aqui no fórum (http://acbr.sourceforge.net/drupal/?q=node/40) mas não sei se está desatualizado. Pensando em não ter informações erronias ou desatualizadas achei por bem perguntar.

Juliomar, eu vi. Só postei este pois não foi suficiente para meu limitado conhecimento e resolvi solicitar mais alguma ajuda. Como disse, toda ajuda é bem vinda. (alias, você tem me ajudado bastante)

Senhores, bom dia Sou novo por aqui,.... gostaria de saber se os campos a serem preenchidos na NFe (venda) permanecem iguais ao indicado no site abaixo http://anfm.blogspot.com.br/2009/09/campos-para-criar-uma-nfe-usando-o.html (Por André Moraes) Caso negativa, quais campos necessários para preenchimento no componente para que eu possa criar em minha base de dados. Procurei um manual do componente para saber quais os passos que tenho que seguir para enviar a NFe mas não encontrei. Exemplo, se preencher, validar, assinar e enviar - onde faço? Confesso que devido a minha limitação de conhecimento não sei onde entra o ACBrMonitor no processo. Estou um pouco desesperado porque meu prazo está se esgotando e ainda não consegui passar da fase "instalar o componente". Toda ajuda será bem vinda.

Cardilo, obrigado pelas respostas. Vou estudar o exemplo junto ao pacote. Mais uma vez obrigado

Senhores, boa noite. Sou novo por aqui. Tenho alguns projetos já desenvolvidos a alguns anos... Nos últimos dias um de meus clientes solicitou a implantação de NFe em minhas aplicações. Não tenho certificado digital e não sei por onde começar. Alguém teria algum exemplo ou dica? NFe-Serviço e NFe-Venda Obrigado Um complemento da pergunta é: Existe a possibilidade de desenvolvimento e teste mesmo sem o certificado instalado em minha máquina?

Perfeito!!!!! Agradeço muito a ajuda.

Boa tarde Continuo sem o FastReport 5 mas tenho instalado o ForteReport. .... o problema agora é que começou a aparecer alguns erros (anexo). O fato de ter 2 Delphi (7 e XE8) na máquina influencia em alguma coisa? ERROS.docx

Não havia aberto. Estava fazendo a instalação com ele fechado. Infelizmente não tenho o FastReport 5 na minha máquina. Creio que isso tenha gerado dificuldades para que eu possa abrir os exemplo para estuda-los

...estranho. Fortes Report deu a mesma mensagem de erro e eu tenho instalado. Bom, sigo daqui. Agradeço muito sua ajudar.

...entendi. E sabe me dizer qual a versão para Fortes Report ? (o erro é similar)