Simple REST Service for InterSystems Ensemble

User.RESTService.cls

Class mvk.production.DocRESTService Extends EnsLib.REST.Service
{

Parameter ADAPTER = "EnsLib.HTTP.InboundAdapter";

XData UrlMap [ XMLNamespace = "http://www.intersystems.com/urlmap" ]
{
<Routes>
<Route Url="/:test" Method="GET" Call="test"/>
</Routes>
}

Parameter EnsServicePrefix = "|";

Method test(pInput As %Library.AbstractStream, Output pOutput As %Stream.Object, test As %String) As %Status
{
	do pOutput.Write("Received:" _ test)
	quit $$$OK
}

}

addd