REST servidor en AdvPL
WSRESTFUL Ed619 ... END WSRESTFULDefine ruta REST de respuesta constante sin acceso a datos.
Descripción general
WSRESTFUL declara métodos y WSMETHOD procesa solicitud/respuesta. Nombre de clase integra URI según configuración HTTP del AppServer. El recorte usa GET nombrado sin QueryString ni cuerpo y devuelve JSON constante. Autenticación, TLS, empresa/filial y derechos requieren configuración/homologación externa: compilar no los implementa. TDN advierte posible reinicio para clases compiladas tras HTTP_START; planifíquelo operativamente, sin reiniciar servidor solo por este texto. (Fuentes: refs. 1–3.)
Sintaxis
WSRESTFUL Ed619 ... END WSRESTFULEjemplo comentado
#Include "TOTVS.ch"
#Include "RESTFul.ch"
WSRESTFUL Ed619 DESCRIPTION "Estado del ejemplo editorial"
WSMETHOD GET STATUS DESCRIPTION "Estado del ejemplo editorial" ;
WSSYNTAX "/Ed619/status" PATH "/status" PRODUCES APPLICATION_JSON
END WSRESTFUL
WSMETHOD GET STATUS WSSERVICE Ed619
// Respuesta constante: sin datos de negocio ni credenciales.
Self:SetContentType("application/json")
Self:SetResponse('{"status":"ok"}')
Return .T.En servicio homologado GET de ruta configurada retorna {"status":"ok"}. No fue compilado, registrado ni llamado en AppServer. En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.
- Para datos reales valide formato, limite paginación y compruebe permisos por recurso/filial. No use NOTENANT ni desactive seguridad como atajo.
- En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.

Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.