Atenção: por essa edição ser muito antiga não há arquivo PDF para download. Os artigos dessa edição estão disponíveis somente através do formato HTML.
Web Services: dos conceitos à implementação
Parte 2 – Clientes CLX e web
Nesta segunda parte da nossa exploração dos web services, começaremos incluindo em nosso servidor um exemplo de transferência de datasets e depois mostraremos como criar clientes para web services, tanto convencionais como baseados na web.
Transferência de datasets
Um recurso muito útil, bastante facilitado com os web services é a transferência de datasets. Para ilustrar uma das formas de implementação desse recurso vamos definir mais uma interface em nosso servidor:
unit IHistoricoIntf;
interface
type
IHistorico = interface(IInvokable)
['{22EC0D1D-1EFB-4317-8E4F-5CC2667178A7}']
function GetHistorico: String; stdcall;
end;
implementation
uses InvokeRegistry;
initialization
InvRegistry.RegisterInterface(TypeInfo(IHistorico));
end.
Trata-se de uma declaração de interface muito simples – há apenas um método, GetHistorico, que retorna o conteúdo da tabela de histórico como uma string com formato XML/DataPacket:
unit IHistoricoImpl;
interface
uses InvokeRegistry, IHistoricoIntf,
SysUtils, WebBrokerSOAP, Midaslib;
...