Retorno Boleto Sicred API

[rafmattos]

Boa tarde pessoal, estou fazendo o retorno de boleto do sicred usando api do registro online, registrar funcionou blz, mas para consultar está dando a mesma rotina com o BB está funcionando.

 

   Boleto := ACBrBoleto1;
   FiltrosAPI := Boleto.Configuracoes.WebService.Filtro;
   FiltrosAPI.Clear;
   FiltrosAPI.indicadorSituacao        := isbBaixado;
   FiltrosAPI.dataMovimento.DataInicio := StrToDate(mskDTINI.Text);
   FiltrosAPI.dataMovimento.DataFinal  := StrToDate(mskDTFIM.Text);
   Boleto.Configuracoes.WebService.Operacao := tpConsulta;
   Boleto.Enviar;
   Retorno := Boleto.ListaConsultaRetornoWeb;

[Juliomar Marchetti]

AV é objeto não criado ou destruido

[rafmattos]

debugando o erro da aqui nessa linha, já tentei jogar as dll OpenSSL, mas ainda não consegui

 

[Juliomar Marchetti]

nessa linha antes tu entra com F7 nela?

[rafmattos]

25 minutos atrás, Juliomar Marchetti disse:

nessa linha antes tu entra com F7 nela?

fui debugando e ultima linha que parou foi essa

 

  aNossoNumero  := OnlyNumber( ATitulo.ACBrBoleto.Banco.MontarCampoNossoNumero(ATitulo));

 

[rafmattos]

o ATitulo não está criando no momento dessa chamada 

aNossoNumero  := OnlyNumber( ATitulo.ACBrBoleto.Banco.MontarCampoNossoNumero(ATitulo));

[Juliomar Marchetti]

1 hora atrás, rafmattos disse:

o ATitulo não está criando no momento dessa chamada 

aNossoNumero  := OnlyNumber( ATitulo.ACBrBoleto.Banco.MontarCampoNossoNumero(ATitulo));

acbr atualizado e rodado o instalador?

[rafmattos]

28 minutos atrás, Juliomar Marchetti disse:

acbr atualizado e rodado o instalador?

sim pelo instalador, até baixei de novo tudo

 

  if Assigned(ATitulo) then
    aNossoNumero  := OnlyNumber( ATitulo.ACBrBoleto.Banco.MontarCampoNossoNumero(ATitulo));

agora deu certo verificando se esta estanciado 

[rafmattos]

Resolvido, if Assigned(ATitulo) then, na unit ACBrBoletoW_Sicredi_API;

[Juliomar Marchetti]

não tem erro no componente.

tu está usando de forma errada e acabou de marcar para o arquivo não atualizar caso seja feito melhorias.

sugiro reverter o svn.

rodar o instalador, deixar marcado a opção deixar somente LibXX