Jump to content

Cleonir

Membros
  • Content Count

    253
  • Joined

  • Last visited

Community Reputation

40 Excellent

1 Follower

About Cleonir

  • Rank
    Membro Ativo

Profile Information

  • Sexo
    Masculino
  • Localização
    Santa Catarina

Recent Profile Visitors

3,338 profile views
  1. Boa noite. Esta ok agora.
  2. Bom dia. Referente ao RNTRC do reboque. No DAMDFE se caso o reboque não for de terceiro não deveria ser impresso o RNTRC do emitente do MDFe? Acredito eu que deveria ser feito da mesma forma que foi feito para o Veiculo Tração. Esta faltando verificar a versão (fpMDFe.infMDFe.versao >= 3). Não postei os arquivos modificados por que fiz outras alteração que meu cliente solicitou que tive que fazer.
  3. Eles me passaram esta RESOLUÇÃO ANTT 4.799 DE 27/07/2015 artigo 23. http://www.normaslegais.com.br/legislacao/resolucao-antt-4799-2015.htm
  4. Achei estranho também, mas o cliente levou multa por isso, então acredito que possa ser alterado. Esses fiscais nem sabem o que querem...
  5. Mas estas duas informações que eu adicionei eles solicitaram para informar no local onde adicionei nos arquivos que anexei.
  6. Teve um cliente meu que levou uma multa por estar faltando informações no DAMDFE. Segundo eles precisa ser impresso o RENAVAM dos veículos, a data e hora de inicio da viagem, o CIOT se caso tiver e o numero da averbação nos dados do seguro. Fiz alguns ajustes no ACBrMDFeDAMDFeRLRetrato para adicionar o Renavam dos veículos e a data e Hora de Inicio da viagem. Porem ainda Falta os números do CIOT que pode acontecer de ter mais do que um, e os números das averbações que também pode haver mais de um. Não sei onde poderíamos adicionar estas informações. Mas como que eles estão exigindo isso? nos Modelos de Impressão do DAMDFE do Manual MDFe Anexo II DAMDFE v3.00a.pdf que tem no portal do MDFe(https://dfe-portal.svrs.rs.gov.br/Mdfe/Documentos#) não tem estas informações. Em anexo arquivos alterados. ACBrMDFeDAMDFeRLRetrato.dfm ACBrMDFeDAMDFeRLRetrato.pas
  7. Bom dia José M. S. Junior. Não teria como adicionar essa parte que ja foi implementada no trunk2. Eu queria tentar ajudar no desenvolvimento. Tentei instalar do Branches mas só tive problemas. Seria melhor se estivesse no trunk2, ali seria melhor para irmos desenvolvendo e postando as alterações, sem ter problema com a instalação. Só uma idéia...
  8. Fiz um ajuste no CNAB 240 do Sicredi referente a negativação. Favor analisarem e se possível subirem para o SVN. ACBrBancoSicredi.pas
  9. Cleonir

    ACBrCIOT

    Você precisa importar os WSDL no delphi. Se você dar uma dar uma pesquisada encontra tutoriais de como fazer isso, é bem pratico. fazendo isso o delphi var criar as classes com todos os métodos para utilizar. Um exemplo de como utilizar o método para cadastrar o veículo na eFrete. Para os outros métodos é só seguir a mesma lógica. procedure TfrmEmissaoCIOT.btnGravarVeiculoClick(Sender: TObject); var GravarVeiculo: eFreteVeiculosService.GravarRequest; Retorno: eFreteVeiculosService.GravarResult; HTTPRIOVeiculo: THTTPRIO; begin HTTPRIOVeiculo := THTTPRIO.Create(Self); GravarVeiculo := eFreteVeiculosService.GravarRequest.Create; try try HTTPRIOVeiculo.HTTPWebNode.InvokeOptions := [soIgnoreInvalidCerts, soAutoCheckAccessPointViaUDDI]; HTTPRIOVeiculo.URL := URLVeiculosService; GravarVeiculo.Integrador := HashIntegrador_eFrete; GravarVeiculo.Versao := 1; GravarVeiculo.Token := TokenCIOTeFrete; GravarVeiculo.Veiculo := eFreteVeiculosService.Veiculo.Create; with GravarVeiculo.Veiculo do begin Placa := ...; Renavam := ...; Chassi := ...; RNTRC := ...; NumeroDeEixos := ...; Marca := ...; Modelo := ...; AnoFabricacao := ...; AnoModelo := ...; Cor := ...; Tara := ...; CapacidadeKg := ...; CapacidadeM3 := ...; TipoRodado := eFreteVeiculosService.TipoRodado.Truck; TipoCarroceria := eFreteVeiculosService.TipoCarroceria.Aberta; end; //Aqui envia e pega o retorno Retorno := (HTTPRIOVeiculo as VeiculosServiceSoap).Gravar(GravarVeiculo); try if not Retorno.Sucesso then ShowMessage('Erro ao gravar Veículo na eFrete! '+ Retorno.Excecao.Codigo+ ' - ' +Retorno.Excecao.Mensagem) else ShowMessage('Adicionado com Sucesso ! '+'ProtocoloServico: '+IntToStr(Retorno.ProtocoloServico)); finally FreeAndNil(Retorno); end; except on e:Exception do TUtil.ShowMessages('Erro ao gravar Veículo na eFrete ! ' + e.Message); end; finally FreeAndNil(GravarVeiculo); end; end;
  10. Cleonir

    ACBrCIOT

    Boa tarde. Não consegui pelo acbr. Não consegui fazer a parte do certificado. Não sei como esta agora se alguém fez mais alguma coisa... Acabei fazendo utilizando o WSDL.
  11. Arquivo alterado novamente estava copiando um digito a mais. ACBrBancoCecred.pas
  12. Tive um problema para pegar a conta corrente do Retorno do CNAB 240. Esta pegando somente 4 caracteres, o correto é 12 conforme manual. Em anexo parte do manual e arquivo alterado. ACBrBancoCecred.pas
  13. Opa. Somente essa configuração ACBrCTE.Configuracoes.Geral.FormaEmissao := teSVCSP; eu estava setando outra.
  14. Beleza. Era isso mesmo. Eu estava alimentando de forma errada. Obrigado...
×
×
  • Create New...