[Lazarus] gSOAP vs ws_helper.exe vs VMware
Michael Joyner ᏩᏯ
mjoyner at vbservices.net
Mon Nov 23 14:04:28 CET 2009
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>
More information about the Lazarus
mailing list