数据库死锁，如何改下

数据库死锁，怎么改下
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 ，现在加了，不知道能不能解决死锁和堵塞事件 ，求解

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

------解决方案--------------------
commit 和 rollback 都是必要的 ，好的习惯是 及时 commit / rollback

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