我已经搜索过,并没有找到解决方案,需要对这么多列进行比较.
我有1个大表(ruleTable)与ca. 300列和1723行以及另一个表(sampleTable),其中包含1行和完全相同的列.
我想要做的是编写一个过程(带有2个参数:sampleTable和ruleTable),将第2行中的第1行与第1个表中的每一行进行比较.
所需的结果是一个包含1723行和3列的表:RULE_ID,WRONG(具有相同值的列数),RIGHT((具有不同值的列数)
直到现在我写了一个程序(你可以在下面看到它),但它肯定会变慢,完成任务需要很长时间.有人知道如何改进这种方法(或者可能完全改变)并应对这个问题?最大的问题是列数……
PROCEDURE MAKE_CLASSIFICATION(sampleTable VARCHAR2,ruleTable VARCHAR2) AS
l_query VARCHAR2(10000) := '';
l_rulesColumns TEXTLIST := GetFeatureColumnList(ruleTable);
l_rulesIDs TEXTLIST := GetTableColumnValues(ruleTable,'ID');
rule_value NUMBER;
sample_value NUMBER;
right NUMBER := 0;
wrong NUMBER := 0;
BEGIN
FOR j IN 1..l_rulesIDs.count()
LOOP
FOR i IN 1..l_rulesColumns.count()
LOOP
l_query := 'SELECT ' || l_rulesColumns(i) || ' FROM ' || ruleTable || ' WHERE ID=' || l_rulesIDs(j);
EXECUTE IMMEDIATE l_query INTO rule_value;
l_query := 'SELECT ' || l_rulesColumns(i) || ' FROM ' || sampleTable || ' WHERE rownum=1';
EXECUTE IMMEDIATE l_query INTO sample_value;
IF(rule_value = sample_value) THEN right:=right+1;
ELSE wrong := wrong + 1;
END IF;
END LOOP;
DBMS_output.put_line('right: ' || right || '; wrong: ' || wrong );
wrong := 0;
right := 0;
END LOOP;
END;
类型TEXTLIST是全局定义的:
TYPE TEXTLIST IS VARRAY(1000000) OF VARCHAR2(10000);
GetFeatureColumnList – >此函数返回带有表colmun名称列表的TEXTLIST(没有’ID’列)
GetTableColumnValues – >此函数返回TEXTLIST,其中列出了COLUMN的所有值(在我们的例子中 – 列’ID’)
提前感谢您的帮助朋友.