Ola.
Sim já tem o comando
oServer:Open( "POST",cUrl, .F. )
//3) Adicionar o request header
oServer:SetRequestHeader("Content-Type","application/json")
oServer:SetRequestHeader( "Username" , "&sUser")
oServer:SetRequestHeader( "Password" , "&sPassword")
oServer:Send()
oServer:WaitForResponse( 10000 )
Pode ser porque não sei como usar usuario ou password, ou seja não está sendo informado nada
Se colocar comentando as linhas do usuario e password mesma resposta.
Não sei qual usuario colocar e qual senha.