在 PL/SQL 中运行查询之前，如何检查列是否存在和表行计数？

Question

我需要执行一个查询，在执行查询之前我需要检查以下两个条件， 1）表格行数为0 2) 存在一个表列。

所以根据我的要求，我写了如下程序，

DECLARE
   rowCount INT;
   column_not_exists exception;
   pragma exception_init (column_not_exists , -00904);
BEGIN
SELECT count(*) INTO rowCount FROM Settings;
IF (rowCount = 0) THEN
Insert into Settings (ID,PROCESSID,AREA) select ID,PROCESSID,AREA from POINT WHERE CLASSNAME = 'ENDPOINT' and PROCESSID IS NOT NULL;
END IF;
exception WHEN column_not_exists THEN NULL;
END;
/

但不知何故没有处理异常，我仍然可以在日志中看到错误消息

PL/SQL: ORA-00904: "PROCESSID": invalid identifier
ORA-06550: line 8, column 1:
PL/SQL: SQL Statement ignored

有人可以在这里帮我验证这两个条件吗？

Answer 1

你最好使用系统视图ALL_TAB_COLUMNS（当然，你需要有权限才能访问它）。另外你需要使用Oracle动态SQL语句“EXECUTE IMMEDIATE”，否则你的代码将无法编译。

我在这里修改了你的代码，请相应地替换这些地方： 较低（t.OWNER）='所有者'， lower(t.TABLE_NAME)='点'

代码：

declare
  rowcount int;
  l_cnt number;
begin
  select count(*) into rowcount from settings;
  if (rowcount = 0) then
   select count(*) into l_cnt from ALL_TAB_COLUMNS t
             where lower(t.OWNER)='owner' and lower(t.TABLE_NAME)='point'
             and lower(t.COLUMN_NAME) in ('processid','area');
     if l_cnt = 2  then
      execute immediate 'insert into settings
        (id, processid, area)
        select id, processid, area
          from point
         where classname = ''ENDPOINT''
           and processid is not null';
    end if;
  end if;

end;