Criei um serviço WSRESTFUL e apliquei no RPO utilizado para serviços REST. Ao consultar na lista de serviços disponíveis, o mesmo nao é apresentado.
Seguem as primeiras linhas do fonte
#include 'protheus.ch'
#include 'parmtype.ch'
#Include 'RestFul.ch'
#include 'TopConn.CH'
user Function WSITGCTE()
return
WSRESTFUL INTEGRACTE DESCRIPTION "Integrar CTEs"
WSMETHOD POST DESCRIPTION "Importacao de CTE" WSSYNTAX ""
WSMETHOD GET DESCRIPTION "Consulta CTE - Nao implementado." WSSYNTAX ""
END WSRESTFUL
WSMETHOD GET WSRECEIVE RECEIVE WSSERVICE INTEGRACTE
self:setContentType("text/html")
self:setResponse("<p>H</p>")
self:setStatus(200)
return .T.
WSMETHOD POST WSRECEIVE RECEIVE WSSERVICE INTEGRACTE
.
.
.
Return .T.