Boleto via api sicoob - "Propriedade inesperada: (cpfCnpj.)"

[hugolmf]

Alguém sabe me dizer o que pode ser esse retorno ao tentar enviar um boleto em produção pelo sicoob

 

Retorno Envio: HTTPCode=406
Result={"mensagens":[{"mensagem":"Propriedade inesperada: (cpfCnpj.)","codigo":"0004"}]}

 

[Renato Rubinho]

Boa noite,

Analisando os fontes desse banco, antes do cpfCnpj ele espera a chave nome.

Se nome for de preenchimento obrigatório e você não preencher, pode ser o motivo do erro.

Confirme se está preenchendo a propriedade aTitulo.Sacado.SacadoAvalista.NomeAvalista

../trunk2/Fontes/ACBrBoleto/WS/ACBrBoletoW_Bancoob.pas

procedure TBoletoW_Bancoob.GerarBenificiarioFinal(AJson: TJsonObject);
var
  JsonSacadorAvalista: TJsonObject;
  JsonPairSacadorAvalista: TJSONPair;
begin
  if Assigned(aTitulo) then
  begin
    if aTitulo.Sacado.SacadoAvalista.CNPJCPF = EmptyStr then
      Exit;
    if Assigned(AJson) then
    begin
      JsonSacadorAvalista := TJsonObject.Create;
      try
        JsonSacadorAvalista.Add('nome').Value.asString       := aTitulo.Sacado.SacadoAvalista.NomeAvalista;
        JsonSacadorAvalista.Add('cpfCnpj').Value.asString    := OnlyNumber(aTitulo.Sacado.SacadoAvalista.CNPJCPF);
        JsonSacadorAvalista.Add('tipoPessoa').Value.asString := IfThen(Length(OnlyNumber(aTitulo.Sacado.SacadoAvalista.CNPJCPF)) = 11, 'FISICA', 'JURIDICA');

 

[hugolmf]

Em 11/08/2023 at 21:32, Renato Rubinho disse:

Boa noite,

Analisando os fontes desse banco, antes do cpfCnpj ele espera a chave nome.

Se nome for de preenchimento obrigatório e você não preencher, pode ser o motivo do erro.

Confirme se está preenchendo a propriedade aTitulo.Sacado.SacadoAvalista.NomeAvalista

../trunk2/Fontes/ACBrBoleto/WS/ACBrBoletoW_Bancoob.pas

procedure TBoletoW_Bancoob.GerarBenificiarioFinal(AJson: TJsonObject);
var
  JsonSacadorAvalista: TJsonObject;
  JsonPairSacadorAvalista: TJSONPair;
begin
  if Assigned(aTitulo) then
  begin
    if aTitulo.Sacado.SacadoAvalista.CNPJCPF = EmptyStr then
      Exit;
    if Assigned(AJson) then
    begin
      JsonSacadorAvalista := TJsonObject.Create;
      try
        JsonSacadorAvalista.Add('nome').Value.asString       := aTitulo.Sacado.SacadoAvalista.NomeAvalista;
        JsonSacadorAvalista.Add('cpfCnpj').Value.asString    := OnlyNumber(aTitulo.Sacado.SacadoAvalista.CNPJCPF);
        JsonSacadorAvalista.Add('tipoPessoa').Value.asString := IfThen(Length(OnlyNumber(aTitulo.Sacado.SacadoAvalista.CNPJCPF)) = 11, 'FISICA', 'JURIDICA');

 

Bom dia. Está preenchido. O comando enviar está como na imagem.

 

[hugolmf]

Consegui resolver atribuindo vazio para o cpfcnpj. Fazendo assim registrou o boleto. Se alguém tiver passando o mesmo problema, assim dá certo.

Quando estava fazendo teste do banco do brasil, funcionava informando o cpfcnpj normalmente, mas nesse do Sicoob tive que passar em branco para funcionar.

ACBrBoleto1.Cedente.CNPJCPF := '';

 

[Renato Rubinho]

Obrigado por reportar.

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