PB的小技巧.docVIP

PB的小技巧 1.如何使DataWindow中的数据只能追加新记录而不能修改。 利用 Column 的 Protect 属性可以很方便的做到这一点，方法如下： 将每一列的 Protect 属性设置为： If( IsRowNew(), 0, 1) ) 在 PowerScript 中可以动态修改 Protect 属性： dw_1.Modify(column_name_here.Protect=1~tIf(IsRowNew(),0,1)) 2. 允许从空的非字符字段跳离 string s s = this.dwDescribe(this.GetColumnName()+.coltype) //s = this.dwDescribe(#+String(this.GetColumn())+.coltype) CHOOSE CASE s CASE number IF Trim(this.GetText()) = THEN int null_num SetNull(null_num) this.SetItem(this.GetRow(),this.GetColumn(),null_num) this.SetActionCode(3) END IF CASE date IF Trim(this.GetText()) = THEN date null_date SetNull(null_date) this.SetItem(this.GetRow(),this.GetColumn(),null_date) this.SetActionCode(3) END IF CASE time IF Trim(this.GetText()) = THEN time null_time SetNull(null_time) this.SetItem(this.GetRow(),this.GetColumn(),null_time) this.SetActionCode(3) END IF CASE datetime IF Trim(this.GetText()) = THEN date null_datetime SetNull(null_datetime) this.SetItem(this.GetRow(),this.GetColumn(),null_datetime) this.SetActionCode(3) END IF END CHOOSE 3. 当我们为Datawindow的每一行显示行号时 可以简单的放一个表达式为GetRow() -- 计算列。 但是对于分组的Datawindow，要分别显示各组的行号，则应使用表达式为 GetRow() - First(GetRow() for Group 1) + 1的计算列。 4.多 用 户 安 全 访 问 数 据 库 的 实 现 数 据 窗 口 的 并 发 性 控 制 可 以 用“rows” 菜 单 的“Update Properties” 项 进 行 设 定。 1.Allow Updates： 如 果 选 中， 则 整 个 数 据 窗 口 允 许 修 改， 否 则 不 允 许； 2.Table to Update： 在 多 表 查 询 时， 用 该 项 选 择 要 设 置 的 表 名； 3.Where Clause for Update/Delete： 这 项 设 置 是 对 数 据 库 并 发 控 制 最 重 要 的 一 项， 要 仔 细 设 置。 当 调 用 数 据 窗 口 的Update 方 法 时,数据窗 口 使 用SQL 语 句 将 数 据 结 果 传 递 到 数 据 库 系 统， 这 项 设 置 决 定 在SQL 语 句 的where 子 句 中 使 用 哪 些 列 作 为 整 条 记 录 的 标 志。 （a）Key Columns： 仅 仅 使 用 关 键 字 作 为 整 条 记 录 的 标 志。 在 网 络 环 境 下 不 推 荐 使 用 此 选 项。 如 果 两 个 用 户 同 时 修 改 了 同 一 条 记 录， 后 进 行 保 存 操 作 的 人 会 把 先 保 存 的 人 所 做 的 修 改“ 抹 掉” 而 毫 无 察 觉。 （b）Key and Updatable Columns： 使 用 关 键 字 和 所