TOTVSTEC

Árvore de páginas

Comando: WSSERVICE

Inicia a declaração de uma classe (Server) de Web Services em AdvPL.


Sintaxe

WSSERVICE [ cServiceName], [ Description ], [ NameSpace ]


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
cServiceNameCaracterIndica o nome da classe que será declarada.Observação: A nomenclatura de um Web Services segue a regra de nomenclatura das funções AdvPL.
Description <cDescr>CaracterIndica a descrição da classe apresentada na janela de índice. Essa informação é fornecida também, junto do WSDL gerado pelo TOTVS Application Server para o serviço especificado.
NameSpace <cClsNS>CaracterIndica o namespace que o serviço será publicado.

Observações
  • Dentro da estrutura de um classe (Server) de Web Services, deve-se declarar os métodos disponibilizados da classe, propriedades, parâmetros e retornos utilizados. Para isso, utilize os comandos WSMETHOD e WSDATA.
  • Para encerrar a declaração da classe, utilize o comando ENDWSSERVICE.
  • Para utilizar este comando, é necessário declarar a include TOTVSWebSrv.ch no código-fonte AdvPL. 

 

A declaração de uma classe (Server) de Web Services, deve ter a seguinte estrutura básica:

WSSERVICE DESCRIPTION   NAMESPACE WSDATA AS (... demais propriedades, parâmetros e retornos ...)WSMETHOD (... demais métodos da classe ...)ENDWSSSERVICE(... fonte(s) do(s) método(s)s desta classe ...)

 


Exemplos 
#INCLUDE 'TOTVS.CH'#INCLUDE 'TOTVSWEBSRV.CH'WSSERVICE SERVERTIME       WSDATA Horario as String       WSMETHOD GetServerTimeENDWSSERVICE      WSMETHOD GetServerTime WSRECEIVE NULLPARAM WSSEND Horario WSSERVICE SERVERTIME      ::Horario := TIME()Return .T.

Abrangência
Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10

  • Sem rótulos