Ir para conteúdo
  • Cadastre-se

dionatan

Membros
  • Total de ítens

    233
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

dionatan's Achievements

Community Regular

Community Regular (8/14)

  • First Post
  • Conversation Starter
  • Collaborator Rare
  • Week One Done
  • One Month Later

Recent Badges

2

Reputação

7

Community Answers

  1. Sim estou utilizando o ACBRInstalll.... segue o erro: Caminho: C:\Program Files (x86)\Borland\ACBR Versão do delphi: Delphi 7 (0) Plataforma: Win32(0) ================================================================================ Criando diretórios de bibliotecas... Removendo diretorios e pacotes antigos instalados... Adicionando library paths... COMPILANDO OS PACOTES... Compiling package C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\synapse\ACBr_synapse.dpk "C:\Program Files (x86)\Borland\Delphi7\bin\dcc32.exe" "C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\synapse\ACBr_synapse.dpk" Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation 37153 lines, 0.19 seconds, 269140 bytes code, 29293 bytes data. Compilation success Pacote "ACBr_synapse.dpk" compilado com sucesso. Compiling package C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\ACBrComum\ACBr_Comum.dpk "C:\Program Files (x86)\Borland\Delphi7\bin\dcc32.exe" "C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\ACBrComum\ACBr_Comum.dpk" Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation Warning: Unit 'ACBrZLibExGZ' implicitly imported into package 'ACBr_Comum' Warning: Unit 'ACBrZLibEx' implicitly imported into package 'ACBr_Comum' Warning: Unit 'ACBrZLibExApi' implicitly imported into package 'ACBr_Comum' 29968 lines, 0.22 seconds, 122532 bytes code, 14861 bytes data. Compilation success Pacote "ACBr_Comum.dpk" compilado com sucesso. Compiling package C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\ACBrOpenSSL\ACBr_OpenSSL.dpk "C:\Program Files (x86)\Borland\Delphi7\bin\dcc32.exe" "C:\Program Files (x86)\Borland\ACBR\Pacotes\Delphi\ACBrOpenSSL\ACBr_OpenSSL.dpk" Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation C:\Program Files (x86)\Borland\ACBR\Fontes\ACBrOpenSSL\ACBrEAD.pas(280) Error: Undeclared identifier: 'HexToAsciiDef' ACBr_OpenSSL.dpk(35) Fatal: Could not compile used unit '..\..\..\Fontes\ACBrOpenSSL\ACBrEAD.pas' Compilation failure Erro ao compilar o pacote "ACBr_OpenSSL.dpk". Abortando... Ocorreram erros na compilação dos pacotes.
  2. Pessoal desculpa os equivoces de duplicação de topico. Estou tentantado instalar uma nova versão do ACBR... JA BAIXEI DO SVN uma nova copia ja exclui todos os arquivos porem sempre da o erro abaixo no LOG em anexo.. Utilizo o DELPHI 7. Nao sei mais como proceder.... alguem poderia me auxiliar? Att... Dionatan log_Delphi_7.txt
  3. Bha desinstalei todo acbr instalei novamente alterei o arquivo e pra mim continua o erro... Sou do RS
  4. opa também estou com o mesmo problema... Mas somente em Homologação..... 4021-pro-lot.xml 4021-env-lot.xml
  5. Pessoal desculpa pelas replicações de post ... mas não achei a resposta..... Meu sistema esta funcionando apenas atualizei os fontes.... Atualizando os fontes agora so da o erro Rejeicao: Endereco do site da UF da Consulta por chave de acesso diverge do previsto Voltando a versão da certo..... Segue os XML que esta dando erro... 4021-pro-lot.xml 4021-env-lot.xml
  6. dionatan

    Modal Rodoviario

    Pessoal atualizei os componentes para nova versão (3.0).. Porem nao esta mais saindo todas as informações do modal Rodoviario e nem do seguro..... O CTE autoriza normalmente porem não sai todas informações... segue como eu fazia antes.. (exemplo) {$IFDEF PL_200} if Length(Trim(cxTextEdit32.Text)) > 0 then infCTeNorm.Rodo.RNTRC := cxTextEdit32.Text; infCTeNorm.Rodo.dPrev := cxDateEdit3.Date; infCTeNorm.Rodo.Lota := ltSim; if Length(Trim(cxTextEdit40.Text)) > 0 then begin with infCTeNorm.Rodo.moto.Add do begin xNome := cxTextEdit40.Text; CPF := Removeletras(cxMaskEdit6.Text); end; end; // infCTeNorm.Rodo.RNTRC {$ELSE} if Length(Trim(cxTextEdit32.Text)) > 0 then Rodo.RNTRC := cxTextEdit32.Text; Rodo.dPrev := cxDateEdit3.Date; Rodo.Lota := ltSim; if Length(Trim(cxTextEdit40.Text)) > 0 then begin with Rodo.moto.Add do begin xNome := cxTextEdit40.Text; CPF := Removeletras(cxMaskEdit6.Text); end; end; // Rodo.CIOT {$ENDIF} {$IFDEF PL_200} with infCTeNorm.rodo.veic.Add do {$ELSE} with rodo.veic.Add do {$ENDIF} begin if RadioGroup9.ItemIndex = 0 then tpProp := tpProp else tpProp := tpTerceiro; with Prop do begin if Length(Trim(cxTextEdit36.Text)) > 0 then begin xNome := cxTextEdit36.Text; RNTRC := cxTextEdit39.Text; if Length(Trim(cxMaskEdit4.Text)) = 18 then begin CNPJCPF := cxMaskEdit4.Text; IE := cxTextEdit38.Text end else begin CNPJCPF := cxMaskEdit5.Text; IE := 'ISENTO'; end; UF := cxTextEdit37.Text; end; end; UF := cxComboBox1.Text; cInt := cxTextEdit33.Text; RENAVAM := cxTextEdit34.Text; placa := cxTextEdit35.Text; tara := CurrencyEdit15.AsInteger; capKG := CurrencyEdit16.AsInteger; capM3 := CurrencyEdit17.AsInteger; case RadioGroup6.ItemIndex of 1: tpProp := tpProprio; 2: tpProp := tpTerceiro; end; case RadioGroup7.ItemIndex of 0: tpRod := trNaoAplicavel; 1: tpRod := trTruck; 2: tpRod := trToco; 3: tpRod := trCavaloMecanico; 4: tpRod := trVAN; 5: tpRod := trUtilitario; 6: tpRod := trOutros; end; case RadioGroup8.ItemIndex of 0: tpCar := tcNaoAplicavel; 1: tpCar := tcAberta; 2: tpCar := tcFechada; 3: tpCar := tcGraneleira; 4: tpCar := tcPortaContainer; 5: tpCar := tcSider; end; case RadioGroup15.ItemIndex of 0: tpVeic := tvTracao; 1: tpVeic := tvReboque; end; end; cte.xml
  7. Boa Tarde Daniel, Me surgiu alguns problemas ... colocquei na versao 400 o componente ate ai tranquilo... autoriza, inutiliza, consulta tudo 100% Mas quando vou Cancelar esta dando o erro: Erro Interno: 0 Erro HTTP: 500 UF: RS isso so no Cancelamento.... Segue minhas configurações e codigo... FrmPrincipal.ACBrNFe.NotasFiscais.LoadFromFile(varCaminho); FrmPrincipal.ACBrNFe.Consultar; FrmPrincipal.ACBrNFe.EventoNFe.Evento.Clear; FrmPrincipal.ACBrNFe.EventoNFe.idLote := FrmPrincipal.ACBrNFe.NotasFiscais.Items[0].NFe.Ide.nNF; with FrmPrincipal.ACBrNFe.EventoNFe.Evento.Add do begin infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := varJustificativa; end; FrmPrincipal.ACBrNFe.EnviarEvento(FrmPrincipal.ACBrNFe.NotasFiscais.Items[0].NFe.Ide.nNF); O que pode estar ocorrendo? Fico no aguardo
  8. Boa Tarde Daniel, Me surgiu alguns problemas ... colocquei na versao 400 o componente ate ai tranquilo... autoriza, inutiliza, consulta tudo 100% Mas quando vou Cancelar esta dando o erro: Erro Interno: 0 Erro HTTP: 500 isso so no Cancelamento.... Segue minhas configurações e codigo... FrmPrincipal.ACBrNFe.NotasFiscais.LoadFromFile(varCaminho); FrmPrincipal.ACBrNFe.Consultar; FrmPrincipal.ACBrNFe.EventoNFe.Evento.Clear; FrmPrincipal.ACBrNFe.EventoNFe.idLote := FrmPrincipal.ACBrNFe.NotasFiscais.Items[0].NFe.Ide.nNF; with FrmPrincipal.ACBrNFe.EventoNFe.Evento.Add do begin infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := varJustificativa; end; FrmPrincipal.ACBrNFe.EnviarEvento(FrmPrincipal.ACBrNFe.NotasFiscais.Items[0].NFe.Ide.nNF); O que pode estar ocorrendo? Fico no aguardo
  9. mas esta correto do jeito que estou fazendo? with seg.Add do begin if RadioGroup5.ItemIndex = 0 then respSeg := rsEmitente else respSeg := rsTomadorServico; end; with seg.Add do begin CNPJ := trim(cxTextEdit21.Text); xSeg := copy(trim(cxTextEdit19.Text), 1, 30); //CNPJCPF := trim(cxTextEdit21.Text); nApol := copy(trim(cxTextEdit20.Text), 1, 20); with aver.Add do begin nAver := '9988444'; end; end;
  10. pessoal estou com duvidas na geração do seguro: with seg.Add do begin if RadioGroup5.ItemIndex = 0 then respSeg := rsEmitente else respSeg := rsTomadorServico; end; with seg.Add do begin CNPJ := trim(cxTextEdit21.Text); xSeg := copy(trim(cxTextEdit19.Text), 1, 30); //CNPJCPF := trim(cxTextEdit21.Text); nApol := copy(trim(cxTextEdit20.Text), 1, 20); with aver.Add do begin nAver := '0'; end; end; ta dando o erro de informações do seguiro incompleta... poderiam me auxiliar?
  11. Bom dia Italo... Estou adequando o meu sistema porem esta dando esse erro: Rejeição: CNPJ do destinatário do CT-e Globalizado deve ser o mesmo do emitente do CT-e Fiquei com duvidas referente a este erro ... Em anexo o XML .. poderiam me auxiliar? 43171096213384000108570010000114991000114994-cte.xml
  12. dionatan

    Enviar CTeOS

    BOA TARDE, Alguem teria um xml em homologação para basear-me no desenvolvimento? Att
×
×
  • 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.