PowerBuilder培训中高级培训课件.ppt

* 引出一个问题：PB中有多条UPDATE语句时，如何包含到一个事件中去？ * 可以连接多个数据库，如医保数据库、别的HIS数据库等 注意：多个数据库连接后的使用：数据窗口：setTransObject(gTrans_yzcx) SQL语句：……using gTrans_yzcx; * DBParm的作用：可以指定应用名、客户端名以及断线以后数据库系统采取的措施（提交未完成的事务或回滚未完成的事务） CommitOnDisconnect = ‘No’ * * 可以举例说明trigger和Post的使用方法 * * 对于列的属性，可以控制到行 * 可以解决很多莫名其妙的问题 * 如何显示错误信息？ * 注：详细内容将在用户对象在介绍。 * 注：详细内容将在用户对象在介绍。 * 数据窗口—更新方式 Key Columns 数据窗口只使用“Unique Key Columns ”列表框中选择的主键列来构造WHERE子句。该选项经常在单用户应用程序环境中使用。 举例： Update YK_TYPK SET YPMC = ‘青霉素钠针’ Where YPXH = 5; Update YK_TYPK SET YPMC = ‘青霉素钠’ Where YPXH = 5; 特点： 多个用户可以同时访问和修改数据库，保证了高并发性； 不能保证数据的完整性 数据窗口—更新方式 Key and Updateable Columns 数据窗口使用“Unique Key Columns ”列表框中选择的主键列和“Updateable columns”中选定的更新列来构造WHERE子句。 举例： Update YK_TYPK set YPMC = ‘青霉素钠针’ Where YPXH = 5 and XTSB = 1 AND YPMC = ‘青霉素’ and YPGG = ‘80万u’; Update YK_TYPK set YPMC = ‘青霉素钠’ Where YPXH = 5 and XTSB = 1 AND YPMC = ‘青霉素’ and YPGG = ‘80万u’; 特点： 降低并发性，保证数据的完整性。 数据窗口—更新方式 Key and Modified Columns 数据窗口使用“Unique Key Columns ”列表框中选择的主键列和“Updateable columns”中选定的更新列中已修改过的列来构造WHERE子句。 举例： Update YK_TYPK set YPMC = ‘青霉素钠针’ Where YPXH = 5 AND YPMC = ‘青霉素’; Update YK_TYPK set YPMC = ‘青霉素钠’ Where YPXH = 5 AND YPMC = ‘青霉素’; 特点： 可同时修改同一行不同列的数据，提高操作的并发性； 当修改不同行或同一行同一列的数据时，不能保证数据的完整性。 数据窗口—灵活控制 数据窗口—导入导出 数据窗口对象的容器—数据窗口控件 Gf_Begin_Transaction(sqlca) If dw_1.Update() 1 then gf_Rollback_Transaction(sqlca) Messagebox(提示, 数据保存错误，请与管理员联系！ Return End If Gf_commit_Transaction(sqlca) 第一步：定义实例变量 第二步：在数据窗口的dberror事件中编写脚本 Gf_Begin_Transaction(sqlca) If dw_1.Update() 1 then gf_Rollback_Transaction(sqlca) Messagebox(‘提示’, ‘数据保存错误，请与管理员联系！’ + is_ErrorText) Return End If Gf_commit_Transaction(sqlca) 第三步：修改保存按钮中的提示语句 思考：DataStore Update时，如何显示错误消息？ Gf_Begin_Transaction(sqlca) If lds_ypxx.Update() 1 then gf_Rollback_Transaction(sqlca) Messagebox(‘提示’, ‘数据保存错误，请与管理员联系！’) Return End If Gf_commit_Transaction(sqlca) DataStore lds_ypxx Lds_ypxx = Create DataStore Lds_ypxx.DataObject = ‘d_typk’ Lds_ypxx.SetTransobject(sqlca) L