MARCELO RODRIGUES

Obrigado Juliana pela resposta, pensei que a unit podia não estar atualizando pelo SVN e talvez anexar aqui para download, mas exclui a unit e fiz o Update e trouxe ela normalmente, ainda estou estudando mas não sei o porque não está trazendo a UF na remessa, já testei com outros bancos e trazem a UF, já fiz ajustes nas fontes comparadas com as de outros bancos, mas apenas o Sicredi não traz. Quanto ao plano Pro tenho apenas um cliente que emite boleto, está usando hoje a CEF e está mudando para o Sicredi, então vou avaliar o custo tendo e vista que apenas este cliente com boleto. Obrigado mais uma vez e vou aguardando as respostas.

Usei o código do exemplo e mesmo assim não traz a UF, é possível atualizar minha unit ACBrBancoSicredi sem ser pelo SVN? Todas as alterações que fiz não surtiram efeito e estou precisando implementar esta cobrança com certa urgência.

Victor, quando debugo a variável UF recebe a informação, mas não vai para o arquivo de remessa, sinceramente não estou entendendo nada.

Estou usando o código abaixo mas mesmo assim não está colocando zero na posição 142 do segmento P, pois não haverá desconto, está sempre com 1. Vou verificar a UF novamente. DataDesconto := StrToDateDef(DataVencimento, 0); ValorDesconto := 0; CodigoDesconto := cdSemDesconto; TipoDesconto := tdNaoConcederDesconto;

Olá Victor! Primeiramente obrigado pela resposta, mas vamos lá, no manual pede nas posições 152 e 153 a UF no arquivo de remessa, mas mesmo passando esta informação conforme abaixo ela não vai para o arquivo, já abri as fontes e não achei nada que pudesse estar errado. Lembrando quando para CEF a UF aparece sem problemas. Meu código para gerar a remessa: Sacado.UF := ibqAssociadoUF.Value; Código da unit ACBrBancoSicredi: PadLeft(Sacado.UF, 2) + // 152 a 153 - Unidade da Federação Quanto ao desconto, como está sendo informado o código 1 pelo manual é obrigatório informar uma data, mas mesmo eu colocando o código abaixo com desconto zerado e a data do desconto a informação não vai para o arquivo. O que eu posso estar fazendo errado? DataDesconto := ibqBuscaBoletoDT_VENCIMENTO.Value; ValorDesconto := 0;

Pessoal, estou precisando muito de uma ajuda nas críticas abaixo, o UF não sai na remessa, já verifiquei tudo aqui e não sei o que acontece, acho que está passando alguma coisa que não consegui identificar, e também em relação ao código do desconto, que na verdade não terá o desconto. Alguém que já homologou poderia dar uma ajuda? Obrigado. *Foi indicado na posição circulada em vermelho a o código de desconto 1 - Valor fixo até a data informada, porém nos campos a seguir destacado em amarelo não foi informado a data limite de desconto do título e também não foi informado nos campos em azul o valor desse desconto. **Nas posições 152 e 153 faltou informar a UF.

Pessoal, preciso de uma ajuda, estou homologando boletos do Sicredi e após enviar um lote me retornaram com as seguintes criticas: *Foi indicado na posição circulada em vermelho a o código de desconto 1 - Valor fixo até a data informada, porém nos campos a seguir destacado em amarelo não foi informado a data limite de desconto do título e também não foi informado nos campos em azul o valor desse desconto. **Nas posições 152 e 153 faltou informar a UF. Critica Boletos: Nas posições destacadas em amarelo deve consta o número da ag (24). O interessante é que o UF sai no arquivo de remessa da CEF mas não sai do Sicredi. E a agência está informada na propriedade do componente, e o ValorDesconto coloquei como 0(zero). O que estou deixando passar? Conseguem me ajudar? Obrigado.

Obrigado Solivan, removi as linhas conforme informei e compilou sim, agora, quando atualizei acusou conflito na atualização do acbrBoletofcfortesfr.pas, o que pode ser? Marcelo

Pessoal boa noite! Atualizei meu ACBR e deu o seguinte erro na unit acbrBoletofcfortesfr: {$ENDIF} <<<<<<< .mine ACBrBoleto, ACBrBarCode, jpeg ; ======= ACBrBoleto ; >>>>>>> .r6512 Pedi a o aquivo mine.dcu e não consigo compilar. Se eu retirar estas linhas consigo compilar. Alguém pode me ajudar. Utilizo delphi7. Marcelo

Boa tarde! Tente colocar o dígito como zero ou o último digito da agência como dígito, fiz isto no Santander que tb não informa o dígito da agência e funcinou. T+ Marcelo

Boa tarde tarde! Dê uma olha no demo, vc que inserir os boletos na lista, se for de uma tabela faça uma while na tabela, segue abaixo um exemplo: ibqBuscaPagamento.First; //gerando o boleto ACBrBoleto1.ListadeBoletos.Clear; while not ibqBuscaPagamento.Eof do begin Titulo := ACBrBoleto1.CriarTituloNaLista; with Titulo do begin LocalPagamento := 'PAGAR PREFERENCIALMENTE NO BANCO SANTANDER'; Vencimento := ibqBuscaPagamentoDT_PAGTO_RECEB.Value; DataDocumento := Date; NumeroDocumento := IntToStr(ibqBuscaPagamentoID_PAGTOS_RECEB.Value); EspecieDoc := 'DM'; Aceite := atNao; DataProcessamento := Date; NossoNumero := IntToStr(ibqBuscaPagamentoID_PAGTOS_RECEB.Value); Carteira := '101'; ValorDocumento := ibqBuscaPagamentoVALOR.Value; Sacado.NomeSacado := ibqBuscaAlunoNOME.Value; Sacado.CNPJCPF := ibqBuscaAlunoCPF.Value; Sacado.Logradouro := ibqBuscaAlunoENDERECO.Value; Sacado.Numero := ibqBuscaAlunoNUM_END.Value; Sacado.Bairro := ibqBuscaAlunoBAIRRO.Value; Sacado.Cidade := ibqBuscaAlunoCIDADE.Value; Sacado.UF := ibqBuscaAlunoUF.Value; Sacado.CEP := ibqBuscaAlunoCEP.Value; Mensagem.Text := 'REFERENTE A:' + DBLookupComboBox1.Text + #13 + 'Após 1 dia cobrar mora diária de R$2,00 ' + #13 + 'Após 1 dia cobrar 4% de multa ' + #13 + 'Este boleto será protestado pelo banco após 15 dias de vencimento'; end; Marcelo

Resolvido, mapiei na rede uma pasta no servidor chamada LogoBanco e direcionei ela para z: nos clientes, no dirlog coloquei apenas z:. Obrigado pela ajuda. Marcelo

Obigado pelas dicas, ainda não tentei o compartilhamento, vou tentar e ver se vai dar certo.

Pessoal bom dia! Será que nínguém tem a reposta???? Toda vez que vou compilar tenho que trocar a logo no componente do formulário do boleto, como tenho clientes de bancos distintos estou tendo de fazer este procedimento toda vez que faço uma alteração no sistema. O ideal seria colocar a logo no servidor e o sistema buscar automaticamente. Marcelo

Pelo menos a CEF todos os arquivos vêem com nomes diferentes, uma vez que por padrão são salvos na mesma pasta acredito que não há esta possibilidade. Normalmente os arquivos vem com a referência do dia em que foram gerados, o que difere um do outro. Marcelo