如何在genero中调用webservice

《如何在genero中调用webservice》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、如何在Genero(Tiptop)中调用WebServices？1.什么是WebServices?它是一种构建应用程序的普遍模型，可以在任何支持网络通讯的操作系统中实施运行，它是一种新的web应用程序分支，是自包含、自描述、模块化的应用，可以发布、定位、通过web调用。WebService是一个应用组件，它逻辑性的为其他应用程序提供数据与服务，各应用程序通过网络协议和规定的一些标准数据格式(Http，XML，Soap)来访问WebService，通过WebService内部执行得到所需结果。WebService可以执行从简单的请求到

2、复杂商务处理的任何功能。一旦部署以后，其他WebService应用程序可以发现并调用它部署的服务。实际上，WebSerice的主要目标是跨平台的可互操作性。为了达到这一目标，WebService完全基于XML、XSD等独立于平台、独立于软件供应商的标准，是创建可互操作的、分布式应用程序的新平台。在以下三种情况下，使用WebService会带来极大的好处：1)跨防火墙的通讯2)应用程序集成3)B2B的集成4)软件和数据重用不过，也有一些情况，WebService根本不能带来任何好处。一、单机应用程序二、局域网的统购应用程序（此种集成，

3、使用DCOM比SOAP/HTTP效率高的多）2.背景说明鼎新的TiptopERP系统，采用法国4js公司的Genero开发工具，也就是俗称的第四代开发语音(4gl)，其前身来源于Informix数据库，后经过4js公司的扩展，目前已可以兼容多种数据库，比如重量级的Oracle，DB2等，还有一些轻量级的，如GeneroDB,mySQL等。因为Tiptop系统通常运行在Unix/Linux平台，跟基于SQLServer数据库的应用程序集成的时候便显得异常困难。虽然可以使用如Oracle的透明网关之类的解决方法，但是却受到颇多限制(Or

4、acle也只限Win平台)，因此使用WebService的方式就顺利成章了。所幸，Genero中已经提供了针对WebService的解决方案，而且相当的简单。本人使用的Tiptop版本为GP5.X。鼎新已经在其产品包中提供了很多关于WebServices的程序，本文不打算讨论这些针对ERP的WebServices，就从Genero的底层开始，探讨如何使用4gl调用WebService函数，来实现ERP数据跟另外一个系统（数据库平台为SQLServer）的同步。除了实现数据库同步外，还可以实现其他复杂的业务逻辑，本文仅抛砖引玉，如果你

5、有更好的方案，可以同作者交流。如果需在在Genero中提供WebService服务函数，另开文章探讨。3.测试本文档需要具备的条件？lIIS(InternetInformationServices)，WebServer，部署webservies的服务器lVisualStudio2005，开发WebServices服务函数。当然也可以使用其他开发工具开发，本文以C#为例说明。lGeneroStudio，开发客户端4gl程序，可以是其他工具，如UE、VI等。l程序要达到的目的：ERP有一个基本档aooi040，用来输入员工基本信息，员工

6、的工号为Key值，不允许在ERP中直接修改。程序最终看到的结果：在ERP中新增、修改、删除数据记录时，同时在另一个系统的SQLServer数据库的数据也会同步更新。SQLSERVER的数据结构如下：CREATETABLE[dbo].[Employee]([ID][int]IDENTITY(1,1)NOTNULL,[EmpCode][varchar](8)COLLATEChinese_PRC_CI_ASNOTNULL,[EmpName][varchar](30)COLLATEChinese_PRC_CI_ASNULL,[EmpDept

7、][varchar](6)COLLATEChinese_PRC_CI_ASNULL,[CreateDate][smalldatetime]NULL,CONSTRAINT[PK_Employee]PRIMARYKEYCLUSTERED([EmpCode]ASC)WITH(IGNORE_DUP_KEY=OFF)ON[PRIMARY])ON[PRIMARY]1.服务端程序的开发？1)创建ASP.NETWeb服务应用程序，如下图：2)程序代码如下：（省去中间IDE中处理若干）usingSystem;usingSystem.Data;usin

8、gSystem.Web;usingSystem.Collections;usingSystem.Web.Services;usingSystem.Web.Services.Protocols;usingSystem.Component