REST servidor em AdvPL
WSRESTFUL Ed619 ... END WSRESTFULDefine uma rota REST de resposta constante sem acesso a dados.
Visão geral
A classe WSRESTFUL declara os métodos; a implementação WSMETHOD trata a requisição e constrói a resposta. O nome da classe integra a URI conforme a configuração HTTP do AppServer. O recorte usa método GET nomeado, sem QueryString ou corpo de entrada, e retorna um JSON constante. Autenticação, TLS, empresa/filial e direitos devem ser configurados e homologados fora deste fonte; compilar o exemplo não os implementa. O TDN alerta que classes compiladas depois de HTTP_START podem exigir reinício para publicação: planeje isso operacionalmente, sem reiniciar um servidor apenas para testar este texto. (Fontes: refs. 1–3.)
Sintaxe
WSRESTFUL Ed619 ... END WSRESTFULExemplo comentado
#Include "TOTVS.ch"
#Include "RESTFul.ch"
WSRESTFUL Ed619 DESCRIPTION "Estado do exemplo editorial"
WSMETHOD GET STATUS DESCRIPTION "Estado do exemplo editorial" ;
WSSYNTAX "/Ed619/status" PATH "/status" PRODUCES APPLICATION_JSON
END WSRESTFUL
WSMETHOD GET STATUS WSSERVICE Ed619
// Resposta constante: sem dados de negocio ou credenciais.
Self:SetContentType("application/json")
Self:SetResponse('{"status":"ok"}')
Return .T.Em serviço homologado, GET da rota configurada retorna {"status":"ok"}. Não foi compilado, registrado ou chamado em AppServer. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
- Para dados reais, valide formato, limite paginação e confirme permissão por recurso e filial. Não use NOTENANT ou desative segurança como atalho.
- Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.