Buenas,
Hace tiempo, tuvimos un problema similar a este con un web api. Y por limitaciones de la versión de BP que teníamos en ese momento la mejor solución fue implementar la llamada por código con un WebRequest y pasandole nosotros mismos los headers.
En este caso, para los barear te valdría poniendo "Barear " + el token que te devuelva.
Al final, tengo la sensación de que si te sales del "ABC" tipico, los asistentes que te dan en BP son algo limitados y lo mas cómodo es tirar de un poco de código para solventarlo. Te pongo por aqui el código resumiedo por si te pudiera ayudar en algo:
Vas a necesitar pasarle los siguientes parametros:
addressUrl = Url donde está el recurso que vas a consultar.
token = el WTJSON que calculas con el método anterior.
body = Tu JSON que quieras tirale al API
resultData = Variable donde se va a almacenar lo que devuelva el metodo.
Dim request As WebRequest = WebRequest.Create(addressURL)
request.Headers.Add("Authorization", "Basic " & token)
request.Method = "POST"
request.ContentType = "application/json"
Dim requestStream As IO.Stream = request.GetRequestStream()
Using sw As New IO.StreamWriter(requestStream, New Text.UTF8Encoding(False))
sw.Write(body)
End Using
Using response As WebResponse = request.GetResponse()
Dim responseStream As IO.Stream = response.GetResponseStream()
Dim sr As New IO.StreamReader(responseStream)
resultData = sr.ReadToEnd()
End Using
Le faltan try catch y demás para que no se caiga a trozos. pero a modo de resumen creo que está completo
Espero que te haya ayudado.
------------------------------
Pablo Sarabia
Programmer
Altamira AM
------------------------------