0

我想创建从员工记录中获取行的程序，该记录的薪水超过输入数字。然后将该输出输出到文本文件。我不明白我在哪里做错了。请帮帮我。提前致谢。

我有如下结构的员工表。描述表员工；名称空？类型

EMPLOYEE_ID NOT NULL NUMBER(6)
FIRST_NAME VARCHAR2(20)
LAST_NAME NOT NULL VARCHAR2(25)
EMAIL NOT NULL VARCHAR2(25)
PHONE_NUMBER VARCHAR2(20)
HIRE_DATE NOT NULL DATE
JOB_ID NOT NULL VARCHAR2(10)
SALARY NUMBER(8,2)
COMMISSION_PCT NUMBER(2,2)
MANAGER_ID NUMBER(6)
DEPARTMENT_ID NUMBER(4)

当我想在脚本下面运行时。

    CREATE OR REPLACE PROCEDURE P_TEST3 ( P_SAL NUMBER) IS

    TYPE EMP_TEMP IS TABLE OF employees%ROWTYPE;
   V_EMP_ROW     EMP_TEMP ;


 V1 utl_file.file_type;

 E1 utl_file.file_type;

    BEGIN


 V1 := utl_file.fopen('ABC','VALID.txt','W');
E1 := utl_file.fopen('ABC','ERROR.txt','W');

SELECT *  BULK COLLECT INTO V_EMP_ROW   FROM Employees  WHERE salary > p_sal   ;

FOR i IN  V_EMP_ROW.FIRST .. V_EMP_ROW.LAST 
    LOOP
    UTL_FILE.PUT_LINE (V1, V_EMP_ROW(I).EMPLOYEE_ID ||',' || V_EMP_ROW(I).FIRST_NAME ||','|| V_EMP_ROW(I).SALARY );
    END LOOP;

  dbms_output.put_line ('Total row inserted '||sql%rowcount || '.  Please see valid.txt file ' );


EXCEPTION

WHEN OTHERS THEN
raise_application_error( -20002,'An error was encountered - '||SQLCODE||' -ERROR- '||SQLERRM);

utl_file.put_line (E1,SQLCODE || '---' || SQLERRM);

DBMS_OUTPUT.PUT_LINE ('PLEASE SEE Error.txt FILE');

utl_file.fclose(v1);
utl_file.fclose(E1);

 END P_TEST3;

/

并且编译器给出以下错误。[警告] ORA-24344：编译错误 21/42 成功 PLS-00302：必须声明组件 'EMPLOYEE_ID' 21/9 PL/SQL：忽略语句 (1: 0)：警告：已编译但存在编译错误

4

1 回答 1

0

给你错误的行是 21，它似乎是：

UTL_FILE.PUT_LINE (V1, V_EMP_ROW(I).EMPLOYEE_ID ||',' || V_EMP_ROW(I).FIRST_NAME ||','|| V_EMP_ROW(I).SALARY );

我建议问题是在您的 BULK SELECT 语句中没有返回任何行，或者它们不是您期望的格式。

尝试放入类似的东西：

dbms_output.put_line('Record is: '|| V_EMPROW(i));

作为循环中的第一行。

或者，也许在循环之前对批量选择结果进行记录计数：

dbms_output.put_line('Record count is: '|| V_EMPROW.COUNT);
于 2013-02-22T19:47:38.193 回答