sergiom

Boa tarde, hoje abriu rápido. Pedi para clientes diferentes testarem em cidades e links de internet´s variados e também abriu. Creio que estabilizou.

Abri outro topico, pois o anterior está travado. O link utilizado na CONSULTA CNPJ está muito lento e em alguns lugares não abre. Consulta CNPJ com Captcha Isto está acontencendo com vocês também? Atenciosamente Sérgio

Bom dia, quando teremos as versões Fortes e FastReport com esta implementação, para eu deixar meus arquivos com as versões do TRUNK2? Atenciosamente Sérgio

Boa noite, Gabriel, foi o que sugeri, só que eu não tinha achado como checar a versão. A melhor solução realmente é trabalhar com a versão. Importante atualizar isso logo, pois isto pode gerar multa para a transportadora. Abraços Sérgio

Você pode me informar como checo a versão do MDFe dentro da UNIT de impressão? Atenciosamente Sergio

No FastReport alterei agora também. Somente em vermelho. Talvez a melhor forma seria checar a versão do MDFe e não pelo campo FMDFe.rodo.RNTRC que é o RNTRC na versão 1.0. procedure TACBrMDFeDAMDFEFR.CarregaModalRodoviario; var i: integer; begin with cdsModalRodo, FMDFe.rodo do begin Append; FieldByName('RNTRC').AsString := RNTRC; FieldByName('CIOT').AsString := CIOT; if veicTracao.placa <> '' then begin FieldByName('placa').AsString := FormatarPlaca(veicTracao.placa); FieldByName('RENAVAM').AsString := veicTracao.RENAVAM; FieldByName('RNTRCProp').AsString := veicTracao.prop.RNTRC; for i := 0 to veicTracao.condutor.Count - 1 do begin // Alteração proposta por Maciel Goettms (27/02/2014) Concatenação dos condutores já adicionados. FieldByName('CPF').AsString := FieldByName('CPF').AsString + FormatarCPF(veicTracao.condutor.Items.CPF) + #13#10; FieldByName('xNome').AsString := FieldByName('xNome').AsString + veicTracao.condutor.Items.xNome + #13#10; end; end; for i := 0 to veicReboque.Count - 1 do begin FieldByName('placa').AsString := FieldByName('placa').AsString + #13#10 + FormatarPlaca(FMDFe.rodo.veicReboque.Items.placa); FieldByName('RENAVAM').AsString := FieldByName('RENAVAM').AsString + #13#10 + veicReboque.Items.RENAVAM; if FMDFe.rodo.RNTRC = '' FieldByName('RNTRCProp').AsString := FieldByName('RNTRCProp').AsString + #13#10 + IfThen(FMDFe.rodo.veicReboque.Items.prop.RNTRC <> '', FMDFe.rodo.veicReboque.Items.prop.RNTRC, FMDFe.rodo.infANTT.RNTRC); else FieldByName('RNTRCProp').AsString := FieldByName('RNTRCProp').AsString + #13#10 + IfThen(FMDFe.rodo.veicReboque.Items.prop.RNTRC <> '', FMDFe.rodo.veicReboque.Items.prop.RNTRC, FMDFe.rodo.RNTRC); end; Atenciosamente Sérgio ACBrMDFeDAMDFEFR.pas

Italo bom dia Em anexo a ACBrMDFeDAMDFeRLRetrato.pas, alterado apenas a informação em vermelho abaixo. procedure TfrlDAMDFeRLRetrato.rlb_2_RodoBeforePrint(Sender: TObject; var PrintIt: Boolean); var i: integer; begin inherited; rlb_2_Rodo.Enabled := (FMDFe.Ide.modal = moRodoviario); rlmPlaca.Lines.Clear; rlmPlaca.Lines.Add(FormatarPlaca(FMDFe.rodo.veicTracao.placa)); rlmRNTRC.Lines.Clear; if FMDFe.rodo.veicTracao.prop.RNTRC <> '' then rlmRNTRC.Lines.Add(FMDFe.rodo.veicTracao.prop.RNTRC) else if FMDFe.rodo.RNTRC = '' then rlmRNTRC.Lines.Add(FMDFe.rodo.infANTT.RNTRC) else rlmRNTRC.Lines.Add(FMDFe.rodo.RNTRC); for i := 0 to FMDFe.rodo.veicReboque.Count - 1 do begin rlmPlaca.Lines.Add(FormatarPlaca(FMDFe.rodo.veicReboque.Items.placa)); if FMDFe.rodo.veicReboque.Items.prop.RNTRC <> '' then rlmRNTRC.Lines.Add(FMDFe.rodo.veicReboque.Items.prop.RNTRC) else if FMDFe.rodo.RNTRC = '' then rlmRNTRC.Lines.Add(FMDFe.rodo.infANTT.RNTRC) else rlmRNTRC.Lines.Add(FMDFe.rodo.RNTRC); end; Atenciosamente Sérgio ACBrMDFeDAMDFeRLRetrato.pas

Valide seu XML aqui https://mdfe-portal.sefaz.rs.gov.br/Site/ValidadorXml Não apresentou erros. Talvez por estar usando dados fictícios, RNTRC = 0.

Você tem que infomar versão ve300. Não pode encerrar com versão ve100, mesmo o MDFe sendo anterior a implantação da versão 3.00. Isto resolve sua questão.

Boa tarde, isto não procede. Você averbará por carregamento ou por CTe enviados. Por carregamento, você tem um número de averbação. Por CTe enviados não. Normalmente você enviará no final do dia. PAMCARY se averba por carregamento. Porto Seguro, no final do dia, você envia os XML´s dos CTe e MDFe´s. Quem carrega containter averba normalmente por CTe, 1 só normalmente. Por isso agora no local da averbação você informará 99999, valor autorizado pela ANTT.

Boa noite, fiz esta alteração no DAMDFE - FORTES. Solicito atualizar o TRUNK e também implementar no DAMDFE - FASTREPORT. Quando o veículo é próprio, ou seja da Transportadora emitente do MDFe, o RNTRC não está sendo impresso. Como o veículo é da transportadora, os dados do proprietário e RNTRC não são obrigatórios e não são adicionados. A versão 2.0 usava FMDFe.rodo.RNTRC, mas agora é FMDFe.rodo.infANTT.RNTRC. A implementação que fez permitiu imprimir. Talvez a melhor forma seja checar a versão do XML, se for ve300 usar FMDFe.rodo.infANTT.RNTRC. Função alterada - FORTES. Necessário replicar no FASTREPORT. procedure TfrlDAMDFeRLRetrato.rlb_2_RodoBeforePrint(Sender: TObject; var PrintIt: Boolean); var i: integer; begin inherited; rlb_2_Rodo.Enabled := (FMDFe.Ide.modal = moRodoviario); rlmPlaca.Lines.Clear; rlmPlaca.Lines.Add(FormatarPlaca(FMDFe.rodo.veicTracao.placa)); rlmRNTRC.Lines.Clear; if FMDFe.rodo.veicTracao.prop.RNTRC <> '' then rlmRNTRC.Lines.Add(FMDFe.rodo.veicTracao.prop.RNTRC) else if FMDFe.rodo.RNTRC = '' then rlmRNTRC.Lines.Add(FMDFe.rodo.infANTT.RNTRC) else rlmRNTRC.Lines.Add(FMDFe.rodo.RNTRC); for i := 0 to FMDFe.rodo.veicReboque.Count - 1 do begin rlmPlaca.Lines.Add(FormatarPlaca(FMDFe.rodo.veicReboque.Items.placa)); if FMDFe.rodo.veicReboque.Items.prop.RNTRC <> '' then rlmRNTRC.Lines.Add(FMDFe.rodo.veicReboque.Items.prop.RNTRC) else if FMDFe.rodo.RNTRC = '' then rlmRNTRC.Lines.Add(FMDFe.rodo.infANTT.RNTRC) else rlmRNTRC.Lines.Add(FMDFe.rodo.RNTRC); end; Atenciosamente Sergio

Boa tarde, ontem, o webservice de São Paulo estava inoperante, em manutenção. Neste caso, para uma empresa credenciada em São Paulo, além da contigência, há alguma alternativa adicional? Atenciosamente Sérgio

E como você implementou? Como capturou o retorno e foi jogando em uma tabela, disponibilizando em um grid?

Boa tarde, utilizando o componente no modo silencioso, qual a melhore maneira de capturar os retornos e disponibilizar para os usuários? Alguém já implementou uma versão que fique no servidor executando como um robo de tempos e tempos e devolvendo os erros e êxitos para os usuários?

Esse erro acontece com Windows sem os update. Se fizer todos os updates do Windows, ele deixa de aparecer.

Boa tarde, fiz uma máquina virtual no VMWARE com Windows 7 e deu este erro também. Usando esta configuração. Peguei todas as dll´s atuais e coloquei na máquina atual ACBrCTe1.SSL.SSLType := LT_TLSv1_2; ACBrCTe1.Configuracoes.Geral.SSLCryptLib := CryWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrCTe1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; Erro persiste. Firewall desbloqueado, máquina virtual só tinha o TeamViewer.

Boa noite Eu estava obtendo o erro 12030 com certificado A1. ACBrCTe1.SSL.SSLType := LT_TLSv1_2; ->>>>> funciona sem erro. // ACBrCTe1.SSL.SSLType := LT_ALL; ->>>> gera o erro 12030 ACBrCTe1.Configuracoes.Geral.SSLCryptLib := CryWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrCTe1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; Uso esta configuração para A1 e A3, mas A3 somente clientes. Vou testar no computador de um cliente com A3.

Boa noite, acabei resolvendo da seguinte forma: - mudei os direitos do usuário que estava em um dominio - instalei registrando no system32 (máquina com windows 7 32 bits) msxml5.dll, msxml5r.dll e capicom.dll apesar de eu não utilizar CAPICOM.

Usando esta configuração ACBrCTe1.Configuracoes.Geral.SSLCryptLib := CryWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrCTe1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrCTe1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; Obtive erro ao validar o XML antes de enviar para a SEFAZ em um cliente com certificado A3. Importando no emissor gratuito, deu erro de assinatura. Assinei com o emissor e o cte foi enviado com sucesso pelo próprio. Exportei e verifiquei que a assinatura tinha diferenças. Alguma sugestão? Obrigado

Bom dia o tamanho de um lote de Cte é de 50 e o tamanho máximo é 500 kb. Tem alguma forma de verificar isto antes do envio ou a melhor forma é limitar a um número inferior e não se preocupar com este problema?

Boa noite, a versão atualizado do ACBRMDFe permite baixar o XML diretamente ou ainda não está implementado? Obrigado.

Concordo, validar não deveria assinar, mas quem fez isso é o culpado. Como todos viram que fazia isso, suprimiram a linha. OPEN SOURCE - devemos ter um log com as alterações e estas podem ficar no forum. A gente consulta com frequência. Esta mudança foi um grande erro para corrigir um outro erro feito no passado. Bastava colocar um aviso no Fórum. É um bom projeto, bons colaboradores, mas temos que também ser bem organizado.

Boa tarde, ao enviar uma coleção de CTe´s para a impressora, se colocar PRINTDIALOG:= True, ele abre para cada um dos CTe´s. Tem como fazer abrir só uma vez ou tenho que implementar o uso do print dialog externo antes? PDF - tem como gerar um PDF único para uma coleção de CTe? Ao enviar os conhecimentos para autenticação e retorno na receita, os arquivos de envio do webservice caem na mesma pasta do XML do CTe. Tem alguma configuração que permita jogar em pastas separadas? Atenciosamente Sergio

Boa tarde, estas mudanças são avisadas antes? Também tive este erro. Tinha visto que o validar já assinava e suprimi a linha e passou a dar erro.

Vou citar minha experiência com este erro 630. Dava a mensagem erro no schema. O damdfe, protocolo e data são armazenados, extraídos do XML após autenticação. Acontece que o usuário ou por alguma falha, faltava o último dígito do protocolo. O erro voltava como erro no schema, mas a falha era no número do protocolo faltando um dígito.