Robinho de Morais

sim está instalado e aparecendo... mas qual configuração deve ser no demo para conseguir ?

Boa noite, como testa o demo da acbr com o certificado a3 ? com o a1 já consegui fazer...mas tenho uma maquina com o a3, coloquei a sslib como libcapicom mas não aparece para selecionar...como eu faço ?

Hum....... dll's libeay32.dll e ssleay32.dll foi....

Bom dia, Fiz ajustei as versões do delphi conforme o blog do isaque.... desistalei o delphi berlin e o acbr, instalei o berlin e o acbr, porém fui realizar o teste no demo da acbr nfe e ao assinar também deu erro;

Boa noite, apos remover o acbr, remover o delphi berlin e instalar novamente consegui abrir o demo do acbr. Obrigado.

Eu tenho o delphi 7 e Berlin, vou desistalar o Berlin, porque uso o ACBR para o emissor de nfe e o Projeto é do delphi 7 e não compensa migrar por causa de muitos componentes de terceiros...ai vou instalar tudo para ver....vou seguir as dicas do blog do isaque....

sim, mas estou trabalhando uns meses com os 2 e não tive problema...

Recompilei, mas o erro persiste, sim tenho 2 delphi e estava funcionando corretamente até fazer a atualização do acbr.

Bom dia, o demo não estou conseguindo usar, está dando erros apos atualizar o ACBR, até terça feira da semana passada estava normal, o mesmo código que está ai funciona corretamente, mas do nada até para notas que já consegui assinar e gerar o xml não gera mais....

Bom dia, Fiz o que informou, mas ai dá outro erro : [dcc32 Error] E2161 Error: RLINK32: Unsupported 16bit resource in file "C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\Delphi\Unit1.dfm" Como faço para voltar a versão anterior ? Berlin

Ontem atualizei o ACBr e ao tentar abrir o demo esta dando esse erro : apos o erro abre a Unit1 e ao compilar dá erro também; [dcc32 Fatal Error] ACBrNFe_demo.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

Boa noite, estou tendo erro ao assinar a nota fiscal antes de gerar o xml, até inicio da semana estava normal....estou fazendo assim; try frmEmissaoNFE.ACBrNFe1.NotasFiscais.Clear; with frmEmissaoNFE.ACBrNFe1.NotasFiscais.Add.NFe do begin if nrNfeDummy = '' then Ide.cNF := StrToInt(txNfe.Text) else Ide.cNF := StrToInt(nrNfeDummy); Ide.natOp := 'VENDAS'; Ide.indPag := ipVista; Ide.modelo := frmEmissaoNFE.tblConfNfemodelo.AsInteger; Ide.serie := frmEmissaoNFE.tblConfNfeserie.AsInteger; if nrNfeDummy = '' then Ide.nNF := StrToInt(txNfe.Text) else Ide.nNF := StrToInt(nrNfeDummy); Ide.dEmi := txDtEmissao.DateTime; Ide.dSaiEnt := txDtSaiEnt.DateTime; Ide.tpNF := tnSaida; if frmEmissaoNFE.tblConfNfeambiente.AsInteger = 0 then Ide.tpAmb := taProducao else Ide.tpAmb := taHomologacao; Ide.verProc := '1.0.0.0'; {Verificar se esta correto} Ide.cUF := frmEmissaoNFE.tblEmpresacoduf.AsInteger; {Verificar se esta correto} Ide.cMunFG := frmEmissaoNFE.tblEmpresacodcidade.AsInteger; Ide.finNFe := fnNormal; //Emitente Emit.CRT := crtSimplesNacional; Emit.CNPJCPF := frmEmissaoNFE.tblEmpresacnpj.AsString; Emit.IE := frmEmissaoNFE.tblEmpresaie.AsString; Emit.IEST := ''; Emit.xNome := frmEmissaoNFE.tblEmpresarazao_social.AsString; Emit.xFant := frmEmissaoNFE.tblEmpresafantasia.AsString; Emit.IM := ''; Emit.CNAE := ''; Emit.EnderEmit.xLgr := frmEmissaoNFE.tblEmpresaendereco.AsString; Emit.EnderEmit.nro := frmEmissaoNFE.tblEmpresanumero.AsString; Emit.EnderEmit.xCpl := frmEmissaoNFE.tblEmpresacomplemento.AsString; Emit.EnderEmit.cMun := frmEmissaoNFE.tblEmpresacodcidade.AsInteger; Emit.EnderEmit.xMun := frmEmissaoNFE.tblEmpresacidade.AsString; Emit.EnderEmit.xBairro := frmEmissaoNFE.tblEmpresabairro.AsString; Emit.EnderEmit.UF := frmEmissaoNFE.tblEmpresaestado.AsString; Emit.EnderEmit.CEP := frmEmissaoNFE.tblEmpresacep.AsInteger; Emit.EnderEmit.fone := frmEmissaoNFE.tblEmpresatelefone.AsString; Emit.EnderEmit.cPais:= 1058; Emit.EnderEmit.xPais:= 'BRASIL'; //Destinatário Dest.CNPJCPF := tblClientecpf_cpnj.AsString; Dest.IE := tblClienteie_rg.AsString; Dest.ISUF := ''; Dest.xNome := tblClientenome.AsString; Dest.EnderDest.xLgr := tblClienteendereco.AsString; Dest.EnderDest.nro := tblClientenumero.AsString; Dest.EnderDest.xCpl := tblClientecomplemento.AsString; Dest.EnderDest.xBairro := tblClientebairro.AsString; Dest.EnderDest.cMun := tblClientecodcidade.AsInteger; Dest.EnderDest.xMun := tblClientecidade.AsString; Dest.EnderDest.UF := tblClienteuf.AsString; Dest.EnderDest.CEP := tblClientecep.AsInteger; Dest.EnderDest.cPais := 1058; Dest.EnderDest.xPais := 'BRASIL'; Dest.EnderDest.fone := tblClientetelefone.AsString; //Itens da NFE while not tblProdutos.Eof do begin with Det.Add do begin Prod.nItem := tblProdutos.RecNo; Prod.cProd := tblProdutoscodproduto.AsString; Prod.xProd := tblProdutosproduto.AsString; Prod.NCM := tblProdutosncm.AsString; Prod.EXTIPI := ''; if (tblProdutostp_produto.AsString = '0') or // 0 - tributado (tblProdutostp_produto.AsString = '1') or // 1 - Isento (tblProdutostp_produto.AsString = '2') or // 2 - Nao Tributado (tblProdutostp_produto.AsString = '4') then // 4 - Serviço begin Prod.CFOP := '5102'; end else if tblProdutostp_produto.AsString = '3' then // 3 - Sub. Tributaria begin Prod.CFOP := '5403'; end; Prod.uCom := tblProdutosunidade.AsString; Prod.qCom := tblProdutosquantpro.AsCurrency; Prod.cEANTrib := ''; Prod.uTrib := tblProdutosunidade.AsString; Prod.qTrib := tblProdutosquantpro.AsCurrency; Prod.vUnCom := tblProdutosvalunit.AsCurrency; Prod.vProd := tblProdutosvalunit.AsCurrency * tblProdutosquantpro.AsCurrency; Prod.vUnTrib := tblProdutosvalunit.AsCurrency; Prod.vFrete := 0; Prod.vSeg := 0; Prod.vDesc := tblProdutosdesitem.AsCurrency; with Imposto do begin with ICMS do begin if tblProdutostp_produto.AsString = '0' then // 0 - tributado begin CST := cst00; CSOSN := csosn101; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := tblProdutosvalunit.AsCurrency; ICMS.pICMS := tblProdutosvlicms.AsCurrency; ICMS.vICMS := tblProdutosvlicms.AsCurrency; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST := 0; ICMS.vBCST := 0; ICMS.pICMSST := 0; ICMS.vICMSST := 0; ICMS.pRedBC := 0; end; if tblProdutostp_produto.AsString = '3' then // 3 - Sub. Tributária begin CST := cst60; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := tblProdutosvaltotunit.AsCurrency; //% de icms do produto ICMS.pICMS := 0; //calculo do valor do icms ICMS.vICMS := 0; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST := 0; ICMS.vBCST := 0; ICMS.pICMSST := tblProdutosicms.AsCurrency; ICMS.vICMSST := tblProdutosvlicms.AsCurrency; ICMS.pRedBC := 0; ICMS.CSOSN := csosn500; end; end; if (tblProdutostp_produto.AsString = '1') or // 1 - Isento (tblProdutostp_produto.AsString = '2') then // 2 - Não tributado begin { with II do begin vBC := 0; vDespAdu := 0; vII := tblProdutosvaltotunit.AsCurrency; vIOF := 0; end;} ICMS.CSOSN := csosn400; PIS.CST := pis08; COFINS.CST := cof08; end; if (tblProdutostp_produto.AsString = '4') then // 4 - Serviço begin with ISSQN do begin vBC := 0; vAliq := tblProdutosicms.AsCurrency; vISSQN := tblProdutosvlicms.AsCurrency; cMunFG := 0; cListServ := '0'; end; ICMS.CSOSN := csosn400; end; end; end; tblProdutos.Next; end; //Informações finais da NFE Total.ICMSTot.vBC := 0; Total.ICMSTot.vICMS := 0; Total.ICMSTot.vBCST := 0; Total.ICMSTot.vST := 0; Total.ICMSTot.vProd := vlVendaBruta; Total.ICMSTot.vFrete := 0; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := StrToFloat(txVlDes.Text); Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := 0; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vNF := tblProdutosvaltotvenda.AsCurrency; // 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.vRetPrev := 0; //transportadora {Transp.Transporta.CNPJCPF := ''; Transp.Transporta.xNome := ''; Transp.Transporta.IE := ''; Transp.Transporta.xEnder := ''; Transp.Transporta.xMun := ''; Transp.Transporta.UF := ''; with Transp.Reboque.Add do begin placa := ''; UF := ''; RNTC := ''; end; with Transp.Vol.Add do begin qVol := 1; esp := ''; marca := ''; nVol := ''; pesoL := 0; pesoB := 0; end; } //Cobrança Cobr.Fat.nFat := txOrdCli.Text; Cobr.Fat.vOrig := vlVendaBruta; Cobr.Fat.vDesc := StrToFloat(txVlDes.Text); Cobr.Fat.vLiq := StrToFloat(txVlTotal.Text) end; frmEmissaoNFE.ACBrNFe1.NotasFiscais.Assinar; <ERRO OCORRE AQUI frmEmissaoNFE.ACBrNFe1.NotasFiscais.Items[0].GravarXML(); memLog.Lines.Add(FormatDateTime('dd/MM/yyyy HH:mm:ss',now) + ' : NFE gerada com sucesso'); gravaLogRetorno('NFE gerada com sucesso'); dsCamXML := frmEmissaoNFE.ACBrNFe1.NotasFiscais.Items[0].NomeArq; First chance exception at $5927B679. Exception class $C0000005 with message 'access violation at 0x5927b679: read of address 0xdad9b819'. Process EmissorNFE.exe (6632) First chance exception at $5927B679. Exception class $C0000005 with message 'access violation at 0x5927b679: read of address 0xdad9b819'. Process EmissorNFE.exe (6632) First chance exception at $0040963E. Exception class $C0000005 with message 'access violation at 0x0040963e: read of address 0xdad9b819'. Process EmissorNFE.exe (6632) First chance exception at $7713A932. Exception class EResNotFound with message 'Resource TfrmErro not found'. Process EmissorNFE.exe (6632) First chance exception at $77946EDD. Exception class $C0000005 with message 'access violation at 0x77946edd: read of address 0x00000000'. Process EmissorNFE.exe (6632)

BigWings uma coisa que não parei para analisar era o xml e aparentemente está errado, estou validando as informações e fiz um teste com um de uma nf valida e validou corretamente, como a mensagem falava do schema, não relacionei o erro com o xml.

sim só cortou o nome ali, mas é path dos Schemas, isso está ocorrendo do mesmo jeito com o demo da acbr.

plis, help

Boa noite, primeiro pesquisei e fiz tudo que encontrei aqui no forum sobre esse erro e a versão está correta, o path também está correto, mas não consegui solucionar esse erro na minha aplicação e também no DEMO da ACbr; fiz o teste também forçando a versão e também não funcionou. ACBrNFe1.NotasFiscais.Add.NFe.infNFe.Versao := 3.1;

Obrigado Juliano, vou dar uma olhada no forum e na sessão de download, os fontes eu já andei vendo também, só ainda estou um pouco perdido, acho que seguindo um tutorial vou conseguir a entender melhor

Boa noite, Primeiramente se estou abrindo o tópico em fórum incorreto me desculpe e me auxiliem para onde devo ir. Tenho uma aplicação no delphi7 e meu cliente usa o emissor de nfe da fazendo de SP, porém apartir do ano que vem será descontinuado. Instalei o delphi Belin e instalei o acbr, mas não sei por onde começar, alguém tem um tutorial para que eu possa seguir ? Preciso pegar os dados da venda, gerar o xml > quais dados preciso colocar no xml ? Preciso pegar o xml e transmitir > qual componente do ACbr utilizar e parametros ? Assim como retorno, status, impressão e inutilização. Agradeço desde já a atenção.