PB中执行SQL语句

PowerBuilder的嵌入式SQL语句只能支持一些固定的标准的SQL语句，即在进行程序代码编译处理时这些SQL语句必须是确定的，另外这种方式也不能执行像Creat Table,Creat Database等这些数据库定义的语句(DDL)。


因此这种嵌入式SQL语句在实际应用中有一定的局限性。为克服这种方式的局限性，可以使用动态SQL语句，这种方式可以完成嵌入式SQL语句无法实现的功能。如建库、建表这一类的数据库定义语句(DDL)；其次，由于动态SQL语句允许在执行时才确定到底要执行怎样的SQL语句，因此使用动态SQL语句可以使程序实现参数化设计，具有很大的灵活性和通用性。


一、动态SQL语句的应用分析 PowerBuilder提供了四种格式的动态SQL语句，每种格式都有自己不同的特点和作用。

(一)第一种格式

当执行没有输入参数并且没有返回结果集的SQL语句时可以使用这种格式，这种格式使用比较简单，其实现的操作也比较少。

1 语法

EXECUTE IMMEDIATE SQLStatement{USING TransactionObject}；

其中SQLStatement是要执行的SQL语句，可以直接用引号将要执行的SQL引起来用，或者用字符串变量的形式提供SQL语句。通过使用字符串变量可以在具体执行的时候才指定要执行什么样的SQL语句。TransactionObject是用户所使用的事务对象，缺省为SQLCA。

2 应用实例

①建立一张数据库表(base)，SQL语句的表述用引号引起来直接使用。

EXECUTE IMMEDIATE‘CREATE TABLE base(code char(6),name char(30))’USING SQLCA；

②执行对数据库记录的操作，在表base中插入一条记录，SQL语句通过字符串变量传递执行语句。

STRING lsSQL
LsSQL=”INSERT INTO TABLE base VALUES(’320201’，’市中区支行’)”

EXECUTE IMMEDIATE :lsSQL；

(二)第二种格式

当执行带输入参数但没有返回结果集时的SQL语句可以采用第二种格式。该格式不仅可以动态地指定要执行的SQL语句，同时还可以动态地确定SQL语句所需要的参数值。

1 语法
PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject}；
EXECUTE DynamicstagingArea{USING Parameterlist}；
其中：DynamicstagingArea是PowerBuilder提供的一种数据类型。PowerBuilder本身提供了一个名字为SQLSA的DynamicstagingArea类型的全局变量，用于保存要执行的动态SQL语句信息。

2 应用实例
删除base表中的满足一定条件的记录。
STRING lsCode
lsCode=”320101”
PREPARE SQLSA FROM“DELETE base WHERE code=?”；
EXECUTE SQLSA USING：lsCode；

(三)第三种格式

当执行有输入参数并且返回结果集的格式在编译时可以确定的SQL语句时可以使用第三种格式。这种格式语法比较复杂，但要比前面两种功能强，可以返回结果集。在返回结果时由于不知道满足过滤条件的记录到底有多少条，因此第三种格式通常采用游标的形式。

1 语法
DECLARE cursor DYNAMIC CURSOR FOR DynamicStagingArea；
PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject};
OPEN DYNAMIC cursor {USING Parameterlist};
FETCH cursor INTO VariableList;
CLOSE cursor;
其中cursor是用户所定义的游标的名字。

2 应用实例
将表base中的code字段中间两位为”01”的所有记录读取出来并分别进行相应处理。
STRING lsSQL,lsCode,lsName,lsFilter
LsFilter=”01”
LsSQL=”SELECT code，name FROM base WHERE substring(code，3，2)=?”
DECLARE cursor_base DYNAMIC CURSOR FOR SQLSA；
PREPARE SQLSA FROM：lsSQL；

OPEN DYNAMIC cursor_base USING:lsFilter;

FETCH cursor_base INTO:lsCode,:lsName;

DO WHILE SQLCA.SQLCODE=0
　∥对满足条件的记录根据要求分别进行处理
　FETCH cursor_base INTO:lsCode,:lsName;
LOOP

CLOSE cursor_base;

(四)第四种格式
当执行有输入参数并且返回结果集的格式在编译时无法确定的SQL语句时可以使用第四种格式。有时候我们执行一些SQL语句时，不仅带有参数而且返回的结果集中有多少个字段，每个字段是什么类型的数据都不确定，这时只能使用第四种格式来实现。

1 语法
PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject}；
DESCRIB DynamicStagingArea INTO DynamicDescriptionObject；
DECLARE cursor DYNAMIC CURSOR FOR DynamicDescriptionObject；
OPEN DYNAMIC cursor USING DESCRIPTOR DynamicDescriptionObject；
FETCH cursor USING DESCRIPTOR DynamicDescriptionObject；
CLOSE cursor；

其中：DynamicDescriptionObject是PowerBuilder提供的一个数据类型，在PowerBuilder中提供了一个DynamicDescriptionObject类型的全局数据类型SQLDA，用来存放动态SQL语句的输入输出参数。

2 应用实例
将一个表中满足过滤条件的记录的所有字段取出来分别进行处理，表名在程序运行中由字符串变量传递，字段信息是不确定的。这里我们假设通过字符串变量中传递的表名是base。
STRING lsString,lsSQL,lsTable,lsColumn
INT liInt
DATETIME liTime
LsSQL=”SELECT*FROM base WHERE code like?”
PREPARE SQLSA FROM lsSQL;
DESCRIB SQLSA INTO SQLDA;∥SQLDA中含有输入参数的描述
DECLARE cursor_base DYNAMIC CURSOR FOR SQLSA;
SetDynamicparm(SQLDA,1,”32％”)∥传递参数值
OPEN DYNAMIC cursor_base USING DESCRIPTOR SQLDA;
FETCH cursor_base USING DESCRIPTOR SQLDA;
DO WHILE SALCA.SQLCODE=0
　FOR liInt=1 TO SQLDA.NumOutPuts
　CHOOSE CASE SQLDA.OutParmType[liInt]
　CASE Typestring!
lsString=GetDynamicString(SQLDA,liInt)
∥处理该字符型的字段
CASE TypeDateTime
LsDateTime=GetDynamicDateTime(SQLDA,liInt
∥处理该日期型的字段
∥处理其他类型的字段
END CHOOSE
NEXT
∥将一条记录的所有字段取完后作相应的处理
FETCH cursor_base USING DESCRIPTOR SQLDA;
LOOP
CLOSE cursor_base；

二、结束语
从上面的说明和举例中可以看出动态SQL的特点是功能强，使用灵活，完全可以在程序代码中动态地生成具体要执行的SQL语句，是嵌入式SQL无法比拟的。当然动态SQL语句在运行速度上可能要比嵌入式SQL语句略慢一点，但随着计算机处理速度的大幅度提高，现在来说这一点已不成什么问题。因此，使用动态SQL语句仍是一种非常可取的处理方法