Exemplo da Chamada no Delphi - Serviço 307
var
vDM: TDM_IntMovFin_Server;
begin
try
vDM := TDM_IntMovFin_Server.Create(Self);
vDM.CL_IntMovFin_.CreateDataSet;
vDM.CL_IntMovFin_.Insert;
{Carregar os campos do ClientDataSet}
vDM.CL_IntMovVinc_.CreateDataSet;
vDM.CL_IntMovVinc_.Insert;
{Carregar os campos do ClientDataSet}
vDM.Integra(1{código do usuário},
[vDM.CL_IntMovFin_.Data,
vDM.CL_IntMovVinc_.Data]);
finally
FreeAndNil(vDM);
end;
end;