基楚問題.解决办法

基楚問題...
感謝您對本文的回應...

<一> 以下例子有沒有 更好的寫法 可以取代
// 例
for i = 1 to this.rowcount()
  ths.setitem( i , 'column' , 'ABC')
next



<二>請問以下兩問例子那一個可以確定 兩次 DELETE 一定會成功....
還是這兩種都不對.... 請先見指正

 // 例一
DELETE FROM public.bas_customer  
using sqlca ;

DELETE FROM public.bas_vendor
using sqlca ;

if sqlca.sqlcode = 0 then
  commit:
else
  rollback;
end if

// 例二
DELETE FROM public.bas_customer  
using sqlca ;

if sqlca.sqlcode = 0 then
  DELETE FROM public.bas_vendor
  using sqlca ;
  if sqlca.sqlcode = 0 then
    commit:
  else
    rollback;
  end if
else
   rollback;
end if


[解决办法]
DELETE FROM public.bas_customer using sqlca ;

if sqlca.sqlcode <> 0 then
  rollback;
end if

DELETE FROM public.bas_vendor using sqlca ;

if sqlca.sqlcode <> 0 then
  rollback;
end if

commit;