pb调用webservice.doc

webservice服务器端会提供wsdl接口文档，pb里面用web   service   proxy   wizard从wsdl生成对象，再调用即可(注意把c:\program   files\sybase\shared\powerbuilder下面的pbsoapclient90.pbd加入target)，代码样例：
SoapConnection   lsc_conn
soapservice   lproxy_obj
String   ls_proxy_name   =   "soapservice "//生成的代理对象名称
String   ls_url   =   "http://localhost:8080/axis/services/SoapService "//web   service   url
//
lsc_conn   =   Create   SoapConnection
lsc_conn.SetOptions( "SoapLog=~ "soaplog.txt~ " ")

int   li_ret,   i
li_ret   =   lsc_conn.Createinstance(   lproxy_obj,   ls_proxy_name,   ls_url)
If   li_ret   <>   0   Then
MessageBox( "错误 ",   "调用失败，错误号码： "   +   String(li_ret))
Return  
End   If

tns1__requestcontent   lst_request
lst_request.arg1   =   5
lst_request.arg2   =   "test "

tns1__returnresult   lst_result
lst_result   =   lproxy_obj.GetResult(lst_request)

MessageBox(String(lst_result.result),   "code: "   +   lst_result.reason.code   +   "~nmessage: "   +   &
lst_result.reason.message   +   "~ndesc: "   +   lst_result.reason.desc   )
注意pb调用webservice只能返回简单的int   string类型，复杂的结构会出错

怎么样在pb9里面调用WebService
pb9也出来了，速度够快的，大概看了一下，与pb8比较，增加的功能不多，主要是WebService,Xml和Ejb.我就感受了一下pb9的WebService功能，与大家共享。
我们用一个实例来说明：
新建应用,这些步骤与pb8一致的。然后建立一个WebService Proxy Wizard,下一步会提示你输入WSDL文件，点击浏览选择，假设是C:\inetpub\wwwroot\的service1.wsdl文件。点击下一步，会自动出现WSDL文件中的Service.点击下一步，系统默认选择ServiceSoap，紧接着输入proxy name(代理对象名)，输入test_ws.后面的几项按默认即可。
完成后是编译代理对象的界面。会出现：
Web Service Generator Project Status
Deployment PBL: E:\program\pb\webservice\w_app.pbl
Clear PBL on build: No
Confirm overwrites: No
WSDL Location: file://E:\program\pb\webservice\service1.wsdl
Services selected :
Service Service1:
Service1Soap
可以在属性中设置，也可以不用去管。点击编译的绿色图标，好了，一个代理对象生成了。
在左边的treeview中可以看到如:test_wsservice1soap的东西。
点击加号的图标，在function中可以看到里面的我们定义的show(string yourname) returns string.
好了最重要的一步已经完成了，我们来测试一下：
建一个windows，添加一个文本框和按钮控件。
在cb_1.click事件写入：
SoapConnection conn
Test_wsservice1soap test_ws
long rVal
//string str_endpoint
//str_endpoint = "http://localhost/webserver/service1.asmx?WSDL"
conn = create SoapConnection
rVal = Conn.CreateInstance(test_ws, "test_wsservice1soap")
sle_1.text = test_ws.show("你的参与是我们最大的支持")
destroy conn
好了，保存，会提示SoapConnection未定义。
增加PBSoapClient90.pbd到库列表中。PBSoapClient90.pbd在pb安装目录下 Shared\PowerBuilder。增加后左边treeview会出现soapconnection，SOAP server
soapexception 两个对象.
运行，点击按钮，文本框中出现欢迎你的参与是我们最大的支持
注意的是:Service1.asmx文件在服务器上是可以运行的，否则不会出现东西的。
添加PBSoapClient90.pbd和引用webservice
作者:feique123 2009-10-10 15:06 星期六 晴
1、　　PBSoapClient90.pbd在pb安装目录下 Shared\PowerBuilder。在pb的tree中的target属性中添加。增加后左边treeview会出现soapconnection，SOAP server soapexception 两个对象.。

2、在一个按钮的click事件中写的如下例子。
SoapConnection conn
Test_wsservicesoap test_ws
long rVal
conn = create SoapConnection
rVal = Conn.CreateInstance(test_ws, "test_wsservicesoap")
sle_1.text =string(test_ws.jihe("select * from t_user", "t_user"))
destroy conn
注：test_ws为代理对象名
3、要想在pb中用webservice必须要建一个webservice，其引用的wsdl文件，应该是pb所在机器上访问到的wsdl文件，也就是所能访问的webservice服务。PBDOM操作XML文档轻松入门（Easy XML with PowerBuilder Document Object Model)
（作者:Terry Voth、JohnStrano）

(根据 翻译整理)

本文对PBDOM技术进行相关介绍，但并不涉及XML的基础知识，建议阅读者对下述相关术语有一定了解：Document（文档）, DTD（文档类型定义）, schema（大纲），Element（元素）, attribute（属性）, processing instruction（处理命令）, entity（实体）。

本文主要包括以下内容：
1、为什么要使用PBDOM以及怎样创建PBDOM
2、PBDOM主要用于那些地方
3、如何使用PBDOM编程
4、PBDOM和其他XML解析(parser)技术的比较

一、什么是DOM
◆文档对象模型（Document Object Model）
1、作为一项W3C规范，XML DOM存在目的是为不同类型的应用程序提供一个标准的编程接口，它被设计可以跨平台、跨语言使用。
2、我们可以利用XML DOM创建XML文档并操纵其结构，增加、修改、删除元素。
3、程序中调用XML解析器载入XML文档到内存中。当文档被载入后，可以通过进入DOM检索和操作相关信息。
4、DOM 保存了XML文档树，文档（document）元素位于整棵树的最顶层。该元素可以有一到多个子节点来保存树的结构。

可以参阅以下网站： 来了解更多的关于XML Document Object Model的内容。

二、什么时候应该使用DOM工具
◆当你需要做下列事情的时候,你应该想到XML DOM的

1、在一个或者多个XML文档之间移动元素
2、创建新的元素并且在XML文档的任意位置插入
3、操作元素并重新插入其到XML文档其他位置
4、导入内嵌数据结构

& . pb9中，数据窗口现在可以通过XML导出内嵌数据结构（nested data structures）.

三、什么是PBDOM
◆PowerBuilder 文档结构模型（PowerBuilder Document Object Model）

1、PBDOM是通过PBNI扩展出来的，用于操作XML数据，并针对PowerScript作了优化
2、在程序中模型是通过DOM的抽象来表示XML数据。（A programming model to represent XML data –an abstraction of DOM）
3、底层是对Apache Xerces/C++的封装。

四、PBDOM的设计目标

1、简单易用（Be straightforward for PowerBuilder programmers）
2、可以利用PowerScript的强大语言能力（如对象、方法重载、数据等）
3、在可能的情况下，隐藏了XML底层的复杂实现（Hide the complexities of XML wherever possible）
4、原有的DOM在pb下使用不够直观（DOM is unintuitive to a PowerBuilder programmer）

五、使用PBDOM初步
◆PBDOM设置
1、添加pbdom90.pbd(%SYBASE%\Shared\PowerBuilder)到工程的pbl列表中
2、%SYBASE%\Shared\PowerBuilder应该在系统路径或者应用程序的路径中(也就是pbdom要使用此路径下的pbdom90.dll, pbxerces90.dll、xerces_2_1_0.dll文件，同样,当程序发布时候也需要)

六、PBDOM类的使用

◆如图所示，反映了PBDOM类的组成和继承关系,可以看到,几乎所有的PBDOM类都继承自PBDOM_Object（除了PBDOM_Builder和PBDOM_Exception）

1、PBDOM_Document
◆构建PBDOM举例

1.1 直接构建（XML documents can be created from scratch）
PBDOM_Document doc
PBDOM_Element rootdoc = CREATE PBDOM_Document
root = CREATE PBDOM_Element
root.SetName( "root" )
root.SetText( "this is the root" )
doc.AddContent( root )

1.2 从文件、字符串、DataStore中载入
PBDOM_Builder builder
doc = builder.BuildFromString( "<foo>bar</foo>" )
doc = builder.BuildFromFile( "c:\foo\bar.xml"
doc = builder.BuildFromDataStore( l_ds)

2、PBDOM_Element
2.1 遍历元素
PBDOM_Element root, children[], first
// Get the root element of the document
root = doc.GetRootElement()
// Get an array of all child elements
root.GetChildElements( children )
// Get only elements with a given name
root.GetChildElements( "name", children )
// Get the first element with a given name
first = root.GetChildElement( "name" )

注意：

上例中得到的元素数组是联动的！（The element array is live!） 即：
◆ 修改数组中的元素，同样会作用到父文档
◆ 返回的数组是有界的（Once the array is returned, it is now bounded）
◆ 在数组中增加新元素时，需要一个SetContent()方法调用

2.2 移动元素
// PBDOM_Document docOne,docTwo
PBDOM_Element movable

movable = CREATE PBDOM_Element
Movable.SetName( "movable" )
docOne.AddContent( movable ) // add
movable.Detach() // remove
docTwo.addContent( movable ) // add again

注意：

1、只要是从PBDOM_Object继承的对象，都可以调用Detach()方法（如Comments、ProcessingInstructions、Elements (and their content)等等）
2、PBDOM元素对象不是永久的捆绑在它的父文档上的（PBDOM elements aren't permanently tied to their parent document）

2.3 符合规格(Always well-formed)
PBDOM_Element构造器以及setter方法会检查元素是否符合规格：

elem.SetName( "Spaces are illegal" )

AddContent()方法也会从以下几个方面进行检查：
◆ 结构---树中没有循环(Structure –no loops in any tree)
◆ 只有一个根节点元素(One and only one root element)
◆ 相容的命名空间(Consistent namespaces)

3、PBDOM_Attribute

3.1 操作元素属性
◆ 元素可以有多个属性

<table width="100%" border="0"></table>

// Get an attribute
ls_width = table.GetAttributeValue( "width" ) // or
ls_width = table.GetAttribute ( "width" ).GetText()
// Attributes can be typed
li_border = table.GetAttribute( "width" ).GetIntValue()

// Set an attribute
table.SetAttribute( "cellspacing", "0" )
// Remove an attribute
table.RemoveAttribute( "cellspacing" )
// Remove all attributes
PBDOM_Attribute empty[]
table.SetAttributes( empty ) // the PowerScript way

4、PBDOM_Text
4.1 操作元素文本内容
<description>
cool demo
</description>

// the text is directly available –returns
// "~r~ncool demo~r~n"
ls_desc= elem.GetText()

// two convenience methods
ls_desc= elem.GetTextTrim()// returns "cool demo"
ls_desc = elem.GetTextNormalize()// returns "cool demo"

// text can be changed directly
elem.SetText( "a new description" )

5、PBDOM_Object
5.1 操作有混合内容的元素
<description>
<!–comment -->
<?convert units="metric" ?>
cool demo
</description>

PBDOM_Object content[]
desc.GetContent( content )
FOR i = 1 TO UpperBound( content )
CHOOSE content[i].GetObjectClassString()
CASE "pbdom_comment"
// ...
CASE "pbdom_processinginstruction"
// ...
END CHOOSE
NEXT

6、PBDOM_ProcessingInstruction
6.1 使用处理命令（Processing instructions）
<? xml-stylesheet type="text/xsl"href="foo.xsl" ?>
{------target------} {----------------data---------------}

// Get target (e.g., "xsl-stylesheet")
ls_target = pi.GetTarget()

// Get data (e.g., 'type="text/xsl"href="foo.xsl"')
ls_data = pi.GetText()

// Get individual values as attributes
String names[]
pi.GetNames( names )
FOR i = 1 TO UpperBound( names )
MessageBox( names[i], pi.GetValue( names[i] )
NEXT

7、PBDOM and 命名空间（Namespaces）
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:variable name="ffsection" select="//SITE_SECTION
<xsl:template name="TopNav">
......
</xsl:template>
</xsl:stylesheet>

String ls_element
PBDOM_Element template

// get element name and namespace –return "xsl:template"
template = root.GetChildElement( "template" )
ls_element= template.GetNamespacePrefix() +":"+ template.Getname()

// get element by name and namespace
template = root.GetChildElement( "template", "xsl", "http://www.w3.org/1999/XSL/Transform")

七、PBDOM vs. the Competition
◆Apache Xerces/COM
Xerces 是现在PBDOM底层使用的XML解析器，但对PowerBuiler用户来说使用不直观。（Xerces is the [current] underlying XML parser for PBDOM, but is less intuitive）

◆MSXML
.无法在UNIX等操作系统上使用(No deployment to UNIX possible)
.同样对PowerBuiler用户来说使用不够直观（Less Intuitive）
.COM collections vs. PB arrays (pb用户当然会优先选择使用数组来处理数据)

◆Others
Expat–a C DLL (使用时需要声明外部函数…使用不够广泛)