一、
select * from 销售表 into dbf 销售表2001 where 日期<={^2000-12-31}
close all
delete from 销售表 where 日期<={^2000-12-31}
pack
1. 打开“商品表”
USE 商品表
2. 在命令窗口输入
BROWSE
3. 单击“文件/另存为 HTML”命令项,并显示“另存为 HTML”对话框,再选择“保存文件以便以后使用”单选按钮,最后单击“确定”按钮。
1. 打开并修改数据库
MODIFY DATABASE 商品销售
2. 选择“商品表”并单击鼠标右键,选择“修改”命令项。
3. 在“表设计器-商品表.dbf”中,选择“索引”选项卡,输入索引名“商品号”,选择类型为“主索引”,表达式为“商品号”。
4. 选择“销售表”并单击鼠标右键,选择“修改”命令项。
5. 在“表设计器-销售表.dbf”中,选择“索引”选项卡,输入索引名“商品号”,选择类型为“普通索引”并选择“升序”,表达式为“商品号”。
二、
SELECT 商品表.商品号,商品表.商品名,销售表.单价,销售表.销售数量,(销售表.单价*销售表.销售数量) AS 销售金额;
FROM 商品表,销售表;
WHERE 商品表.商品号 = 销售表.商品号 ;
ORDER BY 销售金额 DESC;
INTO TABLE see_a
1. 打开并修改表单文件
MODIFY FORM form1
2. 双击“刷新标题”命令按钮,在“Command1.Click”编辑窗口中把语句修改为“ThisForm.Caption = "商品销售数据输入"”,关闭编辑窗口。
3. 双击“商品销售输入”命令按钮,在“Command2.Click”编辑窗口中把语句修改为“DO FORM sellcomm”,关闭编辑窗口。
4. 双击“输出销售报表”命令按钮,在“Command3.Click”编辑窗口中把语句修改为“REPORT FORM print1 PREVIEW”。
三、
1. 在change_c.prg文件中的内容
CLOSE ALL
USE 商品表
IF FILE("商品表备份.DBF")
ZAP
APPEND FROM 商品表备份
ELSE
COPY TO 商品表备份
ENDIF
REPLACE ALL 单价 WITH 出厂单价*.1 for SUBSTR(商品号,1,2) = '10'
SELECT 2
USE 单价调整表 ORDER 商品号
SELECT 商品表
SET RELATION TO 商品号 INTO 单价调整表
REPLACE ALL 出厂单价 WITH 单价调整表.出厂单价 for 商品号 = 单价调整表.商品号
SET RELATION TO
CLOSE ALL
3. 设计表单
(1). 在命令窗口中输入建立表单命令
CREATE FORM form2
(2). 在“Form1”窗口中添加两个命令按钮,在第1个命令按钮“属性”窗口的Caption处输入“调整”,在第2个命令按钮“属性”窗口的Caption处输入“退出”。
(3). 双击“调整”命令按钮,在“Command1.Click”编辑窗口中输入“do change_c”,接着关闭编辑窗口。
(4). 双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入“Release Thisform”,接着关闭编辑窗口。
① 凡本网注明稿件来源为"原创"的所有文字、图片和音视频稿件,版权均属本网所有。任何媒体、网站或个人转载、链接转贴或以其他方式复制发表时必须注明"稿件来源:我考网",违者本网将依法追究责任;
② 本网部分稿件来源于网络,任何单位或个人认为我考网发布的内容可能涉嫌侵犯其合法权益,应该及时向我考网书面反馈,并提供身份证明、权属证明及详细侵权情况证明,我考网在收到上述法律文件后,将会尽快移除被控侵权内容。