如何根据动态查询删除 table 中的记录?
How can I delete a record in a table, based on dynamic queries?
此问题是 的后续问题。
我目前有以下一段源代码:
CREATE BUFFER h-Table1 FOR TABLE "Table1" NO-ERROR.
IF VALID-HANDLE(h-Table1)
THEN DO:
L-Found = h-Table1:FIND-FIRST("WHERE ...
IF L-Found
THEN h-Table1:BUFFER-DELETE().
当我启动 BUFFER-DELETE()
命令时,出现错误 335 (The Table1 record has NO-LOCK status. DELETE not allowed. (335)
)。我需要如何更改我的源代码才能使其正常工作? (如何更改 Table1 记录的状态?)
h-Table1:FIND-FIRST ("WHERE ....", EXCLUSIVE-LOCK) .
或在第一次找到之后(应该使用明确的 NO-LOCK 选项完成)
hTable1:FIND-CURRENT (EXCLUSIVE-LOCK) .
此问题是
我目前有以下一段源代码:
CREATE BUFFER h-Table1 FOR TABLE "Table1" NO-ERROR.
IF VALID-HANDLE(h-Table1)
THEN DO:
L-Found = h-Table1:FIND-FIRST("WHERE ...
IF L-Found
THEN h-Table1:BUFFER-DELETE().
当我启动 BUFFER-DELETE()
命令时,出现错误 335 (The Table1 record has NO-LOCK status. DELETE not allowed. (335)
)。我需要如何更改我的源代码才能使其正常工作? (如何更改 Table1 记录的状态?)
h-Table1:FIND-FIRST ("WHERE ....", EXCLUSIVE-LOCK) .
或在第一次找到之后(应该使用明确的 NO-LOCK 选项完成)
hTable1:FIND-CURRENT (EXCLUSIVE-LOCK) .