PLS-00225：子程序或游标“CHR”引用超出范围

Posted 2023-03-23

【中文标题】PLS-00225：子程序或游标“CHR”引用超出范围

【英文标题】：PLS-00225: subprogram or cursor 'CHR' reference is out of scope

【发布时间】：2016-09-07 11:51:50

【问题描述】：

我在 plsql 中创建了一个程序，它返回这个错误，任何人都知道我在这里发布我的代码和错误快照

    CREATE OR REPLACE PROCEDURE CHR.ATT_INSERT_TEST
IS
   CURSOR ATT
   IS
      SELECT   emp.EMPLOYEE_ID EMPLOYEE_ID,
         io.CHECKTYPE CHECKTYPE,
         io.MACHINE_NUM MACHINE_NUM,
         io.ATT_ID ATT_ID, 
         io.SWIPE_DATE SWIPE_DATE,
         io.SWIPE_TIME SWIPE_TIME
  FROM   INOUT_LIVE_MACHINE_TEST io, CHR_EMGT_EMPLOYEE emp
 WHERE   emp.EMPLOYEE_CODE = io.EMPLOYEE_CODE
 AND io.ATT_ID NOT IN (SELECT   ATT_ID_REF
                                 FROM   CHR_TA_EMP_SWIPE_IN_OUT
                                WHERE   io.ATT_ID = ATT_ID_REF);
BEGIN
   FOR I IN ATT
   LOOP
      INSERT INTO CHR_TA_EMP_SWIPE_IN_OUT (EMPLOYEE_ID,
                                           SWIPE_DATE,
                                           SWIPE_TIME,
                                           SWIPE_ID,
                                           SWIPE_TYPE,
                                           CREATED_BY,
                                           CREATION_DATE,
                                           CLIENT_IP)
        VALUES   (I.EMPLOYEE_ID,
                  TO_DATE (i.SWIPE_DATE, 'MM/DD/YYYY'),
                  I.SWIPE_TIME,
                  CHR_TA_SWIPE_IN_OUT_SEQ.NEXTVAL,
                  I.CHECKTYPE,
                  I.EMPLOYEE_ID,
                  TO_DATE (i.SWIPE_DATE, 'MM/DD/YYYY'),
                  '192.168.0.71'
                  );
   END LOOP;
COMMIT;
END;
/

这是我的程序，我大部分时间都在做子查询，但这次它返回了这种错误。 我认为这个错误表明一些问题与别名有关，但我已经为每一列定义了别名 我读了这篇文章，但我的代码仍然卡住了

PLS-00402: alias required in SELECT list of cursor to avoid duplicate column names

这是我的表结构

CREATE TABLE CHR.CHR_TA_EMP_SWIPE_IN_OUT
(
  EMPLOYEE_ID       NUMBER(10)                  NOT NULL,
  SWIPE_DATE        DATE                        NOT NULL,
  SWIPE_TIME        DATE                        NOT NULL,
  SWIPE_ID          NUMBER(10)                  NOT NULL,
  SWIPE_TYPE        VARCHAR2(1 BYTE),
  CREATED_BY        NUMBER(10),
  CREATION_DATE     DATE,
  LAST_UPDATED_BY   NUMBER(10),
  LAST_UPDATE_DATE  DATE,
  IS_MANUAL         VARCHAR2(1 BYTE),
  REASON_LKP        NUMBER(10),
  CLIENT_IP         VARCHAR2(50 BYTE),
  IS_REQUESTED      VARCHAR2(1 CHAR),
  TERMINAL_ID       VARCHAR2(50 BYTE),
  ATT_ID_REF        NUMBER
)

CREATE TABLE CHR.CHR_EMGT_EMPLOYEE
(
  EMPLOYEE_ID                NUMBER(10)         NOT NULL,
  EMPLOYEE_CODE              VARCHAR2(30 BYTE)  NOT NULL
  )



CREATE TABLE CHR.INOUT_LIVE_MACHINE_TEST 
(
  ATT_ID         NUMBER,
  USERID         NUMBER,
  EMPLOYEE_CODE  NUMBER,
  SENSORID       NUMBER,
  MACHINE_NUM    VARCHAR2(20 BYTE),
  CHECKTIME      VARCHAR2(20 BYTE),
  CHECKTYPE      VARCHAR2(20 BYTE)
)

【问题讨论】：

您能否从“PROCEDURE CHR.ATT_INSERT_TEST”中删除 CHR 并尝试一次..

是的，我尝试但同样的问题

请发布表 ddl 以便我也可以检查..创建表语句

请检查表结构

第一个表和第三个表名相同，并且 INOUT_LIVE_MACHINE_TEST 和 CHR_EMGT_EMPLOYEE 的 ddl 缺失

【参考方案1】：

您的程序没有错误。唯一的问题在于您的表“INOUT_LIVE_MACHINE_TEST”。它缺少 SWIPE_DATE 和 SWIPE_TIME 列。请参阅下面的工作演示。

已创建包含两列的表：

CREATE TABLE INOUT_LIVE_MACHINE_TEST 
(
  ATT_ID         NUMBER,
  USERID         NUMBER,
  EMPLOYEE_CODE  NUMBER,
  SENSORID       NUMBER,
  SWIPE_DATE        DATE                        NOT NULL,
  SWIPE_TIME        DATE                        NOT NULL,
  MACHINE_NUM    VARCHAR2(20 BYTE),
  CHECKTIME      VARCHAR2(20 BYTE),
  CHECKTYPE      VARCHAR2(20 BYTE)
)

程序编译：

CREATE OR REPLACE PROCEDURE ATT_INSERT_TEST
IS
   CURSOR ATT
   IS
      SELECT   emp.EMPLOYEE_ID EMPLOYEE_ID,
         io.CHECKTYPE CHECKTYPE,
         io.MACHINE_NUM MACHINE_NUM,
         io.ATT_ID ATT_ID, 
         io.SWIPE_DATE SWIPE_DATE,
         io.SWIPE_TIME SWIPE_TIME
  FROM   INOUT_LIVE_MACHINE_TEST io, CHR_EMGT_EMPLOYEE emp
 WHERE   emp.EMPLOYEE_CODE = io.EMPLOYEE_CODE
 AND io.ATT_ID NOT IN (SELECT   ATT_ID_REF
                                 FROM   CHR_TA_EMP_SWIPE_IN_OUT
                                WHERE   io.ATT_ID = ATT_ID_REF);
BEGIN
   FOR I IN ATT
   LOOP
      INSERT INTO CHR_TA_EMP_SWIPE_IN_OUT (EMPLOYEE_ID,
                                           SWIPE_DATE,
                                           SWIPE_TIME,
                                           SWIPE_ID,
                                           SWIPE_TYPE,
                                           CREATED_BY,
                                           CREATION_DATE,
                                           CLIENT_IP)
        VALUES   (I.EMPLOYEE_ID,
                  TO_DATE (i.SWIPE_DATE, 'MM/DD/YYYY'),
                  I.SWIPE_TIME,
                  CHR_TA_SWIPE_IN_OUT_SEQ.NEXTVAL,
                  I.CHECKTYPE,
                  I.EMPLOYEE_ID,
                  TO_DATE (i.SWIPE_DATE, 'MM/DD/YYYY'),
                  '192.168.0.71'
                  );
   END LOOP;
COMMIT;
END;
/

【讨论】：

亲爱的问题还是一样，我认为这个错误的可能性是由于程序特权吗？

我希望您也删除了 CHR 并运行了我的一段代码。在您的过程名称中使用 CHR 时，它会尝试查找该用户，如果不存在，则会引发错误。它不能是隐私问题，因为它的显示超出了范围。