DROP TABLE IF EXISTS 等效于 SAS 的 TERADATA

DROP TABLE IF EXISTS equivalent for TERADATA from SAS

我正在努力避免错误:

ERROR: Teradata execute: Object 'MY_TABLE' does not exist.

从 SAS 执行 TERADATA SQL 时

这是我使用的原始 SAS 代码:

proc sql;
    connect to TERADATA (user='my_user' password=XXXXXXXXXX MODE=TERADATA TDPID='bdpr');
    execute(database MY_DB) by TERADATA;
    execute(Drop table MY_TABLE;) by TERADATA;
    disconnect from TERADATA;
quit;

根据文档,.SET ERRORLEVEL 3807 SEVERITY 0 应该可以解决我的问题。

我尝试在 DROP TABLE 语句之前插入以下内容:

execute(.SET ERRORLEVEL 3807 SEVERITY 0) by TERADATA;
execute(ECHO '.SET ERRORLEVEL 3807 SEVERITY 0') by TERADATA;

我尝试将两者结合起来:

execute(ECHO '.SET ERRORLEVEL 3807 SEVERITY 0'; Drop table MY_TABLE;) TERADATA;

没有 ECHO 的调用存在语法错误,或者在尝试 ECHO 变体时对错误没有影响。

问题是 .SET ERRORLEVEL 不是 SQL 语句而是 BTEQ 命令。根据文档,应该可以使用 ECHO 构造从标准 TERADATA SQL 执行 BTEQ 命令。但是从 SAS 看来,这似乎不起作用。

我只需要一个解决方案来避免 SAS 错误,SAS 端解决方案和 TERADATA 解决方案都适合我。

也许这可以帮助你,如果你运行这是一个过程调用:

replace procedure drop_if_exists( in_object varchar(50)) 
begin
  IF EXISTS(SELECT 1 FROM dbc.tables WHERE tablename = in_object 
    and databasename='<your database name>') THEN
    CALL DBC.SysExecSQL('DROP TABLE ' || in_object);
  END IF;
END;

然后通过 sas 调用它:

execute (call drop_if_exists(MY_TABLE);) by TERADATA;

编辑:SAS 调用过程创建

proc sql;
    connect using DBCONN;
    execute(
replace procedure drop_if_exists( in_object varchar(50)) 
begin
  IF EXISTS(SELECT 1 FROM dbc.tables WHERE tablename = in_object 
    and databasename='<my database>') THEN
    CALL DBC.SysExecSQL('DROP TABLE ' || in_object);
  END IF;
END;
    ) by DBCONN;
    disconnect from DBCONN;
quit;

为什么不询问 Teradata table 是否存在,然后让 SAS 有条件地 运行 删除?

%let tablekind=NONE;
select obj into :tablekind trimmed from connection to teradata
  (select case when (tablekind in ('T','O')) then 'TABLE'
          else 'VIEW' end as obj
    from dbc.tablesv
    where databasename = 'MY_DB' and tablename= 'MY_TABLE'
      and tablekind in ('V','T','O')
  )
;
%if &tablekind ne NONE %then %do;
  execute(drop &tablekind. MY_DB.MY_TABLE;) by teradata;
%end;

我不知道从 SAS 创建 SP 的语法,但我怀疑您是否有权这样做。

您可能会要求您的 DBA 安装以下 SP,它会删除任何类型的 table(包括 Volatile)。

--Drop a table without failing if the table doesn’t exist:
REPLACE PROCEDURE drop_table_if_exists
(
  /* database name, uses default database when NULL.
     Must be calling user for Volatile Tables
  */
  IN db_name VARCHAR(128) CHARACTER SET Unicode, 
  
  /* table name */
  IN tbl_name VARCHAR(128) CHARACTER SET Unicode,
  
  OUT msg VARCHAR(400) CHARACTER SET Unicode
) SQL SECURITY INVOKER – check the rights of the calling user
BEGIN
   DECLARE full_name VARCHAR(361)  CHARACTER SET Unicode;
   DECLARE sql_stmt VARCHAR(500)  CHARACTER SET Unicode;
   
   DECLARE exit HANDLER FOR SqlException
   BEGIN
      -- catch "table doesn't exist" error
      IF SqlCode = 3807 THEN SET msg = full_name || ' doesn''t exist.';
      ELSE
        -- fail on any other error, e.g. missing access rights or wrong object tye
        RESIGNAL;
      END IF;
   END;

   SET full_name = '"' || Coalesce(db_name,DATABASE) || '"."' || Coalesce(tbl_name,'') || '"';

   SET sql_stmt = 'DROP TABLE ' || full_name || ';';

   EXECUTE IMMEDIATE sql_stmt;

   SET msg = full_name || ' dropped.';
END;