ACBrBoletoAPI consulta erro Campo Carteira

[Thiago Duarte]

Olá,

Alguém sabe o que pode ser esse erro ao realizar a consulta de boletos via api do banco do brasil:

 JSON={"erros":[{"codigoMensagem":"4678420","versaoMensagem":"1","textoMensagem":"Campo Carteira preenchido com dados inv\u00e1lidos.","codigoRetorno":"9998"}]}

Estou preenchendo o campo carteira conforme o exemplo do arquivo na pasta do acbr:

Título ex campos:
     ACBrBoleto.Cedente.CodigoCedente        := '4863177';
     ACBrBoleto.Cedente.Convenio                := '1014051';
     ACBrBoleto.Cedente.Modalidade           := '35'; 
     Carteira                                := '17'; 
     EspecieDoc                                 := 'DM'; 

Editado 28 Junho, 2022 por Thiago Duarte

[TiagoTecchio]

Bom dia,

Seria uma consulta individual de boleto?

Se for o caso tenho feito assim e funciona:

//FGerador é uma instancia do acbrBoleto
FGerador.ListadeBoletos.Clear;
FGerador.Configuracoes.WebService.Filtro.Clear;
FGerador.Configuracoes.WebService.Operacao := tpConsultaDetalhe;
FGerador.Configuracoes.WebService.Filtro.indiceContinuidade := 0;
FGerador.Configuracoes.WebService.Filtro.indicadorSituacao := TACBrIndicadorSituacaoBoleto.isbBaixado;
if FTipoData = 1 then
begin
   FGerador.Configuracoes.WebService.Filtro.dataVencimento.DataInicio := FDataInicial;
   FGerador.Configuracoes.WebService.Filtro.dataVencimento.DataFinal  := FDataFinal;
end
else
begin
   FGerador.Configuracoes.WebService.Filtro.dataMovimento.DataInicio := FDataInicial;
   FGerador.Configuracoes.WebService.Filtro.dataMovimento.DataFinal  := FDataFinal;
end;
if FH.StrOk(FCPF) then
  FGerador.Configuracoes.WebService.Filtro.cnpjCpfPagador := FCPF;

// doc => TACBrTitulo;
doc := FGerador.CriarTituloNaLista;
doc.Carteira    := '17';
doc.NossoNumero := FCds.FieldByName('APINUMERO').AsString; // nosso número

ok := FGerador.EnviarBoleto;
if ok and (FGerador.ListaRetornoWeb.Count > 0) then
// etc....

 

[Thiago Duarte]

Em 30/06/2022 at 10:24, TiagoTecchio disse:

Bom dia,

Seria uma consulta individual de boleto?

Se for o caso tenho feito assim e funciona:

//FGerador é uma instancia do acbrBoleto
FGerador.ListadeBoletos.Clear;
FGerador.Configuracoes.WebService.Filtro.Clear;
FGerador.Configuracoes.WebService.Operacao := tpConsultaDetalhe;
FGerador.Configuracoes.WebService.Filtro.indiceContinuidade := 0;
FGerador.Configuracoes.WebService.Filtro.indicadorSituacao := TACBrIndicadorSituacaoBoleto.isbBaixado;
if FTipoData = 1 then
begin
   FGerador.Configuracoes.WebService.Filtro.dataVencimento.DataInicio := FDataInicial;
   FGerador.Configuracoes.WebService.Filtro.dataVencimento.DataFinal  := FDataFinal;
end
else
begin
   FGerador.Configuracoes.WebService.Filtro.dataMovimento.DataInicio := FDataInicial;
   FGerador.Configuracoes.WebService.Filtro.dataMovimento.DataFinal  := FDataFinal;
end;
if FH.StrOk(FCPF) then
  FGerador.Configuracoes.WebService.Filtro.cnpjCpfPagador := FCPF;

// doc => TACBrTitulo;
doc := FGerador.CriarTituloNaLista;
doc.Carteira    := '17';
doc.NossoNumero := FCds.FieldByName('APINUMERO').AsString; // nosso número

ok := FGerador.EnviarBoleto;
if ok and (FGerador.ListaRetornoWeb.Count > 0) then
// etc....

 

Deu certo, obrigado

[Renato Rubinho]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.