Ir para conteúdo
  • Cadastre-se

Turbo Drive

Membros
  • Total de ítens

    237
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Turbo Drive postou

  1. Turbo Drive

    Arquivo Não Encontrado

    Bom dia Estou tentando emitir uma NF-e, mas estou tendo o retorno: Arquivo Não Encontrado Pesquisei aqui no fórum e segui as dicas abaixo: 1 - Nas configurações Gerais, configurei Salvar = true, o modelo está moNFe e a versão está ve310; 2 - O certificado digital é reconhecido, pois ele pede a senha e depois mostra a mensagem de Arquivo Não Encontrado; 3 - As configurações de PathNfe e PathSalvar estão definidas em C:\TurboNfe\Nfe\; 4 - As configurações de PathEvento e PathSchemas estão definidas em C:\TurboNfe\Schemas\, onde os arquivos estão atualizados; 5 - O timeout está 5000. Alguém teria outra solução ? Desde já agradeço a atenção. OBS: Uso delphi 7, trunk2 e os fontes do Acbr foram atualizados semana passada.
  2. O componente em minha aplicação e no exemplo, estão iguais. Segue o trecho dos logs: Gerado pelo programa exemplo. ATIVAR - 28/11/15 10:52:49:953 - Modelo: Daruma - Porta: COM6 - TimeOut: 3 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 -------------------------------------------------------------------------------- Gerado pela minha aplicação ATIVAR - 28/11/15 10:54:38:891 - Modelo: Daruma - Porta: COM6 - TimeOut: 3 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 Como uso as dlls dos fabricantes, usei as dicas desse site para desabilitar a DarumaFrameWork.dll: http://www.desenvolvedoresdaruma.com.br/dde/htmls/dde036_2013-nao-ocupar-serial.html Quando ativo o componente no exemplo, a impressora não faz o beep. Mas ao iniciar a minha aplicação, o ECF faz o beep. Seria a DarumaFrameWork.dll que ainda esteja ocupando a porta ? Alguém teria alguma idéia, sobre o que poderia estar ocorrendo ?
  3. Deixei os mesmos valores do exemplo, mas o erro ainda persiste. Mas dessa vez, não houve o beep, nem da minha aplicação, nem do programa exemplo. Já o programa exemplo, comunica sem problemas, mesmo estando em um diretório sem nenhuma dll do fabricante. A minha aplicação ainda tem no código fonte com as chamadas das funções da dll. Tem algum problema ? O componente ele utiliza as dlls ou faz comunicação direta ?
  4. O exemplo que vem nos fontes, comunica sem problemas. A minha aplicação ainda possui as função das dlls dos fabricantes no código fonte. Seria esse o problema ? Existe alguma forma de coexistir no código fonte, as funções das dlls e o componente AcbrECF ? O AcbrEcf, usa as dlls ou faz comunicação direta ? Teria como me mandar um exemplo de como configurar o componente ? Desde já agradeço a atenção.
  5. Bom dia Estou precisando trabalhar com o AcbrECF em minha aplicação. Estou tendo problemas de comunicação, inicialmente com a Daruma, pois é o ECF que disponho no momento. Ao tentar me comunicar com minha aplicação, aparece o seguinte erro: Communication Error 5: Acesso Negado Pesquisei aqui no fórum, mas o que foi informado, não foi suficiente para me ajudar. Sempre que inicio a minha aplicação, antes de chamar as funções ou ativar o componente, o ECF dá um beep. O exemplo que vem nos fontes, comunica sem problemas. A minha aplicação ainda possui as função das dlls dos fabricantes no código fonte. Seria esse o problema ? Existe alguma forma de coexistir no código fonte, as funções das dlls e o componente AcbrECF ? O AcbrEcf, usa as dlls ou faz comunicação direta ? Teria como me mandar um exemplo de como configurar o componente ? Desde já agradeço a atenção.
  6. Boa tarde Tenho uma aplicação que já utilizava o AcbrECF, mas no mês passado migrei para o Trunk2, e agora está ocorrendo algo estranho ao tentar detectar o ECF. Eu tenho um ECF Daruma Fs-700 conectada em uma mult-serial através de um cabo serial. O meu PC possui 2 mult-seriais, totalizando 4 portas COM. Mas a mult-serial, em questão, possui as portas COM5 e COM6. Se o ECF estiver conectado na porta COM5, e eu tentar detectar o ECF, o sistema não encontra. Porém se eu tirar o ECF da e colocar na COM6, o sistema consegue detectar sem problemas. O mesmo fato ocorre se eu conectar o ECF na COM6, o sistema não detecta, mas ao trocar para a COM5, este encontra sem problemas. Antes o timeout estava em 3, agora aumentei para 10, mas continuou com esse problema. OBS: Ao abrir os fontes da minha aplicação, este acusou a falta da propriedade AcbrECF.Fonts.color. Gostaria de saber o que poderia ter mudado ou que tipo de testes eu poderia fazer para resolver esta situação. Desde já agradeço a atenção.
  7. Bom dia Peço desculpas por dar continuidade ao tópico, mas não consegui baixar o captcha na consulta de cpf com o Delphi 7. Meus fontes do Acbr estão atualizados. Eu estou tentando fazer essa consulta, mas o arquivo .png vem sempre vazio. Sei que o delphi 7 não suporta os arquivo .png, por isso adicionei o diretório do arquivo Pngimage.dcu ao library path, mesmo assim não estou conseguindo baixar. Quando compilo o mesmo exemplo no delphi XE5, eu consigo baixar o captcha sem erros. Acredito que a falha, para o delphi 7, esteja nessa procedure: procedure TACBrConsultaCPF.Captcha(Stream: TStream); begin try HTTPGet('http://www.receita.fazenda.gov.br/Aplicacoes/ATCTA/CPF/captcha/gerarCaptcha.asp'); if HTTPSend.ResultCode = 200 then begin HTTPSend.Document.Position := 0; Stream.CopyFrom(HttpSend.Document, HttpSend.Document.Size); Stream.Position := 0; end; Except on E: Exception do begin raise EACBrConsultaCPFException.Create('Erro na hora de fazer o download da imagem do captcha.'+#13#10+E.Message); end; end; end; O que tenho que fazer para o meu delphi 7 poder baixar o arquivo ? Alguém teria alguma dica ou solução que possa me indicar ? Desde já agradeço a atenção.
  8. Para a NF-e, é preciso cadastrar o CNPJ do emitente perante a Sefaz do seu estado. Geralmente quem faz isso é o contador da empresa através da UVT.
  9. Boa tarde Antes de postar, eu tentei com o ambiente do AM, mas em uma tentativa deu erro do fuso horário e em outro momento deu Inscrição estadual do emitente inválida. Poderia me expor com quais dados alimentar o componente ? OBS: Estou usando o Trunk2.
  10. Boa tarde Para emissão de NF-e, o RN utiliza o ambiente do RS, infelizmente apenas as empresas do projeto piloto podem emitir NFC-e. Ao tentar emitir uma NFC-e no ambiente de homologação, tive o retorno: Emissor nao habilitado para emissao da NF-e Para adiantar o desenvolvimento de minha aplicação, gostaria da ajuda dos colegas sobre como configurar o componente, afim de que possa usar o ambiente de homologação de outro estado. Se possível, gostaria de utilizar o ambiente do CE, BA, SP ou RJ. Segue abaixo a forma como se encontra configurado o meu componente: vNumlote := '001'; numnf := '000000002'; Sincrono := false; Acbrnfe1.Configuracoes.WebServices.UF := 'RN'; AcBrNFe1.NotasFiscais.Clear; with ACBrNFe1.NotasFiscais.Add.NFe do begin Ide.cUF := 24; Ide.cMunFG := 2408003; Ide.modelo := 65; Ide.serie := 1; Ide.tpNF := tnSaida; Ide.tpEmis := teNormal; Ide.tpAmb := taHomologacao; Ide.finNFe := fnNormal; Ide.tpImp := tiNFCe; Ide.indFinal := cfConsumidorFinal; Ide.indPres := pcPresencial; Emit.EnderEmit.cMun := 2408003; Emit.EnderEmit.xMun := 'MOSSORÓ; Emit.EnderEmit.UF := 'RN'; Emit.enderEmit.cPais := 1058; Emit.enderEmit.xPais := 'BRASIL'; ..... // demais elementos a serem informados END; AcbrNFe1.Enviar(vNumLote,True,Sincrono); Desde já agradeço a atenção.
  11. Bom dia Desculpe se a pergunta for de iniciante, mas vocês atualizaram os Schemas e Reports junto com a aplicação de vocês ? Outro detalhe, no componente, vocês apontaram para o arquivo report ? Ao inicializar a minha aplicação eu uso esse código: dacte1.FastFileEvento := 'C:\meusistema\Report\DACTE_EVENTOS.fr3'; dacte1.FastFile := 'C:\meusistema\Report\DACTE_1_04.fr3'; Até o momento, tudo tem ocorrido normalmente.
  12. Procure no fórum trunk2, onde tem postagens minhas e de outros colegas que passaram por isso. Em um desses tópicos, mostra algumas sugestões de como instalar sem problemas, mesmo com o Windows 10. Essa questão de instalação com o Trunk2 , foge um pouco do assunto desse post aqui.
  13. Billi579, essa questão está endo revista pelo pessoal do Acbr. Caso o seus fontes já estejam atualizados, tente algumas sugestões que foram expostas ao longo desse tópico. Se mesmo assim não surtir efeito, você terá que aguardar o término da revisão dos fontes.
  14. Bom dia Caso ainda não tenha resolvido, veja esse tópico, pode ser que algum procedimento mencionado lá, te ajude. http://www.projetoacbr.com.br/forum/topic/24027-protocolo-de-autorização-cte-propriedade-xmlproccte-removida/
  15. Bom dia Esta questão está sendo revisada pelo pessoal do Acbr. Caso você não tenha resolvido ainda, veja esse tópico, de repente algum procedimento aqui, te ajuda. http://www.projetoacbr.com.br/forum/topic/24027-protocolo-de-autorização-cte-propriedade-xmlproccte-removida/
  16. Porque não informar ve310 como valor de VersaoDF em vez de TpcnVersaoDF(2)? Na pressa para tentar ajustar o código, não sabia que podia fazer isso. Porque você executa o GravarXML sendo que o Consultar já faz isso? Na minha aplicação, ao mudar do Trunk para Trunk2, o protocolo deixou de aparece no XML final. E ao acrescentar essa instrução, o protocolo retornou. E ao imprimir porque você lê o numero do protocolo e atribui a propriedade ProtocoloNFe? Desde 2011 que venho trabalhando assim e nunca modifiquei.
  17. Boa tarde Atualmente, salvo em disco e hospedo na nuvem. Esqueci de mencionar que, no dia 02/09/15, eu baixei o componente pelo tortoise usando o link: svn://svn.code.sf.net/p/acbr/code/trunk2. Para a consulta com carregamento do XML, o meu código ficou assim: AcbrNFe1.NotasFiscais.Clear; Acbrnfe1.Configuracoes.Arquivos.Salvar := true; AcbrNFe1.Configuracoes.Geral.ModeloDF := moNFe; AcbrNFe1.Configuracoes.Geral.VersaoDF := TpcnVersaoDF(2); AcbrNFe1.NotasFiscais.LoadFromFile(arqxml); AcbrNFe1.Consultar; AcbrNFe1.NotasFiscais.Items[0].GravarXML(chvnfe+'-nfe.xml'); No diretório especificado na propriedade PathSalvar do componente, é criado um xml com todos os elementos, inclusive com o protocolo de autorização. Ainda permanece a questão das duas vias sendo impressas, contudo ambas impressões são válidas e estão aparecendo o protocolo de autorização. Assim está o meu código para impressão do XML: AcbrNFe1.NotasFiscais.LoadFromFile('C:\seudiretorio\'+chvnfe+'-NFe.xml'); wnProt := TLeitor.Create; wnProt.CarregarArquivo('C:\seudiretorio\'+chvnfe+'-NFe.xml'); wnProt.Grupo := wnProt.Arquivo; AcbrNFe1.DANFE.ProtocoloNFe := wnProt.rCampo(tcStr,'nProt'); AcbrNFe1.NotasFiscais.Imprimir; wnProt.Free; Lembrando que não modifiquei nada nos novos fontes baixados. Novamente, agradeço a todos os colegas pela ajuda.
  18. Bom dia a todos. Estou debugando os fontes do Acbr e nesse meio tempo, percebi que o XML só recebe o protocolo de autorização se a propriedade Salvar estiver true. Acbrnfe1.Configuracoes.Arquivos.Salvar := true; Vou verificar agora se o mesmo ocorrerá, ao fazer a consulta pelo carregamento do XML. Assim que possível, posto o resultado.
  19. Italo, me desculpe se for uma pergunta idiota, mas em quais units eu devo observar ? Porque eu sempre usei o comando AcbrNFe1.Enviar(lotnf, false) e quando confirmado, já me dava o XML com o protocolo de autorização.
  20. Bom dia Sempre salvo o XML em disco.
  21. Alguma idéia sobre a questão do protocolo no XML e sobre a impressão dos Danfes ?
  22. Boa tarde Aproveitando o tópico, aqui na empresa tentei enviar uma NF-e de produção, e ocorreram duas situações estranhas: 1 - A NF-e está autorizada na Sefaz, mas o xml permaneceu sem o protocolo de autorização; 2 - Ao mostrar o Danfe, apareceram duas páginas, onde a primeira estava com o protocolo de autorização e a segunda sem o protocolo. Segue abaixo o trecho do código que utilizo para enviar as NF-e: NFe1.NotasFiscais.Clear; NFe1.Configuracoes.Geral.ModeloDF := moNFe; NFe1.Configuracoes.Geral.VersaoDF := TpcnVersaoDF(2); with NFe1.NotasFiscais.Add.NFe do begin //alimentação do componente end; nfe1.NotasFiscais.GerarNFe; NFe1.Enviar(lotnf, false); if nfe1.NotasFiscais.Items[0].Confirmada then stsped := 0 else stsped := -2; if stsped = 0 then begin aux := UTF8Encode(NFe1.WebServices.Retorno.RetWS); aux1 := Retire(aux, '<cStat>', '</cStat>'); aux1 := aux1 + ' - '+Retire(aux, '<xMotivo>', '</xMotivo>'); MemoResp.Lines.add('Retorno: '+aux1); MemoResp.Lines.add('Protocolo: '+NFe1.WebServices.Retorno.Protocolo); MemoResp.Lines.add('Recibo: '+NFe1.WebServices.Retorno.Recibo); MemoResp.Lines.add('Chave NF-e: '+NFe1.WebServices.Retorno.ChaveNFe); end; Existe algum outro procedimento a ser feito para gravar o protocolo no XML final ? Mais uma coisa, qual a diferença entre as propriedades PathNFe e pathSalvar ? Grato pela atenção.
  23. Boa tarde Grande Tiago, você acertou em cheio. Assim estava o código na linha 225 da ACBrDFeCapicom.pas: if Cert.SerialNumber = FpDFeSSL.NumeroSerie then O valor de Cert.SerialNumber estava indo maiúsculo e sem espaços e o valor de FpDFeSSL.NumeroSerie estavam todos em minúsculo. Assim ficou o código na mesma unit: if Cert.SerialNumber = Trim(UpperCase(FpDFeSSL.NumeroSerie)) then Dessa forma o certificado foi encontrado sem nenhum problema. O interessante é que atualizei os meus fontes Acbr na quinta-feira passada, 27/08/15. Agradeço novamente aos colegas do fórum e desculpas pelo incômodo.
  24. Eu já havia tentado o comando que você utilizou, mas mesmo assim não deu certo. NFe1.Configuracoes.Certificados.NumeroSerie := Trim(UpperCase(StringReplace(nserie, ' ', '', [rfReplaceAll]))); dtfim := NFe1.SSL.CertDataVenc; O certificado está funcional, mas ao chamar a função que lê a data de expiração, aparece o mesmo retorno "Certificado Digital Não Encontrado". Já registrei as dlls, inclusive deixei cópias no mesmo diretório da aplicação e no diretório SysWow64. Consegui compilar o exemplo do Acbr, mas ele apenas abre e fecha no mesmo instante. Vale salientar que a minha aplicação com a versão anterior, usando o trunk, consegue identificar o certificado. Assim descartamos a hipótese de ser Windows ou o certificado. O que eu posso estar esquecendo que seja diferente nessa versão Trunk2 ? Grato pela atenção.
  25. Boa tarde Aproveitando o tópico, também estou tendo o retorno "Certificado Digital Não Encontrado". Tentei a dica do colega Tiago, mas não obtive sucesso. NFe1.Configuracoes.Certificados.NumeroSerie := Trim(UpperCase(nserie)); NFe1.SSL.CarregarCertificado; Ao carregar o certificado, ele acusa a ausência do certificado. No componente eu tenho pré-configurado os seguintes elementos: PathNfe = C:\SGA\NFe PathSchemas = C:\SGA\Schemas\ SSLLib = libCapicom VersaDF = ve310 Existe algo mais a ser configurado ? Grato pela atenção.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...