对于应该是 VARCHAR2(1) 的列使用 CLOB 数据类型是一个非常糟糕的主意。除了开销(实际上很小,因为 Oracle 会将
这确实看起来像是 DevArt 工具的问题,或者可能是您对如何使用它的理解的问题(无意冒犯)。应该有某种方法可以让您指定实体属性的数据类型和/或将这些规范映射到 Oracle 物理数据类型的方法。如果这看起来有点含糊,我很抱歉,我对这个产品不熟悉。
所以,这是基本问题:
SQL> desc t69
Name Null? Type
----------------------------------------- -------- --------
COL1 CLOB
SQL>
SQL> alter table t69 modify col1 varchar2(1)
2 /
alter table t69 modify col1 varchar2(1)
*
ERROR at line 1:
ORA-22859: invalid modification of columns
SQL>
我们可以通过使用 DDL 更改表结构来修复它。因为该模式有许多这样的列,所以值得自动化该过程。此函数删除现有列并将其重新创建为 VARCHAR2。它提供了将 CLOB 列中的数据迁移到 VARCHAR2 列的选项;您可能不需要这个,但它是为了完整性而存在的。 (这不是生产质量代码 - 它需要错误处理、管理 NOT NULL 约束等)
create or replace procedure clob2vc
( ptab in user_tables.table_name%type
, pcol in user_tab_columns.column_name%type
, pcol_size in number
, migrate_data in boolean := true )
is
begin
if migrate_data
then
execute immediate 'alter table '||ptab
||' add tmp_col varchar2('|| pcol_size|| ')';
execute immediate
'update '||ptab
||' set tmp_col = substr('||pcol||',1,'||pcol_size||')';
end if;
execute immediate 'alter table '||ptab
||' drop column '|| pcol;
if migrate_data
then
execute immediate 'alter table '||ptab
||' rename column tmp_col to '|| pcol;
else
execute immediate 'alter table '||ptab
||' add '||pcol||' varchar2('|| pcol_size|| ')';
end if;
end;
/
那么,让我们更改该列...
SQL> exec clob2vc ('T69', 'COL1', 1)
PL/SQL procedure successfully completed.
SQL> desc t69
Name Null? Type
----------------------------------------- -------- ---------------
COL1 VARCHAR2(1)
SQL>
可以以通常的方式自动调用或编写脚本来调用此过程。