【例5．11】设有商品表，结构为商品（商品代码，品名，单价，数量，金额），欲对其中部分商品调动单价，为此建立一个调价表，其结构为调价（商品代码，原单价，新单价），编写程序用调价表中新单价数据修改商品表中单价与金额。 SET TALK OFF SELE 1 USE商品 SELE 2 USE 调价 SCAN 代码1=商品代码 SELE 1 LOCATE FOR商品代码=代码1 IF NOT EOF（） REPL 单价 WITH 调价.新单价、金额 WITH 单价*数量 ENDIF SELE 2 ENDSCAN CLOSE ALL SET TALK ON