您的位置信息之舟电 脑硬件栏目首页数据库类PowerBuilder 收藏本页

→ 浅析PowerBuilder下动态SQL语句二

www.kepusoft.com 信息之舟电脑软件应用栏目

    信息之舟电脑软件应用栏目编者按:

    (三)第三种格式

      当执行有输入参数并且返回结果集的格式在编译时可以确定的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语句仍是一种非常可取的处理方法。根据我们在实际编程中的体会,正确使用动态SQL语句可使程序代码简练、灵活、通用,不仅降低了初次编程的工作量,而且也降低以后对代码的维护量,能够取得事半功倍的效果。

www.kepusoft.com 信息之舟电脑之家收集整理推荐文章