DataWindow中动态变更DropDownDW值

中国计算机报2000年第92期

DataWindow中动态变更DropDownDW值

孙亚冰

　　PowerBuilder中的DataWindow对数据库的操作功能非常强大,尤其是它的DropDownDW编辑风格，更是为相关数据的一致性提供了保证。在实际应用中，经常需要将具有DropDownDW编辑风格的字段按某一条件显示特定的内容。 比如，在某一应用中，部门员工字段的值须按变化的部门编号(或部门名称)动态改变。

　　为实现这一要求,可利用DataWindowChild对象。DataWindowChild对象可以是嵌套的报表，或具有DropDownDataWindow编辑风格的 DataWindow对象。例如，一个具有DropDownDataWindow编辑风格列的DataWindow对象就是一个DataWindowChild 对象。DataWindowChild 对象用于访问 独立于DataWindow 功能之外的 DataWindow 对象，并且由于它需要被存储和自动实例化，它继承自系统的 Structure 对象。

　　下面以一个小实例简要说明。设有一名为dw_1的DataWindow，其中有一“name (员工姓名)”字段，该字段具有DropDownDataWindow编辑风格，与之相连的DataWindow名为dw_who，该DataWindow包含一个按字段“deptid(部门编号)”动态更新的查询条件。代码如下：

　　DataWindowChild dwc

　　integer rtncode

　　file://具有DropDownDW编辑风格、值需动态改变的字段的名称

　　rtncode = dw_1.GetChild("name", dwc)

　　

　　IF rtncode = -1 THEN MessageBox( "错误提示", "Not a DataWindowChild")

　　// 建立连接

　　CONNECT USING SQLCA;

　　// 设置子数据窗口的事物对象

　　dwc.SetTransObject(SQLCA)

　　file://子数据窗口的检索值

　　dwc.Retrieve(20) file://让name列只显示部门编号为20 的员工姓名

　　// 设置主数据窗口的事物对象并检索

　　dw_1.SetTransObject(SQLCA)

　　dw_1.Retrieve()
　　以上代码在PB7 + Oracle8中调试通过。