[Lazarus] gSOAP vs ws_helper.exe vs VMware

[Michael Joyner ᏩᏯ]

Michael Van Canneyt wrote:
>
>
> On Sun, 22 Nov 2009, Michael Joyner ᏩᏯ wrote:
>
>> I have tried using the ws_helper from the web services toolkit to 
>> import the WSDL file relating to vSphere, I end up with a *.pas file 
>> that only contains nothing of note beyond initial class registration. :(
>
> Did you request the other files ? You should end up with 3 files:
> mywsdl.pas
> urn_mywsdl.pas
> mywsdl_proxy.pas
>
> The _proxy file contains what you need to communicate with the service.
>
> Michael.
> ------------------------------------------------------------------------
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>   
Here are the four files:

//====================================================
{
This unit has been produced by ws_helper.
  Input unit name : "vimService".
  This unit name  : "vimService_binder".
  Date            : "23-11-09 08:01:15".
}
unit vimService_binder;
{$IFDEF FPC} {$mode objfpc}{$H+} {$ENDIF}
interface

uses SysUtils, Classes, base_service_intf, server_service_intf, vimService;

type


Implementation
uses TypInfo, wst_resources_imp,metadata_repository;

initialization

  {$i vimService.wst}

  {$IF DECLARED(Register_vimService_ServiceMetadata)}
  Register_vimService_ServiceMetadata();
  {$IFEND}

End.

//=================================================================
{
This unit has been produced by ws_helper.
  Input unit name : "vimService".
  This unit name  : "vimService_imp".
  Date            : "23-11-09 08:01:19".
}
Unit vimService_imp;
{$IFDEF FPC} {$mode objfpc}{$H+} {$ENDIF}
Interface

Uses SysUtils, Classes,
     base_service_intf, server_service_intf, server_service_imputils, 
vimService;

Type


Implementation
uses config_objects;

End.

//=================================================
{
This unit has been produced by ws_helper.
  Input unit name : "vimService".
  This unit name  : "vimService".
  Date            : "23-11-09 08:01:19".
}
unit vimService;
{$IFDEF FPC} {$mode objfpc}{$H+} {$ENDIF}
interface

uses SysUtils, Classes, TypInfo, base_service_intf, service_intf;

const
  sNAME_SPACE = 'urn:vim25Service';
  sUNIT_NAME = 'vimService';

type


  procedure Register_vimService_ServiceMetadata();

Implementation
uses metadata_repository;


procedure Register_vimService_ServiceMetadata();
var
  mm : IModuleMetadataMngr;
begin
  mm := GetModuleMetadataMngr();
  mm.SetRepositoryNameSpace(sUNIT_NAME, sNAME_SPACE);
end;


initialization


End.

//===========================================================

{
This unit has been produced by ws_helper.
  Input unit name : "vimService".
  This unit name  : "vimService_proxy".
  Date            : "23-11-09 08:01:12".
}

Unit vimService_proxy;
{$IFDEF FPC} {$mode objfpc}{$H+} {$ENDIF}
Interface

Uses SysUtils, Classes, TypInfo, base_service_intf, service_intf, 
vimService;

Type


Implementation
uses wst_resources_imp, metadata_repository;

initialization
  {$i vimService.wst}

  {$IF DECLARED(Register_vimService_ServiceMetadata)}
  Register_vimService_ServiceMetadata();
  {$IFEND}
End.

-- 
LyX: http://www.lyx.org/ OpenOffice: http://www.openoffice.org/
Inkscape: http://www.inkscape.org/ Scribus: http://www.scribus.net/
GIMP: http://www.gimp.org/ PDF: http://www.pdfforge.org/

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20091123/5511a025/attachment-0004.html>