Oracle加锁

Question

后端数据库采用Oracle 8i,前端用Delphi 6；连接采用BDE；
问题：对一数据表的某单号字段，为了放置多人同时插入，需要加锁，在sql *plus
可用的加锁SQL 'select 单号 FROM AAA FOR UPDATE ', 在Delphi执行时报错，
“BDE error 13059, Ora-01002 读取违反顺序”
在DELPHI中如何ORACLE实现加锁呢？

Answer 1

用存储过程实现，select 单号 FROM AAA FOR UPDATE；
insert into 

Answer 2

to 76liujing(靖) :
  我也想到存储过程，但直接在Delphi中不行吗？在PowerBuilder中都可以。

Answer 3

对的，直接在delphi中不能。
实际上我在项目中就是用的这种土办法的。效果还是蛮好的。