浅析PowerBuilder下动态SQL语句[1]

PowerBuilder是目前最流行的数据库开发工具之一PowerBuilder提供了在程序代码中加入嵌入式SQL语句的功能来支持对数据库的访问但这种嵌入式SQL语句只能支持一些固定的标准的SQL语句即在进行程序代码编译处理时这些SQL语句必须是确定的另外这种方式也不能执行像Creat TableCreat Database等这些数据库定义的语句（DDL）

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

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

（一）第一种格式

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

语法

EXECUTE IMMEDIATE SQLStatement{USING TransactionObject};

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

应用实例

①建立一张数据库表（base）SQL语句的表述用引号引起来直接使用

EXECUTE IMMEDIATECREATE TABLE base（code char（）name char（））USING SQLCA;

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

STRING lsSQL

LsSQL=INSERT INTO TABLE base VALUES（市中区支行）

EXECUTE IMMEDIATE:lsSQL;

（二）第二种格式

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

语法

PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject};

EXECUTE DynamicstagingArea{USING Parameterlist};

其中DynamicstagingArea是PowerBuilder提供的一种数据类型PowerBuilder本身提供了一个名字为SQLSA的DynamicstagingArea类型的全局变量用于保存要执行的动态SQL语句信息

应用实例

删除base表中的满足一定条件的记录

STRING lsCode

lsCode=

PREPARE SQLSA FROMDELETE base WHERE code=?;

EXECUTE SQLSA USING:lsCode;

（三）第三种格式

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

语法

DECLARE cursor DYNAMIC CURSOR FOR DynamicStagingArea;

PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject};

OPEN DYNAMIC cursor {USING Parameterlist};

FETCH cursor INTO VariableList;

CLOSE cursor;

其中cursor是用户所定义的游标的名字

应用实例

将表base中的code字段中间两位为的所有记录读取出来并分别进行相应处理

STRING lsSQLlsCodelsNamelsFilter

LsFilter=

LsSQL=SELECT codename FROM base WHERE substring（code）=?

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 SQLCASQLCODE=

∥对满足条件的记录根据要求分别进行处理

FETCH cursor_base INTO:lsCode:lsName;

LOOP

CLOSE cursor_base;

[] []