Functions.DbCommit 方法 |
命名空间: XSharp.RT
提示: |
---|
共享模式:DBCommit() 使数据库更新对其他进程可见。 为确保数据完整性,请在解锁操作之前执行 DBCommit()。 DBCommit() 使用 DOS 中断 21h 功能 68h 执行实际的磁盘写入。 网络软件是否正确实现此请求取决于具体情况。请与网络软件供应商确认是否支持此功能。 |
1FUNCTION Start() 2 LOCAL cName, cAmount 3 USE sales EXCLUSIVE NEW 4 cName := Sales->Name 5 cAmount := Sales->Amount 6 @ 10, 10 GET cName 7 @ 11, 10 GET cAmount 8 READ 9 IF Updated() 10 IF DBAppend() 11 REPLACE Sales->Name WITH cName 12 REPLACE Sales->Amount WITH cAmount 13 Sales->DBCommit() 14 ENDIF 15 ENDIF