一位51job的DBA朋友正好面临同样的问题, 我就推荐了这个程序给他. 早上正式使用后, 回馈说程序运行相当的快速和准确, 几分钟内完成手工几个小时才能完成的事, 并给出可读性很好很清晰的比较报告, 因此决定作为正式工具在公司内部使用, 以大大的减少了DBA在这类琐事上无谓的时间消耗. 每年年初他们网站的流都要上升个几倍, 因此需要花更多的时间面对负荷的上升, 就不能花太多的时间在手工比较表结构这种事上面. 这个角本再加上良好的SQL编写习惯, 可以防止某些低级错误.

    这个工具是命令行的OCI程序, 做成命令行是为了更适合在OS上进行作业调度, 这一点虽不为大众所喜欢, 但却是很实用的. 这是一个三年前开发的工具, 已经成熟稳重了, 并且和人工处理相比, 它的结果更加准确. ocidiff是点对点的比较, 另一个工具(Compare Any Column)则可以进行多点之间的比较, 比较方式更加灵活.

    作为一个很偷懒的DBA, 有好几个用来偷懒的角本. 不偷懒的DBA不是好DBA, 不是指不做事的, 是指在做事中相办法偷时间的.

Relative Posts:

• 2008/03/03 -- 先报身高? 还是体重? (4)
• 2009/02/05 -- 导出时如何统一表空间? (2)
• 2008/06/23 -- 根据表名搜索SQL语句 (0)
• 2008/05/26 -- ASSM表空间真浪费 (6)
• 2008/05/15 -- 将dmp数据导入到另一个表 (3)
• 2008/03/13 -- 如何防止大的DML语句? (3)
• 2008/02/14 -- Rename Table的语法 (0)
• 2007/12/24 -- Get DDL工具 (7)
• 2007/12/11 -- 删除4TB的表 (5)
• 2007/08/21 -- 如何获得X$表上的特殊索引信息? (0)

INSERT INTO tablename VALUES (…)

    只有Insert语句不带字段列表的情况下, 才与列的顺序有关系, 但这不是一个好的习惯. 比方在多表关联时, 选择列时不加表名就不是个好习惯. 去年参加年会时, 淘宝的朋友曾提及以前就遇到过这样的问题, 在一个不太重要的系统中, 关联的两个表一开始所有字段名都不同, 后来有一天在一个表上加了和另一个表中某列同名的列, 这时应用出问题了.

SELECT A.COL1, B.COL2, … FROM A, B WHERE …

    很多都是简单的事, 如果一直坚持了就很好, 如果不坚持, 有时就是很坏的事. 要让一个人坚持, 那还比较容易, 要让一个队伍坚持, 就有些难了, 让一个IT业流动性较大的队伍坚持, 就更难了.

Relative Posts:

• 2008/03/04 -- ocidiff助力51job日常维护 (6)
• 2009/02/05 -- 导出时如何统一表空间? (2)
• 2008/06/23 -- 根据表名搜索SQL语句 (0)
• 2008/05/26 -- ASSM表空间真浪费 (6)
• 2008/05/15 -- 将dmp数据导入到另一个表 (3)
• 2008/03/13 -- 如何防止大的DML语句? (3)
• 2008/02/14 -- Rename Table的语法 (0)
• 2007/12/24 -- Get DDL工具 (7)
• 2007/12/11 -- 删除4TB的表 (5)
• 2007/08/21 -- 如何获得X$表上的特殊索引信息? (0)

10000,21,COL$,

    在LOGCOL.TXT中加入如下行, 不过由于COL$是Cluster表, 因此这里列出来的比真实的表列数少一列, 刚好少Cluster的那列:

10000,1,COL#,NUMBER
10000,2,SEGCOL#,NUMBER
10000,3,SEGCOLLENGTH,NUMBER
10000,4,OFFSET,NUMBER
10000,5,NAME,VARCHAR2
10000,6,TYPE#,NUMBER
10000,7,LENGTH,NUMBER
10000,8,FIXEDSTORAGE,NUMBER
10000,9,PRECISION#,NUMBER
10000,10,SCALE,NUMBER
10000,11,NULL$,NUMBER
10000,12,DEFLENGTH,NUMBER
10000,13,SPARE6,DATE
10000,14,INTCOL#,NUMBER
10000,15,PROPERTY,NUMBER
10000,16,CHARSETID,NUMBER
10000,17,CHARSETFORM,NUMBER
10000,18,SPARE1,NUMBER
10000,19,SPARE2,NUMBER
10000,20,SPARE3,NUMBER
10000,21,SPARE4,VARCHAR2
10000,22,SPARE5,VARCHAR2
10000,23,DEFAULT$,LONG

    没有办法知道这个操作是对那个对象进行的, 因为OBJ#列的变更不记录在这儿. 终于明白为什么Shareplex不支持Cluster表了, 不过Single Hash Cluster表应当是可以支持的.

RBA=0×000069.000010b0.0018,  XID=0×0009.016.00000093, RID=AAAAACAABAAAGq4AAR
   DELETE COL$ WHERE  COL# =  3 AND  SEGCOL# =  3 AND  SEGCOLLENGTH =  7 AND  OFFSET =  0 AND  NAME =  ’COL3′ AND  TYPE# =  12 AND  LENGTH =  7 AND  FIXEDSTORAGE =  0 AND  PRECISION# =   NULL  AND  SCALE =   NULL  AND  NULL$ =  0 AND  DEFLENGTH =   NULL  AND  SPARE6 =   NULL  AND  INTCOL# =  3 AND  PROPERTY =  0 AND  CHARSETID =  0 AND  CHARSETFORM =  0 AND  SPARE1 =  0 AND  SPARE2 =  0 AND  SPARE3 =  0;

    所有的Cluster表都存在这个问题, 因此大部份系统表将不能正常解出Redo SQL.

Relative Posts:

• 2007/06/02 -- MyLOG程序对于Drop类误操作恢复的作用 (0)
• 2007/05/30 -- 解出Oracle日志文件中的Redo SQL语句之十 (14)
• 2007/05/30 -- 解出Oracle日志文件中的Redo SQL语句之九 (1)
• 2007/05/29 -- 解出Oracle日志文件中的Redo SQL语句之八 (3)
• 2007/05/28 -- 解出Oracle日志文件中的Redo SQL语句之七 (1)
• 2007/05/28 -- 解出Oracle日志文件中的Redo SQL语句之六 (0)
• 2007/05/25 -- 解出Oracle日志文件中的Redo SQL语句之五 (1)
• 2007/05/24 -- 解出Oracle日志文件中的Redo SQL语句之四 (2)
• 2007/05/22 -- 解出Oracle日志文件中的Redo SQL语句之二 (5)
• 2007/05/21 -- 解出Oracle日志文件中的Redo SQL语句之一 (2)

{
  ROW1  {col1, col2, col3, col4},
  ROW2  {col1, col2, col3, col4},
  …..
  ROWn  {col1, col2, col3, col4}
}

    但实际上在绑定时, 是这样的:

$sth->bind_param_array( COL1={row1, row2, … rown});
$sth->bind_param_array( COL2={row1, row2, … rown});
…..
$sth->bind_param_array( COLn={row1, row2, … rown});

    因此需要转换, 但其实数据库底层(象OCI)使用Array Fetch时传回来的方式是按列存贮的, 如下所示:

COL1={ROW1, ROW2, …, ROWn}
COL2={ROW1, ROW2, …, ROWn}
……
COLn={ROW1, ROW2, …, ROWn}

    在很多时侯, Perl在取回时进行了从列到行的转换, 我们在绑定时又进行了从行到列的转换, 有点多此一举啊, 影响效率.

Relative Posts:

• 2007/01/10 -- 学习Perl DBI — 真正的Array DML支持 (2)
• 2007/01/09 -- 学习Perl DBI — Array Insert/Update/Delete (0)
• 2007/01/08 -- 学习Perl DBI — 处理返回记录(Fetch) (0)
• 2007/09/04 -- 在Perl中用Array DML来进行性能调优 (0)
• 2007/01/09 -- 学习Perl DBI — 语句的高级属性 (0)
• 2007/01/09 -- 学习Perl DBI — 数据库连接的高级属性 (0)
• 2007/01/08 -- 学习Perl DBI — 绑定(Bind)变量 (1)
• 2007/01/08 -- 学习Perl DBI — 处理查询语句 (0)
• 2007/01/08 -- 学习Perl DBI — 连接到数据库 (0)
• 2007/01/08 -- 学习Perl DBI — Database Driver (0)

SQL>  exec dbms_redefinition.can_redef_table( USER, ‘T_DEF1′) ;

PL/SQL procedure successfully completed.

    接下来正式开始进行联机重定义:

SQL> exec dbms_redefinition.START_REDEF_TABLE( USER, ‘T_DEF1′, ‘T_DEF1_TMP’);

PL/SQL procedure successfully completed.

    在将要结束前, 先同步一下变更的记录, 可以常跑这个过程, 以让结束时更快一些.

SQL> exec dbms_redefinition.sync_interim_table( USER, ‘T_DEF1′, ‘T_DEF1_TMP’);

PL/SQL procedure successfully completed.

    可是现在我在表上面加一个列呢?

SQL> alter table t_def1 add col1000 number;

Table altered.

    现在正式结束联机重定义:

SQL> exec dbms_redefinition.FINISH_REDEF_TABLE(USER, ‘T_DEF1′, ‘T_DEF1_TMP’);

PL/SQL procedure successfully completed.

    再来查查表结构?

SQL> desc T_DEF1
Name                   Null?    Type
———————- ——– —————–
OBJECT_ID              NOT NULL NUMBER
……
SECONDARY                       VARCHAR2(1)

SQL> desc T_DEF1_TMP
Name                   Null?    Type
———————- ——– ——————
OBJECT_ID              NOT NULL NUMBER
……
SECONDARY                       VARCHAR2(1)
COL1000                         NUMBER

    只有Temp表上有新增的列, 两个不同的人在同时做这两件事时, 真的很难预先想到这一点.

Relative Posts:

• 2008/03/04 -- ocidiff助力51job日常维护 (6)
• 2008/03/03 -- 先报身高? 还是体重? (4)
• 2007/06/03 -- 用MyLOG解出对COL$系统表进行的操作 (0)
• 2010/06/19 -- 2011年起SQLULDR2中的收费功能 (3)
• 2009/11/07 -- MySQL数据迁移测试 (8)
• 2009/06/25 -- oramon如何收集V$SYSTEM_EVENT数据? (3)
• 2009/06/25 -- oramon如何从V$SESSION收集性能数据? (0)
• 2009/06/24 -- oramon如何从V$SYSSTAT收集性能数据? (1)
• 2009/05/26 -- MySQL或Oracle, 是个问题? (7)
• 2009/05/21 -- 用oramon的数据进行报警 (3)