Blob对象处理：无界数据在PB中的特殊操作

[PB]-大文本(Blob)对象处理2008年05月14日 星期三 16:46**


Blob类型的数据用来保存象大文本和图象之类的数据，这种数据长度很大、几乎没有限制。而在PB中，没有长度限制的对象仅此一种类型，所以它有特殊的处理方法。
    Blob类型的数据没有边界限制，可以保存一些普通类型的字段不能保存的信息。
以下情况下考虑使用Blob类型的字段：
    a)要保存OLE对象(如图形、声音等)时；
    b)将大型的二进制对象存入数据库中时：
    c)当文本对象过大，以至于一般的字符串函数无法对其操作时；
    d)数据库中有PB不能支持的数据类型时。
    普通类型的字段使用数据窗口，通过调用函数Update和Commit事务管理语句就可以保
存数据了。但Blod类型的数据非常庞大，所以这种类型字段的更新不能像普通的字段，只能用其特有的语句进行更新。Updateblob的语法格式如下：
    Updateblob 表名 set Blob类型字段名 = :Blob类型变量 where 子句;
上面的语法和Update语法类似，除了使用关键字Updateblob外，其他和Update语法都相同。
    普通类型的字段显示是通过数据窗口，调用Retrieve即可。但是，由于Blob类型的数据非常庞大，客户端的主缓存区开辟多么大的空间都不合适。PowerBuilder的解决方法是，不允许在数据窗口中放置Blob类型的字段，而是提供专用的提取Blob类型数据的语句。该语句语法如下：
   Selectblob Blob类型的列名 into :Blob类型变量 from 表名 where 子句;
上面的语法同Select语句类似，只是使用了关键字Selectblob。另外，Selectblob和
Updateblob中的where子句都必须只能返回一行数据，也就是说，一次只能处理一个Blob类
型的数据。
    关于Blob类型的处理只能通过上面的两个语句来进行。不像普通类型的字段那样数据
的更新可以通过Insert语句实现。所以，在使用Updateblob语句之前，符合where子句条件
的数据已经存在了，并且只存在一条数据。因此，如果想把大文本或者图像等Blob类型的数据写入数据库，必须首先插入这条记录的其他部分，然后再通过修改记录的方式将Blob类型数据写入。
*因为大文本对象特别庞大，当使用Updateblob时应该将事务对象的Autocommit设置为True，这很容易理解。因为这么庞大的数据量要求一次提交，显然多大的缓冲内存都不合适，只能让事务对象在合适的时候自动提交了。
*DBMS中的数据类型可以在PowerScript中与Blob数据类型相对应，如在Oracle对应为longraw，raw。在MS SQL Server中对应为image，text。在DB2/2中对应为N/A。


**实例
假设在一个应用系统中，进行合同管理时要保存合同的原样，以便以后的责任审查。用图像扫描设备将合同扫描成图形文件，以图像方式保存到数据库中，这就涉及了Blob类型的处理该软件实现时，最重要的首先是图像的保存，然后是图像的显示问题。
假设在窗口w_contract上左边是dw_1，在dw_1上显示合同中的相关数据，用户选择不同的数据行时，对应的合同文本显示在picture控件p_1上；用户点击“录入合同文本”按钮时打开w_htwb_input窗口选择合同文本对应的图形文件名称，返回后根据该文件大小进行相关处理，并保存到数据库中。
数据窗口dw_1从contract数据表中提取数据，该数据窗口中不包括Blob类型的字段htwb，其主键为合同编号（htbh）。当数据窗口的行焦点改变时读取该行中的合同文本，并显示在picture控件p_1上。在数据窗口的rowfocuschanged事件中编写脚本如下：