SEI-INFO

Estou com o mesmo problema MA, pelo que vi é o único estado que ainda usa o Ambiente Nacional.

Desculpe a demora em responder, acabei não conseguindo testar pois o instalador ACBrInstall_Trunk2 está comentando automaticamente a diretiva {$DEFINE USE_ACBr_XMLDOCUMENT} conforme abri o tópico:

Observei que mesmo descomentando {$DEFINE USE_ACBr_XMLDOCUMENT} o instalador ACBrInstall_Trunk2 está comentando {.$DEFINE USE_ACBr_XMLDOCUMENT} de forma automática. Ainda não está disponível a nova forma de leitura/escrita de XML ?

Segue o arquivo já alterado para apreciação e posterior alteração no fonte principal. ACBrMDFe.XmlWriter.pas

Observei que ao iniciar o uso da diretiva USE_ACBr_XMLDOCUMENT Na unit ACBrMDFe.XmlWriter está sempre gerando o grupo valePed, comparando com a unit pmdfeMDFeW existe uma condição if MDFe.rodo.valePed.disp.Count > 0 then Para indicar gerar o grupo, inexistente na ACBrMDFe.XmlWriter -> procedure Gerar_ValePedagio

Apaguei os arquivos e coloquei para para fazer um novo UPDATE e os reports mudaram. Grato pela atenção.

Qual a solução para que eu consiga estar igual essa versão aí?

Pronto, Fiz a limpeza com o apagarAcbr.bat; Fiz o SVN Update, conforme imagem em anexo (versão 21877); Instalei o ACBR novamente, com sucesso; Copiei os reports da pasta \AC\Exemplos\ACBrBoleto\Delphi\Report sobrescrevendo os que eu havia modificado; Fiz um clean no projeto e um build; Ao imprimir o boleto saiu da forma que eu entendo como errado, conforme anexo. Se os códigos que destaquei nesse tópico estão certos a correção/atualização dos reports se faz necessária. Desde já agradeço a atenção.

Grato pela resposta. Atualizei há 4 dias, no dia 14/05/2021. Mas irei atualizar novamente.

Debugando para entender por quê o número da Agencia se repetia na impressão do boleto no campo "Agência/Código do Beneficiário" percebi que nesse trecho há uma concatenação, da Agencia+Conta sendo preenchido no campo Código do Cedente unit ACBrBoleto; function TACBrBancoClass.MontarCampoCodigoCedente(const ACBrTitulo: TACBrTitulo): String; begin Result := ACBrTitulo.ACBrBoleto.Cedente.Agencia+'-'+ ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito+'/'+ ACBrTitulo.ACBrBoleto.Cedente.Conta+'-'+ ACBrTitulo.ACBrBoleto.Cedente.ContaDigito; end; E o código da Agencia já tem seu campo própio. unit ACBrBoletoFCFR; FieldByName('Nome').AsString := Cedente.Nome; FieldByName('CodigoCedente').AsString := Banco.MontarCampoCodigoCedente(Titulo); // Cedente.CodigoCedente; FieldByName('CodigoTransmissao').AsString := Cedente.CodigoTransmissao; FieldByName('Agencia').AsString := Cedente.Agencia; FieldByName('AgenciaDigito').AsString := Cedente.AgenciaDigito; Sendo assim eu alterei os Reports, removendo a agencia, já que a informação já está vindo junto com o código do Cedente. Antes estava assim: [Cedente."Agencia"]/[Cedente."CodigoCedente"] Deixei assim: [Cedente."CodigoCedente"] Caso concordem que está certo, atualizar os reports no repositório para colaboração geral. Boleto.fr3 BoletoFatura.fr3 BoletoFR.fr3

Correto Italo, o RNTRC do meu caso que é do proprietário do veiculo é obrigatório. Sendo assim é problema de informação.

Estou com esse problema também, onde o transportador não tem o RNTRC e até dia 14/10/2018 estava emitindo normalmente e agora quando da erro quando não informa. Sendo que as regras que e 681 e 682 são apenas quando o RNTRC for informado,

E quanto a Daruma vai ser possível? Grato pela atenção!

Você já fez a implementação para a impressora CIS PR 1800? Estou precisando implementar e não sei por onde começar!

Até onde eu sei o banco de dados é MySql

Eu faço o seguinte, quando já autorizei a NFCe verifico se existe cartão pendente na venda em seguida mando imprimir e depois confirmar, detalhe nesse momento é que eu envio o sEstadoECF= 'L', antes de imprimir. if fnExisteComprovanteTEF then // Se Existe Comprovante TEF Irá entrar na rotina de impressão. begin DM.sEstadoECF := 'L'; DM.ACBrTEFD.ImprimirTransacoesPendentes; DM.ACBrTEFD.ConfirmarTransacoesPendentes; end; Abraços. Quem ajuda, Será Ajudado..

sergiowilson.sp Descobri meio que na unha, no Evento onInfoECF inclui o seguinte código, simulando uma resposta do ECF Begin case Operacao of ineSubTotal: begin RetornoECF := ValorFloat(frmFormaPgto.lblLiquido.Caption, 2); //Informo que ao valor Total da Venda já com desconto. end; ineTotalAPagar: RetornoECF := '0'; //Como informo Pagamento a Pagamento para o TEF não existe valor a pagar no meu programa. ineEstadoECF: RetornoECF := sEstadoECF; //Variavel Global End; O grande segredo é sempre antes de fazer algum procedimento informar qual é o estado do ECF, como por exemplo antes do ACBRTEFD.CRT informo que a Variável Global sEStadoECF = "P", ou seja, simulo que o ECF está no Estado (Pagamento). O Estado que mais uso é "L" pois informo que o ECF está livre, permitindo o componente imprimir os comprovantes. Em muitos eventos informei que o RetornoECF := 1, ou seja, deu certo, Já a impressão criei um método extra, para imprimir linha por linha, no teste onde pede para trocar o papel (por falta de papel), ao confirmar no programa que deseja continuar a impressão deve continuar de onde parou. No metodo onComandaECFImprimiVia o ACBRTEFD retorna o comprovante em (ImagemComprovante.Text), eu trato e mando ACBrPosPrinter.ImprimirLinha('</ae>' + ImagemComprovante.Text); Com isso é impresso o comprovante. Espero tê-lo ajudado, pois sofri alguns dias para entender essa logica de emular o ECF. Abraços. Quem ajuda, Será Ajudado..

Regys, obrigado pela sua atenção. Eu compreendo a respeito dos eventos, agora não faço a minima ideia em emular ECF. Caso alguém possa me dar alguma informação de como fazer isso, ficarei muito grato., Pois estou empacado no CNC (para pegar e imprimir o comprovante) e pegar os Retornos do ADM (também para saber o resultado e imprimir algum comprovante caso seja necessário). Desde já agradeço a cooperação;

Revendo o Demo encontrei a solução no Evento 'OnAntesFinalizarRequisicao', onde informei if Req.Header = 'CRT' then Req.GravaInformacao(500, 0, '1'); Com isso o Acbr enviou para o Gerenciador Padrão a informação que eu precisava,

Eu tenho sentido dificuldade em alguns procedimentos, como por exemplo (ACBrTEFD.CRT), pois ao iniciar a função um dos primeiros métodos que ele aciona é VerificarTransacaoPagamento( Valor ); Que na pratica é Verificar o status do ECF, porém não há o componente ACBRECF e nem o ECF. Entre outros eventos que são vinculados ao ECF. Obrigado pela atenção.

Olá a todos, Na Homologação da CAPPTA tem a "Opção de Integração Direta via Modalidade (Campo 500)", Testes 34 a 38. Observei que no método CRT não há opção para indicar a Modalidade (Credito, Debito, ECT) incluindo na requisição ao GP o campo 500 com as informações (1-Credito, 2- Debito ...). Alguém conseguiu algo nesse quesito? Pois ficaria ótimo o software já enviar para o TEF o tipo de cartão a ser passado ficando mesmo responsável apenas de passar o cartão e a senha. Obg.