Perguntas Autenticacao Via API

Bom dia Pessoal,

Estou precisando da ajuda de voces para tentar resolver um problema de autenticação em uma rotina de API. Ele cai sempre nesta linha: Alert("GET - " + oRestClient:GetLastError())


Segue o fonte abaixo:
#include "TOTVS.CH"
#Include "RESTFUL.CH"
#include "topconn.ch"

User Function Autpecas1()

Local cUrl := "xxxxxxxxxxxxxxxxx"
Local cUser := "xxxxx"
Local cPass := "xxxxx"
Local oRestClient := FWRest():New(cUrl)
Local aHeader := {}

// inclui o campo Authorization no formato : na base64
Aadd(aHeader, "Authorization: Basic " + Encode64(cUser+":"+cPass))

/*GET */
oRestClient:SetPath(cUrl)

If oRestClient:Get(aHeader)
Alert("GET - " + oRestClient:GetResult())
Else
Alert("GET - " + oRestClient:GetLastError())
EndIf