Juliomar Marchetti

Pergunta já que trabalha com Aquaviário viu o código comentado acima desse trecho? if FCTe.Ide.modal = mdAereo then begin rlmObsExcEmitente.Lines.Add( 'O transporte coberto por este conhecimento se rege pelo código brasileiro de aeronáutica. '+ 'O expedidor/remetente aceita como corretas todas as especificações impressas neste conhecimento,' ); rlmObsExcEmitente.Lines.Add( 'certificando que os artigos perigosos descritos pela regulamentação da ICAO foram devidamente '+ 'informados e acondicionados para transporte aéreo.' ); end; isso é necessário?

Boa tarde correções e implementações aplicadas ao código! favor testar. Obrigado.

Bom dia esse método é outro troque por gravar....

Com o Demo ocorre o mesmo?

Roda o exemplo e veja o funcionamento do mesmo. só assim para entender e ver.

Bom dia a nível de informação o Daniel subiu mudanças que resolve o problema

Bom dia vá na pasta de exemplos tem um para Boletos ele vai te mostrar como usar o componente

Bom dia na pasta de exemplos tem um projeto que exibe como fazer uma carta de correção! procedure TForm1.btnCartadeCorrecaoClick(Sender: TObject); var Chave, idLote, CNPJ, nSeqEvento, Correcao : string; begin if not(InputQuery('WebServices Eventos: Carta de Correção', 'Chave da NF-e', Chave)) then exit; Chave := Trim(OnlyNumber(Chave)); idLote := '1'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Identificador de controle do Lote de envio do Evento', idLote)) then exit; CNPJ := copy(Chave,7,14); if not(InputQuery('WebServices Eventos: Carta de Correção', 'CNPJ ou o CPF do autor do Evento', CNPJ)) then exit; nSeqEvento := '1'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Sequencial do evento para o mesmo tipo de evento', nSeqEvento)) then exit; Correcao := 'Correção a ser considerada, texto livre. A correção mais recente substitui as anteriores.'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Correção a ser considerada', Correcao)) then exit; ACBrNFe1.EventoNFe.Evento.Clear; with ACBrNFe1.EventoNFe.Evento.Add do begin infEvento.chNFe := Chave; infEvento.CNPJ := CNPJ; infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := StrToInt(nSeqEvento); infEvento.detEvento.xCorrecao := Correcao; end; ACBrNFe1.EnviarEvento(StrToInt(idLote)); MemoResp.Lines.Text := ACBrNFe1.WebServices.EnvEvento.RetWS; LoadXML(MemoResp, WBResposta); end;

Ocorre o mesmo com o exemplo?

Bom dia mais informações? Fast ou Fortes?

Veja esse erro é relacionado ao Fast Report! e não ao Fortes, por isso tu adicionando somente o ACBrNFeDanfeRL não ocorre o erro. também é preciso informar qual fr3 está usando

O que seria esse aplicativo?

Que marca que é essa impressora? assim podemos dizer se o ACBr é compatível.

Desabilita exibir mensagem! também verifique se não tem implementado dentro de sua aplicação muito application.processmessages

Carrega o xml original no componente! depois faz a consulta do xml ! veja o que vai acontecer.

Esse arquivo é gerado somente se você está usando o código do exemplo pois o componente não gera esse xml!!

Subi uma possível correção favor testar.

Anexe ele.

Ele é o sequencial para o banco de seus boletos. para não repetir

Boa tarde primeira situação a partir deste mês não damos mais suporte ao delphi 7 ! uma das primeiras sugestões é migrar de versão superior a 2009. tente reproduzir o mesmo usando o exemplo que tem no svn e nos repasse mais informações ou até mesmo logs do componente.

como você trata o salvamento e o retorno desses dados. tipo do datafield e etc.

Neste caso especifico você deverá de verificar junto ao sefaz o que está ocorrendo.

Boa tarde olhando os fontes é o mesmo campo para NF-e que faz para CT-e e demais componentes.

Acho que tem a mesma implementação para o CT-e! só não lembro se ele tem para o CT-e as configurações também.

Pra dizer isso só lendo o manual! em uma rápida olhada não fala nada se pode ou não pode. se sugere mudanças favor anexar aqui o fonte.