PowerBuilder怎么处理XML数据 DataWindow和XML

2次阅读

powerbuilder中datawindow/xml交互需严格匹配结构:importxml()仅映射已定义列,要求标签名与列名大小写一致、无命名空间前缀、空元素按NULL处理;saveasxml()输出pb自定义格式,参数控制内容与列范围,中文需设codepage并手动加bom;推荐用datastore替代datawindow控件以避免ui干扰,深层嵌套xml需预展平。

PowerBuilder怎么处理XML数据 DataWindow和XML

PowerBuilder 原生支持 XML 与 DataWindow 的双向交互,但实际用起来容易卡在格式、命名空间或编码上——核心问题是 DataStoreDataWindowImportXML()SaveAsXML() 并不自动处理任意结构的 XML,必须严格匹配 DataWindow 的数据源定义。

XML 导入前必须匹配 DataWindow 的数据源结构

ImportXML() 不会动态创建列,它只把 XML 元素按名称映射到 DataWindow 已定义的列。如果 XML 里有 <order_id></order_id>,而 DataWindow 的 sqlCA 数据源里列名是 order_id(大小写敏感),且数据类型兼容(比如字符串能转成 number),才成功;否则跳过或报错 ImportXML() returned -1

  • 确保 XML 标签名和 DataWindow 列名完全一致(包括大小写)
  • 避免使用带下划线或驼峰的混合命名,PB 对 OrderIDorder_id 视为不同字段
  • 如果 XML 有命名空间(如 <product></product>),ImportXML() 默认忽略前缀,但必须在 DataWindow 列名中去掉 ns: —— 它不解析 Namespace
  • XML 中的空元素(<price></price>)会被当作 NULL 导入,前提是该列允许 NULL;否则可能触发数据类型转换失败

SaveAsXML() 输出格式受 DataWindow 类型和属性控制

SaveAsXML() 的输出不是标准 XML Schema,而是 PB 自定义格式,包含 <datastore></datastore> 根节点和 <row></row> 子节点。是否包含列名、是否导出计算列、是否带格式化值,全由参数决定。

  • 第二个参数决定内容:用 XMLData 只导出原始数据;用 XMLSchema 会额外生成 XSD(但仅描述结构,不含业务约束)
  • 第三个参数控制列行为:False 表示导出所有列(含计算列、表达式列);True 只导出数据库列(SQLCA 源中的 base columns)
  • 默认不带 XML 声明(<?xml version="1.0" encoding="UTF-8"?>),如需,得自己拼接字符串或用 String() + FileWrite()
  • 中文导出乱码?确认 DataWindow 所在应用的 CodePage 设置为 936(GBK)或 65001(UTF-8),并在 SaveAsXML() 后手动写入 BOM(对 UTF-8)

用 DataStore 替代 DataWindow 控件做纯数据操作更可靠

UI 级别的 DataWindow 控件在导入 XML 时会触发重绘、校验、事件,容易因 UI 状态(如当前行未保存)中断流程;而 DataStore 是无界面对象,更适合后台 XML 解析/生成。

  • 创建 DataStore 实例后,用 Create() 加载与目标 XML 结构一致的 .srw 或 .srd 文件(不能直接用 SQL 语句)
  • ImportXML() 返回值必须检查:-1 是失败,0 是成功但无数据,正数才是导入行数
  • 导入后调用 SetTransObject() 不必要,DataStore 本身不连接数据库;只有后续要 Update() 才需设置事务对象
  • 若 XML 层级深(如嵌套 <order><items><item></item></items></order>),PB 默认只支持扁平结构 —— 必须先用外部工具(如 XSLT 或 .NET COM 组件)展平,或改用 XMLDOMDocument 手动解析
datastore ld_ds ld_ds = create datastore ld_ds.Create("d_order_detail") // 必须是已存在的 dataobject 名 if ld_ds.ImportXML("c:temporder.xml", XMLData) < 1 then     MessageBox("Error", "XML import failed: " + string(ld_ds.GetLastErrorCode())) end if

真正麻烦的不是语法,而是 XML 命名空间、编码声明、空值表示法这些“看不见的细节”——PB 不报具体哪一行哪一列失败,只给个 -1。建议先导出一份正常数据的 XML,再逐项比对结构,而不是直接拿第三方接口返回的 XML 上手试。

text=ZqhQzanResources