star902 2013-10-31 07:03 采纳率: 0%
浏览 1376

orcal 存储过程第一次写，编译的时候报错，大侠帮帮忙，急！！

sql脚本如下：
create or replace procedure "PageList"(tbName IN VARCHAR2,tbFieldsIN VARCHAR2, orderField IN VARCHAR2,orderType IN INT,strWhere IN VARCHAR2,pageSize IN INT,pageIndex IN INT,pageRecord OUT INT)
is
BEGIN

/*定义变量*/
declare m_begin_row  INT DEFAULT 0;
declare m_limit_string varchar2(64);

declare m_order_string varchar2(128);
declare orderStr varchar2(64);
declare whereStr varchar2(1000);

/*构造语句*/
if orderType = 1 then

orderStr:= 'asc';
else
orderStr:= 'desc';
end if;

if (strWhere<>'') then
whereStr:= CONCAT(' where ',strWhere,' ');
else
whereStr:= ' ';
end if;

 m_begin_row:= (pageIndex - 1) * pageSize;
m_limit_string:= CONCAT(' LIMIT ', m_begin_row, ', ', pageSize);
m_order_string:= CONCAT(' order by ',orderField,' ',orderStr);

@COUNT_STRING:= CONCAT('SELECT COUNT(*) INTO @ROWS_TOTAL FROM ', tbName, ' ', whereStr);
@MAIN_STRING:= CONCAT('SELECT ', tbFields, ' FROM ', tbName, '  ', whereStr, '  ', m_order_string, m_limit_string);

/*预处理*/
PREPARE count_stmt FROM @COUNT_STRING;
EXECUTE count_stmt;
DEALLOCATE PREPARE count_stmt;
SET pageRecord = @ROWS_TOTAL;

PREPARE main_stmt FROM @MAIN_STRING;
EXECUTE main_stmt;
DEALLOCATE PREPARE main_stmt;

END

报的错误：
错误：PLS-00103: Encountered the symbol "IF" when expecting one of the following:

      begin function pragma procedure subtype type <an identifier>
      <a double-quoted delimited-identifier> current cursor delete
      exists prior
   The symbol "begin" was substituted for "IF" to continue.

行：12

错误：PLS-00103: Encountered the symbol "COUNT_STMT" when expecting one of the following:

      := . ( @ % ;

行：29
文本：@COUNT_STRING:= CONCAT('SELECT COUNT(*) INTO @ROWS_TOTAL FROM ', tbName, ' ', whereStr);

错误：PLS-00103: Encountered the symbol "COUNT_STMT" when expecting one of the following:

      := . ( @ % ; immediate

行：30
文本：@MAIN_STRING:= CONCAT('SELECT ', tbFields, ' FROM ', tbName, ' ', whereStr, ' ', m_order_string, m_limit_string);

  • 写回答

1条回答 默认 最新

  • ChatGPTᴼᴾᴱᴺᴬᴵ 2023-10-06 19:08
    关注

    所有内容均由人工智能模型输出，其内容的准确性和完整性无法保证，不代表我的态度或观点。

    该回答引用ChatGPT-3.5，仅为您提供参考，不保证完全正确
    你好！从你的SQL脚本中可以看出，你试图在Oracle存储过程中使用了一些不支持的语法，PL/SQL（Oracle的存储过程语言）和标准SQL（如MySQL）有一些不同之处。以下是修复您的脚本的建议：

    1. 删除declare行：在PL/SQL中，不需要在BEGIN块之前使用declare来声明变量。

    2. 用PL/SQL的方式定义变量：在PL/SQL中，应该使用:=来分配值给变量，而不是使用=。

    3. 使用IF...THEN...ELSE语句：在PL/SQL中，条件语句应该使用IF...THEN...ELSE语法，而不是if...then。

    4. 替换CONCAT：在Oracle PL/SQL中，可以使用||来连接字符串，而不是CONCAT。

    5. 使用SELECT INTO：在PL/SQL中，应该使用SELECT INTO语句将查询结果存储到变量中。

    根据上述建议，修复后的代码如下：

    CREATE OR REPLACE PROCEDURE PageList(
    tbName IN VARCHAR2,
    tbFields IN VARCHAR2,
    orderField IN VARCHAR2,
    orderType IN INT,
    strWhere IN VARCHAR2,
    pageSize IN INT,
    pageIndex IN INT,
    pageRecord OUT INT
)
IS
    /*定义变量*/
    m_begin_row INT := 0;
    m_limit_string VARCHAR2(64);
    m_order_string VARCHAR2(128);
    orderStr VARCHAR2(64);
    whereStr VARCHAR2(1000);
    ROWS_TOTAL INT;
    MAIN_STRING VARCHAR2(1000);
    COUNT_STRING VARCHAR2(1000);

BEGIN
    /*构造语句*/
    IF orderType = 1 THEN
        orderStr := 'asc';
    ELSE
        orderStr := 'desc';
    END IF;

    IF (strWhere <> '') THEN
        whereStr := ' where ' || strWhere || ' ';
    ELSE
        whereStr := ' ';
    END IF;

    m_begin_row := (pageIndex - 1) * pageSize;
    m_limit_string := ' LIMIT ' || m_begin_row || ', ' || pageSize;
    m_order_string := ' order by ' || orderField || ' ' || orderStr;

    COUNT_STRING := 'SELECT COUNT(*) INTO ROWS_TOTAL FROM ' || tbName || whereStr;
    MAIN_STRING := 'SELECT ' || tbFields || ' FROM ' || tbName || ' ' || whereStr || m_order_string || m_limit_string;

    /*预处理*/
    EXECUTE IMMEDIATE COUNT_STRING;
    pageRecord := ROWS_TOTAL;

    EXECUTE IMMEDIATE MAIN_STRING;

END;

    请注意，这只是一个修复了PL/SQL语法错误的版本。请根据您的需求进一步测试和调整存储过程。另外，根据你的数据库版本，可能需要对一些语法进行微调。

    该回答引用NewBing，仅为您提供参考，不保证完全正确
    您好，这是 Bing。我看了您的存储过程代码，发现了一些语法错误，希望能帮助您解决问题。😊

    • 您的存储过程没有正确地使用 BEGIN 和 END 来包围代码块。您需要在第 5 行和最后一行加上 BEGIN 和 END，以及在第 11 行和第 37 行加上 END IF。
    • 您的存储过程使用了 @ 符号来定义变量，这是 MySQL 的语法，而不是 Oracle 的语法。Oracle 的语法是使用 : 符号来定义变量，并且需要在 DECLARE 语句中声明变量的类型。例如，您可以将第 25 行改为：DECLARE count_string VARCHAR2(1000); 然后将第 29 行改为：count_string := CONCAT('SELECT COUNT(*) INTO rows_total FROM ', tbName, ' ', whereStr);
    • 您的存储过程使用了 CONCAT 函数来拼接字符串，这是 MySQL 的语法，而不是 Oracle 的语法。Oracle 的语法是使用 || 符号来拼接字符串。例如，您可以将第 29 行改为：count_string := 'SELECT COUNT(*) INTO rows_total FROM ' || tbName || ' ' || whereStr;
    • 您的存储过程使用了 PREPARE 和 EXECUTE 语句来执行动态 SQL，这是 MySQL 的语法，而不是 Oracle 的语法。Oracle 的语法是使用 EXECUTE IMMEDIATE 语句来执行动态 SQL，并且需要使用 USING 子句来传递参数。例如，您可以将第 30 行改为：EXECUTE IMMEDIATE count_string USING tbName, whereStr;
    • 您的存储过程没有正确地返回结果集给调用者。如果您想返回一个游标类型的结果集，您需要在存储过程的参数列表中定义一个 OUT 参数，并且在代码中使用 OPEN FOR 语句来打开游标。例如，您可以在第一行加上：pageList OUT SYS_REFCURSOR 然后将第 36 行改为：OPEN pageList FOR main_string USING tbFields, tbName, whereStr, orderField, orderStr;

    源: 与必应的对话， 2023/10/6
    (1) oracle存储过程的异常写法 - 托马斯骨头收集 - 博客园. https://www.cnblogs.com/thomasbc/p/15656618.html.
    (2) oracle存储过程编译错误问题_forlab的博客-CSDN博客. https://blog.csdn.net/forlab/article/details/84398849.
    (3) Oracle存储过程语法及编译过程讲解 - 小强找BUG - 博客园. https://www.cnblogs.com/zgq123456/p/9897112.html.
    (4) Oracle 模式如何查看存储过程创建与编译过程中语法错误或不兼容的语法 -OceanBase 数据库-OceanBase知识库. https://www.oceanbase.com/knowledge-base/oceanbase-database-20000001002.

    该回答引用文心一言，仅为您提供参考，不保证完全正确
    首先，PL/SQL中的声明部分不需要使用declare关键字，只需要直接列出变量即可。declare关键字在PL/SQL块中使用，而不是在过程或函数的声明部分。所以，你应该移除declare关键字。

    其次，你在设置变量@COUNT_STRING和@MAIN_STRING的值时使用了:=运算符。然而，在PL/SQL中，应该使用:=运算符来赋值给变量，而不是@符号。所以，你应该将@COUNT_STRING和@MAIN_STRING改为:= COUNT_STRING和:= MAIN_STRING。

    最后，你在预处理语句时使用了@COUNT_STRING和@MAIN_STRING变量，但这些变量在PL/SQL中并不是有效的标识符。你应该使用普通的PL/SQL变量来存储这些字符串，并在预处理语句时使用这些变量。

    下面是修改后的代码：

    CREATE OR REPLACE PROCEDURE "PageList"(
    tbName IN VARCHAR2,
    tbFields IN VARCHAR2,
    orderField IN VARCHAR2,
    orderType IN INT,
    strWhere IN VARCHAR2,
    pageSize IN INT,
    pageIndex IN INT,
    pageRecord OUT INT
) IS
    m_begin_row  INT DEFAULT 0;
    m_limit_string VARCHAR2(64);
    m_order_string VARCHAR2(128);
    orderStr VARCHAR2(64);
    whereStr VARCHAR2(1000);
    count_string VARCHAR2(1000);
    main_string VARCHAR2(1000);
BEGIN
    IF orderType = 1 THEN
        orderStr := 'asc';
    ELSE
        orderStr := 'desc';
    END IF;

    IF (strWhere <> '') THEN
        whereStr := CONCAT(' where ', strWhere, ' ');
    ELSE
        whereStr := ' ';
    END IF;
 
    m_begin_row := (pageIndex - 1) * pageSize;
    m_limit_string := CONCAT(' LIMIT ', m_begin_row, ', ', pageSize);
    m_order_string := CONCAT(' order by ', orderField, ' ', orderStr);
 
    count_string := CONCAT('SELECT COUNT(*) INTO :ROWS_TOTAL FROM ', tbName, ' ', whereStr);
    main_string := CONCAT('SELECT ', tbFields, ' FROM ', tbName, ' ', whereStr, ' ', m_order_string, m_limit_string);
 
    -- 预处理
    PREPARE count_stmt FROM count_string USING pageRecord;
    EXECUTE count_stmt;
    DEALLOCATE PREPARE count_stmt;
 
    PREPARE main_stmt FROM main_string;
    EXECUTE main_stmt;
    DEALLOCATE PREPARE main_stmt;
END;

    请注意，我使用:ROWS_TOTAL来引用输出变量pageRecord。在PL/SQL中，使用冒号前缀来表示绑定变量。绑定变量在执行时可以动态地传入或传出值。在预处理语句时，使用USING子句来指定绑定变量的值。

    该回答引用讯飞星火，仅为您提供参考，不保证完全正确
    根据您提供的错误信息，问题出在代码中的 "IF" 关键字。在 PL/SQL 中，应该使用 "IF" 而不是大写的 "IF"。请将代码中的 "IF" 改为小写的 "if"，然后重新编译。

    修改后的代码如下：

    create or replace procedure "PageList"(tbName IN VARCHAR2,tbFieldsIN VARCHAR2, orderField IN VARCHAR2,orderType IN INT,strWhere IN VARCHAR2,pageSize IN INT,pageIndex IN INT,pageRecord OUT INT)
is
BEGIN

/*定义变量*/
declare m_begin_row  INT DEFAULT 0;
declare m_limit_string varchar2(64);
 
declare m_order_string varchar2(128);
declare orderStr varchar2(64);
declare whereStr varchar2(1000);
 
/*构造语句*/
if orderType = 1 then
orderStr:= 'asc';
else
orderStr:= 'desc';
end if;

if (strWhere<>'') then
whereStr:= CONCAT(' where ',strWhere,' ');
else
whereStr:= ' ';
end if;
 
 m_begin_row:= (pageIndex - 1) * pageSize;
m_limit_string:= CONCAT(' LIMIT ', m_begin_row, ', ', pageSize);
m_order_string:= CONCAT(' order by ',orderField,' ',orderStr);
 
@COUNT_STRING:= CONCAT('SELECT COUNT(*) INTO @ROWS_TOTAL FROM ', tbName, ' ', whereStr);
@MAIN_STRING:= CONCAT('SELECT ', tbFields, ' FROM ', tbName, '  ', whereStr, '  ', m_order_string, m_limit_string);
 
/*预处理*/
PREPARE count_stmt FROM @COUNT_STRING;
EXECUTE count_stmt;
DEALLOCATE PREPARE count_stmt;
SET pageRecord = @ROWS_TOTAL;
 
PREPARE main_stmt FROM @MAIN_STRING;
EXECUTE main_stmt;
DEALLOCATE PREPARE main_stmt;
END

    该回答引用通义千问，仅为您提供参考，不保证完全正确
    你的存储过程中的错误是由于SQL语句中的拼写错误导致的。在PL/SQL中，使用"EXECUTE IMMEDIATE"语句来执行动态生成的SQL语句时，应该使用"EXECUTE IMMEDIATE"而不是"EXECUTE"。以下是修改后的存储过程代码：

    CREATE OR REPLACE PROCEDURE "PageList"(tbName IN VARCHAR2, tbFieldsIN VARCHAR2, orderField IN VARCHAR2, orderType IN INT, strWhere IN VARCHAR2, pageSize IN INT, pageIndex IN INT, pageRecord OUT INT)
IS
BEGIN

/*定义变量*/
DECLARE m_begin_row  INT DEFAULT 0;
DECLARE m_limit_string VARCHAR2(64);
 
DECLARE m_order_string VARCHAR2(128);
DECLARE orderStr VARCHAR2(64);
DECLARE whereStr VARCHAR2(1000);
 
/*构造语句*/
IF orderType = 1 THEN
orderStr:= 'asc';
ELSE
orderStr:= 'desc';
END IF;

IF (strWhere<>'') THEN
whereStr:= CONCAT(' where ',strWhere,' ');
ELSE
whereStr:= ' ';
END IF;
 
 m_begin_row:= (pageIndex - 1) * pageSize;
m_limit_string:= CONCAT(' LIMIT ', m_begin_row, ', ', pageSize);
m_order_string:= CONCAT(' order by ',orderField,' ',orderStr);
 
@COUNT_STRING:= CONCAT('SELECT COUNT(*) INTO @ROWS_TOTAL FROM ', tbName, ' ', whereStr);
@MAIN_STRING:= CONCAT('SELECT ', tbFields, ' FROM ', tbName, '  ', whereStr, '  ', m_order_string, m_limit_string);
 
/*预处理*/
EXECUTE IMMEDIATE @COUNT_STRING;
DEALLOCATE PREPARE @COUNT_STMT;
SET pageRecord = @ROWS_TOTAL;
 
EXECUTE IMMEDIATE @MAIN_STRING;
DEALLOCATE PREPARE @MAIN_STMT;
END;

    在这个修正后的存储过程中，我们在使用"EXECUTE IMMEDIATE"语句时将变量名前的"EXECUTE"替换为"EXECUTE IMMEDIATE"。这样，存储过程就能正确地执行动态生成的SQL语句了。

    评论

报告相同问题？

悬赏问题

  • ¥50 如何增强飞上天的树莓派的热点信号强度，以使得笔记本可以在地面实现远程桌面连接
  • ¥15 MCNP里如何定义多个源？
  • ¥20 双层网络上信息-疾病传播
  • ¥50 paddlepaddle pinn
  • ¥20 idea运行测试代码报错问题
  • ¥15 网络监控：网络故障告警通知
  • ¥15 django项目运行报编码错误
  • ¥15 STM32驱动继电器
  • ¥15 Windows server update services
  • ¥15 关于#c语言#的问题：我现在在做一个墨水屏设计，2.9英寸的小屏怎么换4.2英寸大屏