关于%FOUND函数请教

KienR9

有些图号本来在ABXX这个表里面是没有记录的，就应该为0的，但它居然读出数来，而且跟上一个图号读到的数一样（这个是正确的），后来不用%FOUND这个函数改成用指示器就正确了，感觉很怪异，请高手指教！   

出现问题前
  KL$           SETLL     ABXXR                        
  KL$1          READE     ABXXR                        
                IF        %FOUND(XXXXL01)              
                EVAL      W1CDEF = ABCDEF        
                ELSE                                   
                EVAL      W1CDEF = 0      
                ENDIF         

修改后                                    
  KL$           SETLL     ABXXR                        
  KL$1          READE     ABXXR                                  90                     
                IF        *IN90 = *OFF            
                EVAL      W1CDEF = ABCDEF        
                ELSE                                   
                EVAL      W1CDEF = 0      
                ENDIF

AS400虫子

第一点:reade后面跟的指示符应该%eof.而不是%found

          setll和%found配合使用,不是精确定位,库表key值里只要有>KL$ , 就是%found

第二点:如果记录存在,指示器为0

fxf_china

%found 也可用于chain

KienR9

这个烂系统都很久的了，80年代日本的产品，大把东西改，改完这个改那个，烦啊