我从一张表上定点提取一个数据去另外一张表,我的程序:
SELECT 1
FOR i = 1 TO RECCOUNT()
    SELECT 1                                            
    GO i
    ? i
    a_stkcd=stkcd                                    
    a_year=SUBSTR( accper,1,4)
    a_month=month_mark
DO CASE
    CASE a_year= '2006' AND a_month='1'
        
        SELECT 2                                            &&打开工作2区，开始处理formanager表
           LOCATE FOR  stkcd=a_stkcd AND SUBSTR( trddt,1,10)=='2004-07-01'
           IF FOUND ()   
        temp_p_b6_bg=Clsprc     
             ELSE
            temp_p_b6_bg=-9999   
        ENDIF

       LOCATE FOR  stkcd=a_stkcd AND SUBSTR( trddt,1,10)=='2004-10-08'
           IF FOUND ()        
        temp_p_b5_bg=Clsprc     
             ELSE
            temp_p_b5_bg=-9999   
        ENDIF
 ..
.
.中间太多就不贴了
.

ENDCASE
   
            
    SELECT 1
    GO i
    replace p_b6_bg WITH temp_p_b6_bg
    replace p_b5_bg WITH temp_p_b5_bg
 ENDFOR
CLOSE TABLES
最后replace到第一张表. 它显示temp_p_b6_bg找不到. 而且是所有的temp都找不到.
这是第一次出现这种问题,求大牛抱大腿!!!!!!!

可是我查过，确实是有符合条件的观测值。
而且我试过无论哪个case，它都说不存在temp....

加了otherwise以后确实没有提示错误了
可是现在还是提取不出正确的数值
他全部返回-9999,就是没有找到.....太不科学了....
再贴一下新的程序
SELECT 1
FOR i = 1 TO RECCOUNT()
    SELECT 1                                            
    GO i
    ? i
    a_stkcd=stkcd                                    
    a_year=SUBSTR(accper,1,4)
    a_month=month_mark
   
    DO CASE
    CASE a_year== '2006' AND a_month=='1'
            
        SELECT 2                                          
           LOCATE FOR  stkcd=a_stkcd AND SUBSTR( trddt,1,4)=='2004'  AND  SUBSTR( trddt,6,7)=='07'  AND                          SUBSTR( trddt,9,10)=='01'
           IF FOUND ()   
        temp_p_b6_bg=Clsprc     
             ELSE
            temp_p_b6_bg=-9999   
            ENDIF
        
        OTHERWISE
         temp_p_b6_bg=-9999
        ENDCASE
                  
    SELECT 1
    GO i
    replace p_b6_bg WITH temp_p_b6_bg
     ENDFOR
CLOSE TABLES
        

[此贴子已经被作者于2017-1-15 04:31编辑过]

第一个表是个小sample, 第二个是个大库.
就是想定点从大库里调数据到第一个库里的,时间是定的.