UC知道vfp6.0的问题，急急急！！！！
来源：百度知道 编辑：UC知道 时间：2024/06/27 08:07:52
本人初学6.0，
1.建立一个数据库，文件名为你的考号，其库结构如下：
编号(C,3) 商品名称 (C,8) 数量(N,8,0) 单价(N,6,2) 出厂日期(D,8)
2.输入下列记录:
001 五粮液 10000 255.00 89.12.30
002 泸州老窖 12400 175.00 92.12.10
003 刘玲醉 22300 26.00 85.10.10
004 杜康 12500 35.00 93.7.1
3. 将91年以后的酒类降价,以原价的67.5%作为新的价格。
前面数据库建立都已经学会，就是第三条问题，91年后降价不会操作。
谢谢老师的指点！！！
1.建立一个数据库，文件名为你的考号，其库结构如下：
编号(C,3) 商品名称 (C,8) 数量(N,8,0) 单价(N,6,2) 出厂日期(D,8)
2.输入下列记录:
001 五粮液 10000 255.00 89.12.30
002 泸州老窖 12400 175.00 92.12.10
003 刘玲醉 22300 26.00 85.10.10
004 杜康 12500 35.00 93.7.1
3. 将91年以后的酒类降价,以原价的67.5%作为新的价格。
前面数据库建立都已经学会，就是第三条问题，91年后降价不会操作。
谢谢老师的指点！！！
repl 单价 WITH 单价*.675 FOR 出厂日期>{^1991.12.31}
repl 单价 with 单价*0.675 for year(出厂日期)>1991
如果按楼上的语句写,则单价都成为一个单价了,正确的代码为:
USE XXX
GO TOP
DO WHIL EOF()=.F.
IF 出厂日期>CTOD("01/01/1991")
REPL 单价 WITH 单价*0.675
ENDI
SKIP
ENDD