PL/SQL编译错误：遇到符号CREATE不符合预期的技术求助

• PL/SQL块不支持直接执行DDL语句：Oracle的PL/SQL块中不能直接写CREATE TABLE这类数据定义语言（DDL）语句，必须通过动态SQL（EXECUTE IMMEDIATE）执行，这是触发PLS-00103错误的直接原因。
• 混用MySQL语法：你使用的IF NOT EXISTS、INSERT INTO OR IGNORE是MySQL专属语法，Oracle完全不支持。
• 基础语法错误：
  • 字符串常量用双引号（"john"），Oracle中双引号仅用于标识符（如表名、列名），字符串必须用单引号。
  • 多条SQL语句（SELECT、赋值语句）结尾缺少分号，导致编译中断。
  • SELECT ... INTO语句遗漏FROM子句，不符合Oracle语法规范。
  • 条件判断中ELSE IF的正确写法是ELSIF（PL/SQL专属语法）。
  • 平均值计算的括号位置错误，当前写法v_max1 + v_max2 + v_max3 / 3会先计算v_max3/3，逻辑应为(v_max1 + v_max2 + v_max3)/3。
  • 初始化逻辑错误：用MIN(salary)初始化v_max1会导致后续无法捕获更高薪资，应初始化为极小值（如0.0）。

核心修正点 #

1. 用EXECUTE IMMEDIATE执行DDL语句，通过查询系统表判断表是否存在，替代IF NOT EXISTS。
2. 替换MySQL兼容语法：用普通INSERT配合TRUNCATE（测试场景）或MERGE（生产场景）替代INSERT INTO OR IGNORE；字符串改用单引号。
3. 补全所有语法缺失，修正逻辑错误。

修正后的完整代码 #

DECLARE
    v_max1 REAL := 0.0;
    v_max2 REAL := 0.0;
    v_max3 REAL := 0.0;
    moy REAL := 0.0;
    temp REAL := 0.0;
    v_num INTEGER := 0;
    v_table_exists NUMBER;
BEGIN
    -- 检查pilot表是否存在，不存在则创建
    SELECT COUNT(*) INTO v_table_exists
    FROM user_tables
    WHERE table_name = 'PILOT';
    
    IF v_table_exists = 0 THEN
        EXECUTE IMMEDIATE 'CREATE TABLE pilot(
            id INTEGER PRIMARY KEY, 
            name VARCHAR(64), 
            city VARCHAR(64), 
            age INTEGER, 
            salary REAL)';
    END IF;

    -- 测试场景下清空表，避免重复插入数据
    EXECUTE IMMEDIATE 'TRUNCATE TABLE pilot';

    -- 插入测试数据，修正字符串引号与语句格式
    INSERT INTO pilot(id, name, city, age, salary) VALUES(1, 'john', 'portland', 34, 35000.0);
    INSERT INTO pilot(id, name, city, age, salary) VALUES(2, 'sam', 'nyc', 29, 30000.0);
    INSERT INTO pilot(id, name, city, age, salary) VALUES(3, 'kim', 'nashville', 39, 40000.0);
    INSERT INTO pilot(id, name, city, age, salary) VALUES(4, 'dan', 'san antonio', 41, 45000.0);

    -- 获取总记录数
    SELECT COUNT(id) INTO v_num FROM pilot;

    -- 遍历薪资，筛选前三高的值
    FOR I IN 1..v_num LOOP
        SELECT salary INTO temp FROM pilot WHERE id = I;
        
        IF temp > v_max1 THEN
            v_max3 := v_max2;
            v_max2 := v_max1;
            v_max1 := temp;
        ELSIF temp > v_max2 THEN
            v_max3 := v_max2;
            v_max2 := temp;
        ELSIF temp > v_max3 THEN
            v_max3 := temp;
        END IF;
    END LOOP;

    -- 计算前三高薪资的平均值
    moy := (v_max1 + v_max2 + v_max3) / 3;
    
    -- 输出结果用于验证
    DBMS_OUTPUT.PUT_LINE('前三高薪资平均值：' || moy);
END;
/

额外优化建议 #

无需手动遍历筛选前三高薪资，可直接用SQL查询实现，效率更高：

SELECT AVG(salary) INTO moy
FROM (
    SELECT salary
    FROM pilot
    ORDER BY salary DESC
    FETCH FIRST 3 ROWS ONLY
);

将这段代码替换原有的循环逻辑，能大幅简化代码结构。

内容的提问来源于stack exchange，提问作者shape