数据库死锁，怎么改下

[qzyuanmu]

INSERT INTO pub_pp_value
( ptid,
ppid,
ppvid,
ppvalue,
creid,
credate )
VALUES ( :is_ptid,
:is_ppid,
:is_ppvid,
:ls_value_1,
:gs_opid,
:dt_time ) using tr_ca;
if tr_ca.sqlcode<>0 then
messagebox ("提示", "添加失败，请检查")
else
commit using tr_ca;
end if

开始没加 commit ，现在加了，不知道能不能解决死锁和堵塞事件 ，求解

[shadowno]

if tr_ca.sqlcode <>0 then
rollback using tr_ca;
messagebox ("提示", "添加失败，请检查")
else
commit using tr_ca;
end if

[yfq85825]

if tr_ca.sqlcode <>0 then
rollback using tr_ca;
messagebox("提示","记录添加失败")
else
commit using tr_ca;
end if

[eviler]

commit 和 rollback 都是必要的 ，好的习惯是 及时 commit / rollback

查了一下 ，好像说的是 ，索引会引起 这样的死锁 ，特别是 位图索引