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 := '';  

A resposta provavelmente esta nesse tópico, depois dê uma olhada ai.
 

Consegui resolver. Fica aqui a solução, caso alguém tenha o mesmo problema. Pode fechar o tópico.
SOLUÇÃO:
try retorno := TstringStream.Create; params := nil; responseres := TStringlist.Create; //-------------------------------- IdHttp1.Request.CustomHeaders.Clear; IdHttp1.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' + txtAccessToken.Text; IdHttp1.Request.CustomHeaders.Values['x-integration-key'] := 'GYBtKWR5QjSwVxXXXxxXxXeUeOsUe0nOuc8HyTnyT1s'; IdHttp1.Request.CustomHeaders.Values['Content-Length'] := '0'; IdHttp1.Request.CustomHeaders.Values['Accept'] := '*/*'; IdHttp1.Request.CustomHeaders.Values['Accept-Encoding'] := 'gzip, deflate, br'; IdHttp1.Request.CustomHeaders.Values['Connection'] := 'keep-alive'; //-------------------------------- IdHTTP1.Request.ContentType := 'application/json'; IdHTTP1.Request.Charset := 'utf-8'; //-------------------------------- IdHTTP1.Post('https://api.onvio.com.br/dominio/integration/v1/activation/enable', params, retorno); JsonResponse := TJSONObject.ParseJsonValue(UTF8Decode(retorno.DataString)) as TJSONObject; IntegrationKey.Text := JsonResponse.GetValue<string>('integrationKey'); MemoJson.Lines.Text := FormatJSON(retorno.DataString); JsonToDataset(FDMemTable1, '['+retorno.DataString+']'); finally params.Free; responseres.Free; retorno.Free; JsonResponse.Free; end;