在Oracle中对比一张表的列是否在其他N张表的列

    有个需求，创建一张表，这张表的列包含其余几张表的列，创建好后怎么进行校验对比。

1、创建一个函数，接受列名和目标表名作为参数，并返回一个布尔值，表示该列名是否存在于目标表中。

   CREATE OR REPLACE FUNCTION column_exists_in_target(p_column_name VARCHAR2,p_target_table VARCHAR2) RETURN BOOLEAN ASv_exists NUMBER(1);BEGINSELECT CASE WHEN EXISTS (SELECT 1 FROM user_tab_columns WHERE table_name = p_target_table AND column_name = p_column_name) THEN 1 ELSE 0 END INTO v_exists FROM DUAL;RETURN v_exists = 1;END;

2、创建一个存储过程，遍历其他表的列名，并调用函数来检查列名是否存在于目标表中。将结果插入到临时表中。

   CREATE OR REPLACE PROCEDURE compare_columns ASv_table_name VARCHAR2(100);v_column_name VARCHAR2(100);v_is_matched NUMBER(1);CURSOR cur_tables ISSELECT table_name FROM user_tables WHERE table_name IN ('TABLE1', 'TABLE2', 'TABLE3', 'TABLE4', 'TABLE5', 'TABLE6', 'TABLE7');BEGINFOR table_rec IN cur_tables LOOPv_table_name := table_rec.table_name;-- 查询当前表的列名FOR column_rec IN (SELECT column_name FROM user_tab_columns WHERE table_name = v_table_name) LOOPv_column_name := column_rec.column_name;-- 检查列名是否在目标表中v_is_matched := column_exists_in_target(v_column_name, 'TARGET_TABLE');-- 插入对比结果到临时表INSERT INTO temp_column_comparison (column_name, source_table, is_matched)VALUES (v_column_name, v_table_name, v_is_matched);END LOOP;END LOOP;END;

执行测试

   EXECUTE compare_columns;SELECT * FROM temp_column_comparison;