[Versão do Fortes Report]

Application.Initialize;

RLConsts.SetVersion(3,71,'B');

Esse codigo tem que ser no final do FORMULÁRIO principal do sistema, aqui ta dando certo

[Enviar Email SMTP ERRO: Login: ??? Erro 454 TLS]

Você ja instalou o opemssl? se não, instale e tente novamente.

[Problema ao imprimir o boleto]

Isso ja foi discutido no forum.

da uma olhada no topico: viewtopic.php?f=11&t=730

[Dúvida emissão boletos Itaú e Santander]

O codigo do cedente / convenio no banco itau nao é preciso, ocodigo de barras é montado apenas com a agencia e a conta.

da uma verificada nos fontes para tirar a duvida ou entao liguem para o 0800.

[Problema em propriedade do arquivo retorno]

Estou com a seguinte linha da minha rotina de arquivo retorno com problema:

CDSRetorno.FieldByName('DescricaoMotivoRejeicaoComando').AsString := ACBrBoleto.ListadeBoletos.Objects.DescricaoMotivoRejeicaoComando;

Esta dando o seguinte erro, depois da atualização do ACBrBoleto:

Incompatible types: 'String' and 'TStrings'

Alguém sabe o que devo fazer?

CDSRetorno.FieldByName('DescricaoMotivoRejeicaoComando').AsString := ACBrBoleto.ListadeBoletos.Objects.DescricaoMotivoRejeicaoComand.Text;

[ACBR Boleto - Novato!]

Vc tem que instalar ele e algum dos "visualizadores de boleto", pode ser qualquer uma das duas versões (fortes ou quick) ai sim vc pode rodar o demo

[ACBR Boleto - Novato!]

ACBrBoleto.dpk é o boleto em si, onde vc ira criar boletos, gerar arquivos de remessa dos boletos criados e tambem podera fazer a operação de receber aquivos (não sei quais bancos ja estão com essas funcionabilidades prontas) e podemos dizer que ACBrBoletoFC_Fortes.dpk é a visualização dos boletos inseridos no ACBrBoleto, no ACBrBoleto tem uma propriedade que relacina os dois, isso pq o ACBrBoleto permite que vc use tambem o quick reports para imprimir usando o ACBr_BoletoFC_Quick.dpk

Eu tambem usava o gbBoleto, deixei o codigo do gbboleto queto e fiz uma nova rotina para usar o acbrboleto, tudo que vc precisa pra saber usar o mesmo esta no demo.

[Erro ao abrir o exemplo do ACBrBoleto]

Você esta com fontes atualizados?

Se sim, desinstale todo o ACBr, apague as bpl e depois instale novamente.

[Boleto com e sem registro]

Na Carteira, esse informação você pega com o banco

[Alteração em ACBrBoletoFCFortesFr]

Pessoal, gostaria de propor a alteração a seguir:

Colocar os dados do sacado no recibo do sacado um pouco para direita.

Motivo: não precisar imprimir etiqueta para cada boleto, colocado o boleto nos envelopes que tem um plastico na frente.

Caso seja aceito a alteração segue em anexo os fontes.

ACBrBoletoFCFortesFr.rar

[ACBrETQ + Argox OS 214-plus]

Vlw Daniel, era isso mesmo, acabei de limpar a memória dela e ela voltou ao normal.

Muito obrigado cara.

[ACBrETQ + Argox OS 214-plus]

Pessoal, já descobri que não tem nada haver com o ACBr, mas gostaria saber se algum de vocês passou por isso:

Quando mando imprimir qualquer coisa na impressora, seja pelo acbr ou pelo windows, o papel esta sendo puxado ao contrario, tipo, em vez de ele sair da impressora, ele esta rebobinando o filme e o papel. Tipo o bobina esta rolando ao contrario.

Algum ai já passou por isso?

[ACbrECF.DadosReducaoZ]

Os fontes estão sim, eu atualzo quase semanalmente.

O Erro ocorreu justamente com o Demo, mas não testei com o emulador.

O Erro ocorria assim, tenho uma rotina para emissão da redução Z onde gravo algumas informações antes de efetuar a mesma, e uma dessas informações é o DadosReducaoZ, quando executo é gerado o erro. Como ja sabia do erro em meu sistema, não executei o procedimento pelo meu sistema, abri o demo e executei o DadosReducaoZ, ai ela retornava o erro "Lista of Index Blouds(6)".

Um Detalhe, depois de emitir a redução z eu executei um DadosUltimaReducaoZ, e ela foi gerado sem erro.

Vo baixar o emulador e tentar executar para ver se vai da erro.

[ACbrECF.DadosReducaoZ]

Pessoal quando uso o método dadosreducaoz do ACBrECF em uma Bematech MP 2100 TH FI esta retornando o erro "Lista of Index Blouds(6)".

Nao tive como debugar e tentar corrigir o erro pois o erro ocorreu em um cliente.

Alguem que tenha ai uma impressora dessas ai pode verificar o erro?

[Número do cartão para testes]

No visa vc pode usar qualquer numero que ele aceita.

Não lembro se no RedeCard é tudo 1 ou tudo 8, não sei, da uma testada ai!

[ACBrETQ]

Pessoal, mesmo alterando essa linha ai em cima, esta avançando mais do que eu informo.

[ACBrETQ]

Pessoal, esta tentando implementar impressão no ACBrETQ, e percebi que quando mando imprimir, esta avançando muito de uma linha para outra. Ai fui olhar o codigo e tem um avanco padrao de 220 mesmo que o avanco seja 0 (Sero).

procedure TACBrETQPpla.Imprimir(Copias: Integer = 1; AvancoEtq: Integer = 0);

var

   Temp, NCop : String;

begin

  Cmd := '';


  if (Temperatura < 0) or (Temperatura > 20) then

     Raise Exception.Create(ACBrStr('Informe um valor entre 0 e 20 para Temperatura'));

  Temp := IntToStrZero(Temperatura,2);


  if (Copias < 0) or (Copias > 9999) then

     Raise Exception.Create(ACBrStr('Tamanho máximo para o Número de Cópias 4 caracteres'));

  NCop := IntToStrZero(Copias,4);


  Cmd := STX + 'L' + CRLF + STX + Unidade + CRLF + 'H' + Temp + CRLF + 'D11' + CRLF +

         'Q' + NCop;


  {Inserindo comando iniciais na posicao Zero}

  ListaCmd.Insert(0, Cmd);


  Cmd := '';

  if AvancoEtq = 0 then

     AvancoEtq := Avanco;

  if (AvancoEtq < 0) or (AvancoEtq > 779) then

     Raise Exception.Create(ACBrStr('O Valor máximo para o Avanço de Etiquetas é 779'));


  AvancoEtq := AvancoEtq + 220; //nesta Linha


  Cmd := 'E' + CRLF + STX + 'f' + IntToStr(AvancoEtq) + CRLF ;


  if LimparMemoria then

    Cmd := Cmd + STX + 'Q' ;


  ListaCmd.Add(Cmd);


  fpDevice.EnviaString(ListaCmd.Text);

  ListaCmd.Clear;

end;

Queria ver a possibilidade de alterar essa linha, para o avanço padrão ser 0 (zero).

O que vcs me dizem?

[Versão do Fortes Report]

Pessoal, baixei a versão do fortes do sourceforge, e quando estou emitindo um boleto esta dando a seguinte mensagem:

"Sistema não esta de acordo com a versão do fortes report.

Versão atual: 3.70b"

Alguem tem alguma luz ai pra min dar?

o engraçado é que o acbrboletofcfortes instalou sem nehum problema, mas sempre quando mando imprimir um boleto sai msg na tela.

[Registro C114]

Alguem poderia fazer apenas o teste para ver se é algum erro no meu código ou realmente no componente?

[Registro C114]

Pessoal, não sei se estou fazendo algo de errado, mas sempre quando adicionar um novo registro c114 é gerado um erro de list of index bounds(-1).

Codigo:

with RegistroC114New do

begin

  COD_MOD := DM.IbCupomNota.FieldByName('MODELO').AsString;

  ECF_FAB   := DM.IbCupomNota.FieldByName('MODELO').AsString;

  ECF_CX    := DM.IbCupomNota.FieldByName('PDV').AsString;

  NUM_DOC := DM.IbCupomNota.FieldByName('CUPOM').AsString;

  DT_DOC   := DM.IbCupomNota.FieldByName('DATA_EMISSAO').AsDateTime;

end;

Alguma Dica?

[Homologação TEF Dedicado]

A propriedade retantar do ACBrECF esta false ou true?

Provavelmente deva estar true, coloque ela para false e faço novos teste.

[Boleto sem Fortes Report]

Acho estranho esse requerimento do Fortes, vc Deve apenas instalar o ACBrBoleto e Depois o ACBrBoletoFCQuick, não precisa instalar o ACBrBoeltoFCFortes não.

Aqui uma certa vez instalei apenas o ACBrBoleto para testar a geração do arquivo de remessa.

[Boleto sem Fortes Report]

Se vc tiver o quickreports instalado no seu delphi, vc pode usar o ACBrBoletoFcQuick, ele é a versão de impressão para quick reports do ACBrBoleto.

Lembrando que a versão do fortes é mais completa, so testando para perceber as diferenças.

[ACBrBoletoFCFortes]

Pessoal, precisei fazer um alteração para os boletos da caixa serem homologados, no campo Código cedente na impressão estava sendo impresso a agencia e a conta do cedente, mas quando mandei estes boletos para homologação eles me retornaram que ali deveria ser impresso a agencia e o Código do cedente.

Assim tive que alterar o ACBrBoletoFCFortes, na linha 552 que era assim:

      txtCodigoCedente2.Caption       := Cedente.Agencia+'-'+Cedente.AgenciaDigito+'/'+ Cedente.Conta+'-'+Cedente.ContaDigito;

passou a ser assim:

      if Banco.Numero = 104 then

        txtCodigoCedente2.Caption       := CodCedente

      else

        txtCodigoCedente2.Caption       := Cedente.Agencia+'-'+Cedente.AgenciaDigito+'/'+ Cedente.Conta+'-'+Cedente.ContaDigito;

Queria ver se a possibilidade dessas alterações junto os fontes do projeto.

[Implementações no AcbrBoleto]

Falando em ACBrBoletoCEF, mandei uma bateria de teste para o pessoa da CEF e eles me retornaram que estava com erro no boleto, que no campo impresso codigo cedente estava saido a agencia / conta, isso eu ate ja tinha visto, algum sabe dizer se isso realmente procede ou eh cheminho dele?

Se proceder vo tentar alterar os fontes e posto aqui.