Fórum Como gerar arquivo de remessa utilizando o RLBoleto? #336812
26/01/2007
0
Bom dia, estou com o seguinte problema, eu gero meus boletos normalmente utilizando o rlboleto e ate entao nossas cobranças nao eram registradas, dai dispensaria a geração do arquivo de remessa. Bom agora isso mudou temos cobrança registrada e quando eu tento gerar o arquivo de remessa da um erro. O banco é o Bradesco e logo abaixo segue trecho do codigo.
RLBRemessa1.Titulos.Count := pk_faturas.Count;
RLBRemessa1.NomeArquivo := ´CB´+FloatToStr(DayOf(date))+FloatToStr(MonthOf(date))+´01´+´.REM´;
for i:=0 to ord(pk_faturas.Count)-1 do
begin
{rotina de preenchimento e impressao do boleto}
RLBRemessa1.Titulos.Add(RLBTitulo1);
end;
RLBRemessa1.GerarRemessa;
Quando é chamada funcao GerarRemessa tenho o numero de boletos igual ao que fora gerado, mas dentro desse procedimento quando chama ele faz uma chamada para ACodigoBanco := Formatar(Titulos[0].Cedente.ContaBancaria.Banco.Codigo,3,false,´0´); ele da um erro.
Alguem pode me ajudar?
Agradeço desde já.
RLBRemessa1.Titulos.Count := pk_faturas.Count;
RLBRemessa1.NomeArquivo := ´CB´+FloatToStr(DayOf(date))+FloatToStr(MonthOf(date))+´01´+´.REM´;
for i:=0 to ord(pk_faturas.Count)-1 do
begin
{rotina de preenchimento e impressao do boleto}
RLBRemessa1.Titulos.Add(RLBTitulo1);
end;
RLBRemessa1.GerarRemessa;
Quando é chamada funcao GerarRemessa tenho o numero de boletos igual ao que fora gerado, mas dentro desse procedimento quando chama ele faz uma chamada para ACodigoBanco := Formatar(Titulos[0].Cedente.ContaBancaria.Banco.Codigo,3,false,´0´); ele da um erro.
Alguem pode me ajudar?
Agradeço desde já.
Luciano Andrade
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)