当前位置: 代码迷 >> PB >> 请帮忙看看下面的代码为什么不对?该如何解决
  详细解决方案

请帮忙看看下面的代码为什么不对?该如何解决

热度:207   发布时间:2016-04-29 09:23:19.0
请帮忙看看下面的代码为什么不对?
在表all_col_comments存放了所有当前用户能够访问的表的表名(Table_name)列名(Column_Name),我想用下面的代码查看哪些表的列中有“test”字符串的记录,不知下面的写法为什么不对?

this.enabled=false
String lsSQL
String tName
String CName
int i
i=0
declare cursor1 CURSOR for Select Table_Name,Column_Name from all_col_comments;
open cursor1;
string mySql
int iRes
do while (sqlca.sqlcode=0)
iRes=0
yield()
fetch cursor1 into :TName, :CName;  
mySql="Select Count(*) into iRes from " + TName + " Where " + CName + "='test' "
execute immediate :MySql using sqlca;
if iRes>0 then
i=dw_1.InsertRow(0)
dw_1.setitem(i,1,TName)
dw_1.setitem(i,2,CName)
end if

loop
close cursor1;
this.enabled=true
MessageBox(string(i),string(i))


下面这两句后:
mySql="Select Count(*) into iRes from " + TName + " Where " + CName + "='test' "
execute immediate :MySql using sqlca;

sqlcode=-1,是什么原因?


------解决方案--------------------
iRes 是变量啊
------解决方案--------------------
看第三种格式
SQL code
PB动态sql语句-转PowerBuilder是目前最流行的pbnet.cn/Soft/db/" target="_blank">数据库开发pbnet.cn/tools/tools/" target="_blank">工具之一。PowerBuilder提供了在程序代码中加入嵌入式SQL语句的功能来支持对pbnet.cn/Soft/db/" target="_blank">数据库的访问。 但这种嵌入式SQL语句只能支持一些固定的标准的SQL语句,即在进行程序代码编译处理时这些SQL语句必须是确定的,另外这种方式也不能执行像Creat Table,Creat Database等这些pbnet.cn/Soft/db/" target="_blank">数据库定义的语句(DDL)。因此这种嵌入式SQL语句在实际应用中有一定的局限性。为克服这种方式的局限性,可以使用PowerBuilder提供的动态SQL语句,这种对pbnet.cn/Soft/db/" target="_blank">数据库访问的方式可以完成嵌入式SQL语句无法实现的功能。如建库、建表这一类的pbnet.cn/Soft/db/" target="_blank">数据库定义语句(DDL);其次,由于动态SQL语句允许在执行时才确定到底要执行怎样的SQL语句,因此使用动态SQL语句可以使程序实现参数化设计,具有很大的灵活性和通用性。一、动态SQL语句的应用分析 PowerBuilder提供了四种格式的动态SQL语句,每种格式都有自己不同的特点和作用。(一)第一种格式当执行没有输入参数并且没有返回结果集的SQL语句时可以使用这种格式,这种格式使用比较简单,其实现的操作也比较少。1 语法EXECUTE IMMEDIATE SQLStatement{USING TransactionObject};其中SQLStatement是要执行的SQL语句,可以直接用引号将要执行的SQL引起来用,或者用字符串变量的形式提供SQL语句。通过使用字符串变 量可以在具体执行的时候才指定要执行什么样的SQL语句。TransactionObject是用户所使用的事务对象,缺省为SQLCA。2 应用实例①建立一张pbnet.cn/Soft/db/" target="_blank">数据库表(base),SQL语句的表述用引号引起来直接使用。EXECUTE IMMEDIATE‘CREATE TABLE base(code char(6),name char(30))’USING SQLCA;②执行对pbnet.cn/Soft/db/" target="_blank">数据库记录的操作,在表base中插入一条记录,SQL语句通过字符串变量传递执行语句。STRING lsSQLLsSQL=”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 lsCodelsCode=”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,lsFilterLsFilter=”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;LOOPCLOSE 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,lsColumnINT liIntDATETIME liTimeLsSQL=”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=0FOR liInt=1 TO SQLDA.NumOutPuts  CHOOSE CASE SQLDA.OutParmType[liInt]  CASE Typestring!lsString=GetDynamicString(SQLDA,liInt)∥处理该字符型的字段CASE TypeDateTimeLsDateTime=GetDynamicDateTime(SQLDA,liInt)∥处理该日期型的字段... ∥处理其他类型的字段... END CHOOSENEXT∥将一条记录的所有字段取完后作相应的处理FETCH cursor_base USING DESCRIPTOR SQLDA;LOOPCLOSE cursor_base;二、结束语从上面的说明和举例中可以看出动态SQL的特点是功能强,使用灵活,完全可以在程序代码中动态地生成具体要执行的SQL语句,是嵌入式SQL无法比拟的。 当然动态SQL语句在运行速度上可能要比嵌入式SQL语句略慢一点,但随着计算机处理速度的大幅度提高,现在来说这一点已不成什么问题。因此,使用动态 SQL语句仍是一种非常可取的处理方法
  相关解决方案