代码写太繁琐了
我写了个代码来货物是否存在,并修改。但是实在是太长,不知道各位有什么好点子没代码如下
LOCATE FOR 分类=txt分类
IF eof() then
appe blan
replace 分类 with txt分类
replace 库存编号 with c
replace 货物名称 with txt货物名称
replace 规格型号 with txt规格型号
replace 生产厂家 with txt生产厂家
replace 计量单位 with txt计量单位
replace 单价 with txt单价
replace 库存数量 with txt入库数量
replace 金额 with txt金额
replace 备注 with edt备注
else
LOCATE FOR 货物名称=txt货物名称
IF eof() then
appe blan
replace 分类 with txt分类
replace 库存编号 with c
replace 货物名称 with txt货物名称
replace 规格型号 with txt规格型号
replace 生产厂家 with txt生产厂家
replace 计量单位 with txt计量单位
replace 单价 with txt单价
replace 库存数量 with txt入库数量
replace 金额 with txt金额
replace 备注 with edt备注
else
LOCATE FOR 生产厂家=txt生产厂家
IF eof() then
appe blan
replace 分类 with txt分类
replace 库存编号 with c
replace 货物名称 with txt货物名称
replace 规格型号 with txt规格型号
replace 生产厂家 with txt生产厂家
replace 计量单位 with txt计量单位
replace 单价 with txt单价
replace 库存数量 with txt入库数量
replace 金额 with txt金额
replace 备注 with edt备注
else
LOCATE FOR 规格型号=txt规格型号
IF eof() then
appe blan
replace 分类 with txt分类
replace 库存编号 with c
replace 货物名称 with txt货物名称
replace 规格型号 with txt规格型号
replace 生产厂家 with txt生产厂家
replace 计量单位 with txt计量单位
replace 单价 with txt单价
replace 库存数量 with txt入库数量
replace 金额 with txt金额
replace 备注 with edt备注
else
replace 库存数量 with 库存数量+txt入库数量
ENDIF
ENDIF
ENDIF
ENDIF