我收到错误下标超出限制我如何解决它？

编程问答 2022-04-23

问题描述

我知道这行代码表示 empName(COUNTER) := ENAME;，但我似乎无法弄清楚问题是什么。

SET SERVEROUTPUT ON;

DECLARE
    TYPE nameList IS VARRAY (10) OF VARCHAR2(10);
    empName nameList := nameList();
    ENAME    VARCHAR2(10);
    SAL      NUMBER(7,2);
    COUNTER  NUMBER := 0;

    CURSOR C1 IS
        SELECT ENAME,SAL
        FROM EMP
        WHERE ROWNUM < 11;        
BEGIN
    FOR person IN C1
    LOOP
        ENAME := person.ENAME;
        SAL := person.SAL;
        empName(COUNTER) := ENAME;
        COUNTER := COUNTER + 1;
    END LOOP;
END;
/

解决方法

两个错误：

  • 可变数组索引从 1 开始，而不是 0（第 6 行）
  • 你忘记扩展它（第 14 行）
SQL>   DECLARE
  2      TYPE nameList IS VARRAY (20) OF VARCHAR2(10);
  3      empName nameList := nameList();
  4      ENAME    VARCHAR2(10);
  5      SAL      NUMBER(7,2);
  6      COUNTER  NUMBER := 1;             --> not 0 but 1
  7      CURSOR   C1 IS SELECT ENAME,SAL
  8               FROM EMP
  9               WHERE ROWNUM < 11;
 10
 11    BEGIN
 12          FOR person IN C1
 13          LOOP
 14             empName.extend;             --> you're missing this
 15             ENAME := person.ENAME;
 16             SAL := person.SAL;
 17             empName(COUNTER) := ENAME;
 18             COUNTER := COUNTER + 1;
 19          END LOOP;
 20    END;
 21    /

PL/SQL procedure successfully completed.

SQL>
oracleplsqlvarray