SET TALK OFF
CLOSE TABLES ALL
SET DELETED ON

USE f:\评估\VFP\保单信息20121231.dbf IN 0 ALIAS 保单信息20121231

SELECT 保单信息20121231

SCAN
    DO CASE
        CASE 产品代码="00110100" OR 产品代码="00112500"
            REPLACE 有效保额 WITH MAX(基本保额*(1+保单年度*0.05),年保费*MIN(保单年度,交费期限))
        
        CASE INLIST(产品代码,"00126600","00321500","00231000")  
            REPLACE 有效保额 WITH 基本保额
        OTHERWISE
            SELECT 保单信息20121231
        
    ENDCASE
ENDSCAN

REPLACE ALL 风险保额2 WITH MAX(有效保额,基本保额)-未到期责任 FOR !EMPTY(有效保额)
 

SET DELETED OFF
CLOSE TABLES ALL
SET TALK ON



一跑就出现nesting error
看了下帮助，scan 也有endscan，do case也有endcase
不知道哪里错了？

表太大了，2个G差不多。

应该不是这个问题，我平时在command里面用命令都是直接 产品代码=“123456789”这样子的

对不住大家了，我找出原因了，程序中少了几个括号，还有个if 没有endif
不好意思让大家帮我看了。

另外能否再问一个问题，如果有很多case要写，有没有什么简便的方法来的？

谢谢。
只不过我有30几个case，就贴出来两个，呵呵。