实现PowerBuilder数据窗口的多表更新

实现PowerBuilder数据窗口的多表更新


  PowerBuilder的数据窗口对象是其特有的智能对象,其封装性好、功能强大、表现形式丰富多样,为此,许多MIS开发人员对PowerBuilder推崇备至,将其视为首选开发工具。

  一般情况下,一个数据窗口只能更新一个数据库表,但在MIS开发过程中,我们经常遇到这种情况:一个数据窗口中由两个或更多个数据库表作为数据源,并需要对其进行录入或修改,如何给出多表更新的通用解决方案就成为MIS开发人员不容回避的问题。笔者在某管理信息系统的开发过程中,尝试了几种双表更新的解决方法,选出一种比较好的方案,以飨读者。

  一、具体步骤

  1. 在数据窗口建立时,选择SQL Select,显示风格可以是Tabular、Grid或FreeForm中的任一种。选出两表需要录入或修改的列,其中两表的主键和非空列必须选中,确定选择条件,建立连接关系。

  2. 在选单“Rows/Update”中选择第一个表的全部数据项为可更新项。

  3. 把两表需要修改项的Tab Order数值改为非0值,使其在数据窗口中成为可修改项。

  为了使方案具有通用性,建立全局函数f_update_2table,有五个参数:dw_obj、table1、table2、key1、 key2,分别代表所要更新的数据窗口、两表表名和两表主键列名,其中dw_obj为DataWindow类型,其余四参数均为String类型。该函数返回值为Boolean型,返回True表示成功,返回False表示失败。

  二、函数思路

  1. 先针对第一个数据库表调用Update函数更新。注意参数的使用:第一个参数作用是控制数据窗口更新前是否强制性调用AcceptText(),在数据窗口更新前通过有效性验证;第二个参数是控制更新标志的复位,为True时更新标志复位,为False时更新标志不复位。

  2. 更改数据窗口的UpdateTable属性,使其指向第二个表,并把第一个表的各数据项Update属性和主键列的Key属性改为No,接着把第二个表的各数据项Update属性和主键列的Key属性改为Yes。

  3. 调用Update函数更新第二个表。

  4. 两表更新成功后,把两表的列属性、主键属性改回到初始状态,以便为下一次的两表更新调用做好准备。
三、程序清单

  // ColName:数据窗口列名

  // Name1[],Name2[]:两数据库表选中项列名

  // n1,n2:两数据库表选中项数量

  // i:循环计数器

  // Columns:数据窗口总列数

  String ColName,Name1[],Name2[]

  Integer Columns,i,n1=0,n2=0

  //下面程序:找出dw_obj的两表列名赋给Name1[],Name2[]

  Columns=Integer(dw_obj.Describe("DataWindow.Column.Count"))

  FOR i=1 TO columns

ColName=Upper(dw_obj.Describe("#"+String(i)+".Name"))

IF Left(ColName,Len(Table1))=Table1 and ColName〈〉Key1 THEN

n1=n1+1

Name1[n1]=ColName

END IF

IF Left(ColName,Len(Table2))=Table2 and ColName〈〉Key2 THEN

n2=n2+1

Name2[n2]=ColName

END IF

  NEXT

  // 下面程序:存储dw_obj,确定返回值(True:成功,False:失败)

  IF dw_obj.Update(True,False)=1 THEN

   FOR i=1 TO n1

   dw_obj.Modify(Name1+".Update=No")

   NEXT

dw_obj.Modify(Key1+".Key=No")

  dw_obj.Modify("DataWindow.Table.Update

  Table=' "+Table2+" ' ")

FOR i=1 TO n2

  dw_obj.Modify(Name2+".Update=Yes")

NEXT

   dw_obj.Modify(Key2+".Key=Yes")

IF dw_obj.Update()=1 THEN

Commit;

FOR i=1 TO n1

dw_obj.Modify(Name1+".Update=Yes")

NEXT

dw_obj.Modify(Key1+".Key=Yes")

dw_obj.Modify("DataWindow.Table.UpdateTable=' "+Table1+" ' ")

FOR i=1 TO n2

dw_obj.Modify(Name2+".Update=No")

NEXT

dw_obj.Modify(Key2+".Key=No")

return True

ELSE

Rollback;

return False

END IF

  ELSE

Rollback;

return False

  END IF

  四、调用方法

  假设窗口名为w_update,数据窗口为dw_1,数据库表名和主键名分别为t1、t2、k1、k2,放置“存盘”按钮,按钮Clicked事件的Script语句如下:

  dw_1.AcceptText()

  IF dw_1.ModifiedCount()〉0 or dw_1.DeletedCount()〉0 THEN

IF MessageBox("提示信息","是否存盘?",Question!,YesNo!)=1 THEN

   IF f_update_2table(dw_1,"t1","t2","k1","k2") THEN

   Commit;

ELSE

Rollback;

   END IF

   END IF

  END IF

    综上所述,可以看出,该方案具有很好的可扩展性,稍加修改即可解决多表作为数据源的数据窗口的同步更新问题。

  • 0
    点赞
  • 0
    评论
  • 0
    收藏
  • 一键三连
    一键三连
  • 扫一扫,分享海报

数据窗口源码介绍 (举例见d_dbit_example.srd,测试数据库为PB自带的EAS Demo DB V120) 1.第一行:release 12; 数据窗口所属PB的版本号,如果想把高版本的datawindow导入低版本的PB中要修改此数字; 2.datawindow()行 通常用修改processing属性,可以把你的数据窗口由grid变成freeform或其它类型 例:freeform:0 grid:1 3.header()行 可以整行复制粘贴,并命名为header[1],header[2],这样可以让数据窗口有多个header 4.table()行 这里全是定义的数据属性,是setitem,update,object.data等方法访问的根源 如果存在table()里的column,数据窗口里可以不存在任何对象,仍然可以访问数据窗口数据 如果想创建一个空的数据窗口,可以只定义: release 12; table() 5.table(column行) 是第几个column,它的ID就是多少,其中也定义了是否可以update时和更新数据表的字段名 6.table(retrieve行) 检索数据时使用的SQL语句,可以通过setsqlselect或modify("table.sqlselect")方法去动态修改 修改后要重新定义数据窗口更新属性 7.column()行 id即是对应table(column行)里的行次,名称(name)可以随便命名,也可以没有,则默认为table(column行)里的name 8.compute()行 计算列,可以通过表达式计算显示特定值(具体函数可以见共享里的画笔函数). 9.text()行 有时可以代替计算列; 通过定义text的表达式,可以实现一列中显示两个字段值,注意结果必须要转换成string类型(而column和compute则不行); 10.htmltable()行 按照格式导出(saveas)html文件,为了保证格式的完整,数据窗口的单位最好设置成pixels GenerateCSS='1' //保持格式及颜色 Border='0' //不要table边框 CellSpacing='0' //单元格无间距(此项在界面上经常设置不上) 注: (1)Grid生成<Table>标签,Freeform生成<DIV> + <SPAN>标签; (2)生成htmltable时,不知为何会在CSS中的开始自动加一个分号";",导致excel等浏览器打开不能正常显示格式; (3)band为foreground或background的对象导不出来,可以动态修改后再导出. 11.export.xml()行 定义导出xml文件的格式,并为模板保存名称 使用时一定要设置usetemplate值 12.import.xml()行 定义导入xml文件的格式,并为模板保存名称 使用时一定要设置usetemplate值 13.表达式介绍 略 14.其它也略
©️2021 CSDN 皮肤主题: 编程工作室 设计师:CSDN官方博客 返回首页
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值