(一)引言 PB是由Sybase公司推出的一个快速数据库前台开发软件, 它以强大的数据窗口技术和数据库访问能力而陪受广大程序员青睐。 在数据窗口中有一个描述数据行和列状态的枚举变量—DWItemStatus, 但在实际开发中往往忽视了它的存在。 本人根据它的工作机理和相应的操作函数在实际开发中灵活应用,完善软件产品的功能。 (二)工作机理 DWItemStatus是标示DataWindow中的数据行和列修改状态和如何写入数据库中的一个枚举类型变量 这个枚举变量有四个值:NotModified!,DataModified!,New!,NewModified!。 NotModified!表示数据窗口中从数据源中检索出的行数据和列数据没有发生改变。 DatModified!表示数据窗口中从数据源中检索出的行数据和列数据发生了改变。 New!表示数据窗口中某一行数据是新插入而且没有修改过。 NewModified!表示数据窗口中某一行数据是新插入但是被修改过。 以上所说的修改包括手工输入和用SetItem函数设置。 在这四个值中NotModifed!、DataModified!可以表示行和列的状态, 但New!和NewModified!只可以表示行的状态。 当数据被检索时: 数据窗口检索到数据以后,所有的行和列的状态被初始化为NotModified!. 一旦某一行中的一列数据被手工输入修改或被程序修改后,这一列的状态变成了DataModified!. 一行中只要有一列状态是DataModified!,那这一行状态也就变成DataModified!. 当数据被插入时: 数据窗口中插入一行后,这一行的状态初始化为New!,这一行中的所有列状态被初始化为NotModified!. 一旦这一行中的一列数据被手工输入修改或被程序修改后,这一列的状态变成DataModified!。 新插入的一行中只要有一列状态是DataModified!,那这一行状态就变为NewModified!。 如果在数据窗口设计时为某一列设置了默认值,那新插入行时,这一列不会变成DataModified! 生成sql语句: 在数据窗口保存数据时,行的状态就决定了如何生成sql语句。 如果行的状态是NewModified!,那就生成insert语句在数据库中插入一行数据。 如果行的状态是DataModified!,那就生成update语句在数据窗口中更新相应数据。 操作函数说明 获取行和列的状态 在程序中可以用数据窗口的GetItemStatus方法来获取行或列的状态。函数原形如下: DWItemStatus DwControl.GetItemStatus(long row,integer column,DWBuffer DWBuffer) DWItemStatus DwControl.GetItemStatus(long row,string column,DWBuffer DWBuffer) 参数说明: row 获取状态的行。 column 获取状态的列,如果是整行的状态,这个参数设置为0。 DWBuffer 行所在的缓冲区。 返回值:指定行或列的状态枚举值。任一参数为null时,返回null。 改变行或列状态 在程序中可以用数据窗口的SetItemStatus方法改变行或列的状态。函数原形如下: integer DwControl.SetItemStatus(long row,integer column,DWBuffer DWBuffer,DWItemStatus status) integer DwControl.SetItemStatus(long row,string column,DWBuffer DWBuffer,DWItemStatus status) 参数说明: row 设置状态的行 column 设置状态的列。如果是整行的状态,这个参数设置为0。 DWBuffer 行所在的缓冲区。 status 要设置的新状态。 返回值:如果成功执行返回1,出现错误时返回-1。任一参数为null时,返回null。 调用SetItemStatus可以将列的状态由DataModified!,改为NotModified!,反之也可。 但是如果想改变行的状态就要麻烦多了,以下是一个行状态的变换表: 原状态 指定新状态
- | New! | NewModified! | DataModified! | NotModified! | New! | - | Yes | Yes | No | NewModified! | No | - | Yes | New! | DataModified! | NewModified! | Yes | - | Yes | NotModified! | Yes | Yes | Yes | - | 表中的yes意味着改变是可行的。例如将某一行当前状态是NotModified!,调用SetItemStatus将行状态改为New!是可以的,改变可以成功。 表中的no意味着改变是不可行的。例如将某一行当前状态是NewModified!,调用SetItemStatus将行状态改为New!是不可以的,改变将不会成功。 表中不是yes也不是no的单元表示改变的具体结果。例如将某一行当前状态是NewModified!,调用SetItemStatus将行状态改为noModified!时, 行状态既不是NewModified!,也不是noModified!,而是变成了New!。如果某一行的状态变为noModified!或New!,则这一行的所有列的状态将变为noModified!。 当表中的一些状态改变是被禁止时,可以分几步来完成这个过程。如:可以先将New!改变为DataModified!,再变为not Modified!。 (三)下面举两个实际开发中运用DWItemStatus的例子 例子一: 在实际开发中,为了提醒用户在关闭窗口前保存修改过的数据而在窗口的closequery事件中写如下代码: int li_ret if ( dw_1.deletedcount() + dw_1.Modifiedcount() ) > 0 then li_ret = messagebox( "注意!", "数据已经被修改,是否存盘?", question!, yesnocancel! ) if li_ret=1 then if dw_1.update() = 1 then commit ; return 0 else rollback; messagebox( "出错!", "存盘时出错!,请检查数据的正确性!" ) return 1 end if elseif li_ret = 2 then return 0 elseif li_ret = 3 then return 1 end if end if 这样确实可以提醒用户保存数据,但是如果在数据窗口中插入一行后,调用了SetItem函数来设置这一行中某些字段的值,即使用户没有做任何的修改, 程序也会提醒用户保存。当出现这种情况时,用户常常感到莫名其妙,不知所措。 怎样才能在程序中避免这种情况的出现呢? 一个办法就是在调用了SetItem后,再用SetItemStatus将新插入行的状态重新设置为NotModified!(对应上表,可知结果为New!), 这样在ModifiedCount函数对改动数据行进行统计时就不会计入这一行。具体代码如下: int li_Newrow li_Newrow = dw_1.insertrow(0) dw_1.SetItem(li_Newrow,"sex",1) dw_1.SetItem(li_Newrow,"birth",today()) dw_1.SetItem(li_Newrow,0,primary!,NotModified!) 例子二: 当用户在保存数据时,为了告诉用户保存了多少条数据,经常在程序中返回sqlca的sqlnrows的值。代码如下: if dw_1.update() = 1 then li_updatenum = sqlca.sqlnrows commit using sqlca; messagebox("提示", "保存了" + string(sqlca.sqlreturndata)) + "条记录!" ) else rollback using sqlca; messagebox("提示", "保存时出现错误,没有数据被保存!" ) end if 虽然这样可以告诉用户有多少记录保存,但是这样不是很精确。有时用户想更清楚地知道更新了多少记录,新插入了多少记录,删除了多少记录。 这个时候就需要根据数据行的状态来统计更新了多少记录,新插入了多少记录。 具体的办法是在保存前,遍历所有数据行统计NewModified!状态行和DataModified!状态行, 前者就是新插入的数据行,后者就是更新的数据行,再通过DeletedCount()函数获取删除的记录数量,详细的代码如下: int li_newnow = 0, li_updaterow = 0, li_delrow, i = 1 DWItemStatus l_status dw_1.accepttext() do while i <= dw_1.rowcount() l_status = dw_1.GetItemStatus( i, 0, primary! ) i++ if l_status = DataModified! then li_updaterow ++ elseif l_status = NewModified! then li_newnow ++ end if loop li_delrow = dw_1.deletedcount( ) if dw_1.update() = 1 then commit using sqlca; if li_updaterow > 0 or li_newnow > 0 or li_delrow > 0 then messagebox( "提示", "保存成功!~r~n更新了" + string(li_updaterow) + "条记录!~r~n"& + "新增了" + string(li_newnow)+"条记录!~r~n"& + "删除了" + string(li_delrow)+"条记录!") else messagebox("提示","没有数据被保存!") end if else rollback using sqlca; messagebox("提示","保存时出现错误,没有数据被保存!") end if 利用以上代码,可以准确地告诉用户更新了多少条记录,新增了多少条记录。这样用户可以更加清楚自己的操作。
|