SETLL的文件能UPDATE吗?

pure

是用U方式打开的, 以SETLL循环, 满足条件UPDATE,然后继续循环, 可以吗? 会不会UPDATE后记录指针复位, 导致死循环呢?

xjromance

更新键字的话 可能会有问题。

NINERI

以SETLL怎么循环? 只能定位
需要配合相关的 READ等操作
READ一笔可以UPDATE

pure

我是这样的:
用U打开一个逻辑文件,然后
*LOVAL     SETLL      FilRec
                 READ       FilRec
           
                  DOW      NOT %EOF   
...
IF      字段值='ABC'
             update FilRec
...
                 READ       FilRec
                 ENDO

george251

如果SETLL只是在开始循环前执行一次的话，不会发生指针复位的问题。
   如果你更新了键字的话，就会出现类似问题。

NINERI

正常来说,是不会有问题
当然不建议修改主键栏位

0406410525

你那么写没问题
注意PF是否是UNIQUE KEY，如果更新了KEY FIELD可能会有DUPLICATE DATE会报错

huangxkst

回复 1# pure


    如果单纯使用setll + read +update 同时文件没有使用commit那么是可以完成目的的。
   如果单纯使用setll + read +update 同时文件使用commit那么有可能出现死循环。

shibuya1212

回复  pure


    如果单纯使用setll + read +update 同时文件没有使用commit那么是可以完成目的的。
...
huangxkst 发表于 2011-11-16 21:24

    求解释

huangxkst

回复 9# shibuya1212


    举一简单的例子：
f file1 uf  e     K disk
.......
C key setll file1
C Dow 1=1
C read file1 88
C if key<> file1key or *in88
C leave
C end
C*update rec inf
C update file1rec 90
.....
C enddo
......
错误之处请指正！：）