真的好难！异构数据库的分布式事务。

Question

to wwl007(疑难杂症):
能保证安全吗？(因为是分布的)

Answer 1

再简单不过了:
在程序中建2个事务对象SQLCA, local_tran,分别连接不同的数据库,代码这样写:
EXECUTE IMMEDIATE :ls_sql1  USING SQLCA;
EXECUTE IMMEDIATE :ls_sql2  USING local_tran;
IF (local_tran.sqlcode <> -1) and (SQLCA.sqlcode <> -1) THEN
commit using local_tran;
commit using SQLCA;
ELSE
rollback using local_tran;
rollback using SQLCA;
END IF
对多个分布数据库事务类似.