指出以下程序的错误declare v_no emp.empno%type; v_sal emp.sal%type; begin v_no:=&v_no; select sal into v_sal from emp where v_no=empno ; update emp set comm=case when v_sal<1000 then 100 when v_sal<=2000 then 80 else 50 end where empno=v_no; end;

有两个错误：

1. 在程序的第一行声明变量时，应该使用 `empno%type` 而不是 `emp.empno%type`。

2. 在 `update` 语句中，应该使用 `v_no` 而不是 `empno`。

下面是修改后的程序：

declare 
  v_no emp.empno%type; 
  v_sal emp.sal%type; 
begin 
  v_no := &v_no; 
  select sal into v_sal from emp where empno = v_no; 
  update emp set comm = case when v_sal < 1000 then 100 when v_sal <= 2000 then 80 else 50 end where empno = v_no; 
end;

相关问题

set serveroutput on; VAR g_n NUMBER; PROMPT 'Please enter empno:'; ACCEPT p_empno NUMBER FORMAT '9999' DEFAULT '260'; DECLARE v_empno NUMBER:=&p_empno; v_ename emp.ename%TYPE; v_sal emp.sal%TYPE; BEGIN SELECT e.ename,e.sal,s.grade INTO v_ename,v_sal,:g_n FROM emp e,salgrade s WHERE e.sal BETWEEN s.losal AND s.hisal AND e.empno=v_empno; DBMS_OUTPUT.PUT_LINE(v_ename); DBMS_OUTPUT.PUT_LINE(v_sal); END; /报错：实际返回的行数超出请求的行数该怎么改呢？

这个报错是因为在SQL语句中使用了变量 g_n，但是没有定义其类型和大小，导致无法正确返回结果。可以通过在SQL语句前面加上类型定义来解决这个问题。

可以尝试将代码修改为如下形式：

set serveroutput on;
VAR g_n NUMBER;
PROMPT 'Please enter empno:';
ACCEPT p_empno NUMBER FORMAT '9999' DEFAULT '260';
DECLARE
  v_empno NUMBER:=&p_empno;
  v_ename emp.ename%TYPE;
  v_sal emp.sal%TYPE;
BEGIN
  SELECT e.ename,e.sal,s.grade INTO v_ename,v_sal,:g_n
  FROM emp e,salgrade s
  WHERE e.sal BETWEEN s.losal AND s.hisal
  AND e.empno=v_empno;
  DBMS_OUTPUT.PUT_LINE(v_ename);
  DBMS_OUTPUT.PUT_LINE(v_sal);
END;
/

在SQL语句中加上类型定义 `NUMBER(4)`，并且将变量 g_n 的类型与其一致，即可解决该问题：

SELECT e.ename,e.sal,s.grade INTO v_ename,v_sal,:g_n NUMBER(4)
FROM emp e,salgrade s
WHERE e.sal BETWEEN s.losal AND s.hisal
AND e.empno=v_empno;

declare a number(4) := '&输入empno'; begin if a in (select empno from emp5) then dbms_output.put_line('这个人存在'),execute immediate 'update emp5 set sal = 20000.00 where empno = :emp_no' using a; else dbms_output.put_line('这个人不存在'),execute immediate 'insert into emp(empno) values :emp_no'using a; end if; end; 报错

感谢您提供的代码。根据您提供的代码和报错信息，我发现您在使用 `execute immediate` 语句时，没有为占位符 `:emp_no` 提供实际的值，导致出现了语法错误。

您可以尝试以下修改：

DECLARE
    a NUMBER(4) := '&输入empno';
BEGIN
    IF a IN (SELECT empno FROM emp5) THEN
        DBMS_OUTPUT.PUT_LINE('这个人存在');
        EXECUTE IMMEDIATE 'UPDATE emp5 SET sal = 20000.00 WHERE empno = :emp_no' USING a;
    ELSE
        DBMS_OUTPUT.PUT_LINE('这个人不存在');
        EXECUTE IMMEDIATE 'INSERT INTO emp5 (empno) VALUES (:emp_no)' USING a;
    END IF;
END;

在 `execute immediate` 语句中，使用 `USING` 子句可以为占位符提供实际的值。例如，在更新语句中，`:emp_no` 就是一个占位符，它会被 `USING a` 替换成变量 `a` 的值。

另外，您需要注意的是，如果使用 `execute immediate` 语句执行 SQL 语句，需要确保 SQL 语句的语法正确，否则会出现语法错误。在这里，我假设您已经确保了 SQL 语句的正确性。