图书销售管理信息系统
计算机信息管理专业
（专科）
考生姓名：
准考证号：
助学单位： 南开大学物理科学学院
助学单位代号：
指导教师：
申请日期： 年 月 日
完成日期： 年 月 日
天津市高等教育自学考试委员会制
目 录
第一章 图书销售管理信息系统分析-------------------------- 1
1.1 销售管理信息系统简要分析------------------------------ 1
1.2 销售管理信息系统业务流程分析-------------------------- 4
1.3 销售管理信息系统数据流程分析-------------------------- 6
1.4 销售管理信息系统数据字典------------------------------ 7
1.5 销售管理信息系统逻辑模型----------------------------- 14
1.6 销售管理信息系统分析报告----------------------------- 14
第二章 图书销售管理信息系统设计------------------------- 15
2.1 系统目标设计----------------------------------------- 15
2.2 新系统功能结构设计----------------------------------- 15
2.3 销售管理信息系统流程设计----------------------------- 17
2.4 代码设计--------------------------------------------- 18
2.5 系统物理配置方案设计--------------------------------- 18
2.6 输出设计--------------------------------------------- 18
2.7 存储文件设计----------------------------------------- 19
2.8 输入设计--------------------------------------------- 19
第三章 图书销售管理信息系统实施------------------------- 19
3.1 试验数据的准备--------------------------------------- 19
3.2 程序框图设计----------------------------------------- 20
3.3 程序设计及系统窗口---------------------------------- 20
3.5 系统使用说明书--------------------------------------- 26
参考文献----------------------------------------------------- 26
致谢--------------------------------------------------------- 26
----------------------以下内容隐藏回复后可见----------------------------------
[本部分设定了隐藏，你已回复过了,以下是隐藏的内容]
第一章 图书销售管理信息系统分析
1.1 销售管理信息系统简要分析
1.1.1 该系统开发的可行性分析
新华书店是一个小型图书销售商店。为提高对该书店的销售管理，提高经营者科学决策水平，决定开发销售管理信息系统。本人作为该系统的主要分析人员和设计人员，通过初步调查了解了该企业的库存管理情况。
该企业在经营活动中以“诚信”为本，建立了良好的客户群体，使之图书销售经营始终处于较为稳定的状态。但该企业的库存管理一直依靠手工方式，不能及时向经营者提供各类图书销售和库存信息，从一定程度上影响了企业的经营活动。为此企业经理拨出专款，希望建立一套能动态反映销售库存管理信息的管理信息系统，为企业决策及时提供所需资料，并以此带动企业信息化建设的步伐，提高人员素质。由于该企业规模较小，用户各类单一，销售商品主要集中在常见的书籍，管理方式集中统一，数据处理量不大，可考虑开发以批处理为主要数据处理方式的单机式信息系统。因此投资不大，企业完全可以承担。因此该信息系统的开发是必要和可行的，可以立即进行开发。
1.1.2 该系统的业务流程调查
目前，该企业经营的商品是七种类型的图书，每种类型的图书有几种。
图书销售管理的过程是，当出售图书后，负责销售工作的人员首先填写出库单，然后售货员根据出库单给顾客发放商品。一是检查图书的类型；二是检查图书的名称，确定是否添加这种名称的书，填写进货单，交给采购部门；三若有此书就查这种书的库存记录，填写发货单，并根据销售单修改库存记录，检察库存量，确定是否要进货，若要向采购部门发出进货通知单。
经确定后，出售的商品要填写出售单，同时还要根据出售单上的数据登记商品出售流水账。
对于经过全面检查，认定为没有库存的商品连同从没有的商品交由采购人员处理。
商品销售管理的过程是，每当发生一笔销售业务，销售人员就填写相应商品的出库单，仓库保管员据此付货，同时登记商品销售流水帐。
平均看来，该商店每天要发生二十多笔购入入库业务，而商品的销售业务每天多达近百笔。值得注意的是，在同一天内，同一种商品可能发生多笔购入、售出业务。
按照管理规章制度的要求，每天下班之前，统计分析人员还要根据商品购入流水帐和商品销售流水帐，按商品编号分别累计汇总出各种商品当日累计购入入库量、累计销售出库量和实际库存结余量等数据，并把这些累计汇总后的数据正确填入库存台帐中。
1.1.3 该系统中的数据输入、数据输出和数据存储调查
经对库存管理业务流程的调查分析，该系统中的数据输入单据为商品购入入库单和商品销售出库单，其格式如下：
表1.1 商品购入入库单格式
日期 入库单编号 商品号 商品名称 购入单价（元） 购入数量（件） 备注
表1.2 商品销售出库单格式
日期 出库单编号 商品号 商品名称 销售单价（元） 购入数量（件） 备注
该系统中的数据存储为商品库存台帐，同时辅以商品购入流水帐和商品销售流水帐，其格式如下：
表1.3 商品销售台帐账页格式
商品代码 购入单价
商品名称 销售单价
日期 累计购入数量（本月） 累计销售数量（本月） 数量
表1.4 商品购入流水帐账页格式
商品代码 商品名称 购入单价
日期 入库单编号 购入数量 备注
表1.5 商品销售流水帐账页格式
商品代码 商品名称 销售单价
日期 出库单编号 销售数量 备注
该系统中的数据输出为商品进销存月报表，每月月末产生一次，制作这份报表的主要依据是商品库存台帐，辅以商品购入流水帐和商品销售流水帐。商品库存月报表的主要栏项及各栏项之间的关系如表1.6所示。
表1.6 ××××年××月商品进销存月报表
商
品
号 商品名称 购入单价 本期累计购入数量 本期累计购入金额 销售单价 本期累计销售数量 本期累计销售金额 本期盈利额 库存结余量 库存资金额 备注
⑴ ⑵ ⑶ ⑷ ⑸ ⑹ ⑺ ⑻ ⑼ ⑽ ⑾ ⑿
其中⑸＝⑶×⑷； ⑻＝⑹×⑺； ⑼＝⑻－⑸； ⑾＝⑶×⑽。
1.1.4 该系统中的组织机构图和管理职能图
图1.1 库存管理组织机构设置图
图1.2 库存管理职能图
在实际管理活动中，各种各样的查询请求随时都可能发生，如：
1. 根据商品号查询当前实际库存数量。
2. 根据购入入库单编号或销售出库单编号，查询某一笔购入入库单或销售出库情况。
3. 根据商品号查询某一时期内该商品的进销存情况。
1.2 销售管理信息系统业务流程分析
根据对企业销售管理业务流程的调查，画出该系统的业务流程图，如图1.3所示。
销售单
图1.3 销售管理业务流程图
1.3 销售管理信息系统数据流程分析
D1 D3
D2
F1 库存台帐
图1.4 销售管理数据流的顶层数据流程图
D1
D1
F2 购入流水帐
D4
D2
D5 D6
D2 F1 库存台帐
F3 销售流水帐
D7
D3
图1.5 销售管理数据流的第一层数据流程图
1.4 销售管理信息系统数据字典
1.4.1 数据项的定义
数据项编号：I01
数据项名称：商品类别
类型：字符型
长度：8
数据项编号：I02
数据项名称：商品名称
类型：字符型
长度：26
数据项编号：I03
数据项名称：购入单价
简述：某商品购入单价
类型：数值型
长度：5
小数位数：2
取值范围：0－99.99
数据项编号：I04
数据项名称：销售差价
简述：某商品销售差价
类型：数值型
长度：3
小数位数：2
取值范围：0－9.99
数据项编号：I05
数据项名称：库存数量
简述：某种商品的库存数量
类型：数值型
长度：4位整数
取值范围：0－9999
数据项编号：I06
数据项名称：作者
简述：某种商品的作者
类型：字符型
长度：8
数据项编号：I07
数据项名称：进货点
简述：某种商品的进货点
类型：数值型
长度：3位整数
数据项编号：I08
数据项名称：每日销售量
简述：某种商品的每日销售量
类型：数值型
长度：3位整数
数据项编号：I09
数据项名称：出版社
简述：某种商品的出版社
类型：字符型
长度：6
数据项编号：I10
数据项名称：类别
简述：购入和销售某种商品的类别
类型：字符型
长度: 6
1.4.2 数据流的定义
数据流名称：商品购入入库单
编号：D1
简述：采购人员填写的商品购入入库凭单
数据流来源：采购人员
数据流去向：登记商品购入流水帐处理功能
数据流组成：购入日期＋入库单编号＋商品代码＋购入数量＋购入单价
流通量：25份/每天
数据流名称：商品销售出库单
编号：D2
简述：销售人员填写的商品销售出库凭单
数据流来源：销售人员
数据流去向：登记商品销售流水帐处理功能
数据流组成：销售日期＋出库单编号＋商品代码＋销售数量＋销售单价
流通量：25份/每天
数据流名称：月报表
编号：D3
简述：商品进销存月报表
数据流来源：制作月报表处理功能
数据流去向：主管部门
数据流组成：商品代码＋商品名称＋购入单价＋累计购入量＋累计购入额＋销售单价＋累计销售量＋累计销售额＋累计盈利额＋库存结余量＋库存资金额
流通量：1份/每月
数据流名称：入库数据
编号：D4
简述：当日发生的各笔入库数据及其累计汇总数字
数据流来源：购入流水帐
数据流去向：记库存台帐处理功能
数据流组成：商品代码＋购入单价＋累计购入量
流通量：1份/每天
数据流名称：出库数据
编号：D5
简述：当日发生的各笔出库数据及其累计汇总数字
数据流来源：销售流水帐
数据流去向：记库存台帐处理功能
数据流组成：商品代码＋销售单价＋累计销售量
流通量：1份/每天
数据流名称：出入库数据
编号：D6
简述：当日发生的各笔出入库数据及其累计汇总数字
数据流来源：记库存台帐处理功能
数据流去向：库存台帐
数据流组成：商品代码＋购入单价＋累计购入量＋销售单价＋累计销售量
流通量：1份/每天
数据流名称：库存台帐数据
编号：D7
简述：从库存台帐中提取的数据
数据流来源：库存台帐
数据流去向：制作月报表处理功能
数据流组成：商品代码＋购入单价＋累计购入量＋销售单价＋累计销售量＋库存量
流通量：1份/每月
1.4.3 数据存储的定义：
数据存储名称：库存台帐
编号：F1
简述：记录商品的代码、名称、单价和库存等信息
数据存储结构：商品代码＋商品名称＋购入单价＋累计购入量＋销售单价＋累计销售量＋库存数量
关键字：商品代码
相关的处理：P3，P4
数据存储名称：购入流水帐
编号：F2
简述：记录购入商品的代码、购入单价、购入日期、购入数量、购入单编号等信息
数据存储结构：购入单编号＋购入日期＋商品代码＋购入单价＋购入数量＋标记位＋备注
关键字：购入单编号
相关的处理：P1，P3
数据存储名称：销售流水帐
编号：F3
简述：记录销售商品的代码、销售单价、销售日期、销售数量、销售单编号等信息
数据存储结构：销售单编号＋销售日期＋商品代码＋销售单价＋销售数量＋标记位＋备注
关键字：销售单编号
相关的处理：P2，P3
1.4.4 处理逻辑的定义
处理名：登记购入流水帐
编号：P1
输入：数据流D1，来自采购员
输出：数据流D1，去向购入流水帐
描述：当一张商品购入入库单的数据检验合格，并且商品实物入库归位后，立即将这张入库单上的数据登入商品购入流水帐。
激发条件：商品入库发生
处理名：登记销售流水帐
编号：P2
输入：数据流D2，来自销售员
输出：数据流D2，去向销售流水帐
描述：每当发生一笔销售业务后，就将销售人员填写的相应商品的出库单登入商品销售流水帐。
激发条件：商品出库发生
处理名：记库存台帐帐
编号：P3
输入：数据流D4
输出：数据流D5
描述：根据商品购入流水帐和商品销售流水帐，按商品编号分别累计汇总出各种商品当日累计购入库量、累计销售出库量和实际库存结余量等数据，并把这些累计汇总后的数据正确填入库存台帐中。
激发条件：每个工作日结束前
处理名：制作月报表
编号：P4
输入：数据流D7，来自库存台帐
输出：数据流D3，去向主管部门
描述：根据库存台帐，并辅以购入流水帐和销售流水帐，统计商品进销存月报表。
激发条件：每月最后一个工作日结束前
1.4.5 外部实体的定义
外部实体编号：S1
外部实体名称：采购员
简述：采购人员
输出的数据流：D1
外部实体编号：S2
外部实体名称：仓库管理人员
简述：仓库管理人员
输出的数据流：D2
外部实体编号：S3
外部实体名称：主管部门
简述：库存管理部门的上级主管部门
输入的数据流：D3
1.5 销售管理信息系统逻辑模型
并提出新系统逻辑模型如图1.6所示。
图1.5 库存管理信息系统逻辑模型
1.6 销售管理信息系统分析报告
通过对现行系统的全面调查与分析，本系统数据流向是合理的，系统功能能够满足实际管理工作的需要。本系统的输入边界是商品购入入库单、销售出库单和查询条件；输出边界是月报表和查询结果。
通过对数据字典中数据量、数据处理和数据存储分析，该系统的总数据量较小，适宜于采用普通商用微机按批处理方式进行数据处理。
第二章 图书销售管理信息系统设计
2.1 系统目标设计
通过系统分析报告，制订本系统目标如下：
(1) 完全取消目前的手工记帐方式。新系统应具有方便的数据输入性能，良好的人机界面，尽是减少汉字及其重复输入。
(2) 灵活快捷的查询性能，能快速实现对各种商品的单项购入、销售及库存数据的查询。还能实现对某一种商品或者全部商品在某一时间区间内的统计查询。
(3) 把目前基本上是“静态”商品库存管理变为“动态”管理，以便随时提供商品库存动态信息，从而达到加速资金周转，减少库存资金占用的目的。
(4) 系统应具有一定的操作合法权检验功能。
2.2 新系统功能结构设计
综合考虑新系统逻辑模型和设计的新系统目标的要求，绘制的新系统功能结构如图2.1所示。
图2.1 库存管理信息系统功能结构图
对上图中各项功能说明如下：
1. 数据录入
(1) 商品销售文件的数据录入。一是在系统初次建成待投入实际正式运行之前，所整理好的商品销售数据装入到商品销售文件中，包括商品代码、商品名称、购入单价、销售单价和库存数量。二是在系统正常运行过程中，若首次购入新的商品时（在此之前，有关这些商品的信息在库存台帐中不存在），则录入这些商品的商品代码、商品名称、购入单价、销售单价，而库存数量录入零值，其实际值在购入流水帐文件中录入。
(2) 商品购入文件的数据录入。根据购入入库单录入如下数据：入库单编号、购入日期、商品代码和购入数量。并且将“标记位”处理为数值“0”，以表示尚未用此购入数量更新维护过库存台帐文件中的库存数量。
(3) 商品销售文件的数据录入。根据销售出库单录入如下数据：出库单编号、销售日期、商品代码和销售数量。“标记位”的处理同上文。
2. 数据修改
(1) 商品库存文件的数据修改。根据给定的商品代码修改商品库存文件中相应记录的其它数据。
(2) 商品购入文件的数据修改。一是根据给定的商品购入入库单编号，主要修改相应记录中的购入数量及购入单价。需要注意的是，当“标记位”为“1”时，还需要同步地修改商品库存文件中的同一种商品代码的商品库存数量。二是针对某个入库单编号进行各种修改。同样地，若原入库单记录的“标记位”为“1”时，也同时在商品库存文件中相应修改商品库存数量。
(3) 商品销售文件的数据修改。其操作方式与商品购入文件的数据修改方法基本相同，只是此种修改操作的依据是给定的商品销售出库单编号，或者是给定的商品销售日期和商品代码。
3. 数据修改
数据删除同数据修改基本上是一致的，只不过这里是将删除的记录从相应的数据库文件中删除掉。当然，有两点需要注意，一是销售台帐文件中的记录不要轻易删除，否则会引起不必要的麻烦。二是要注意商品购入文件和商品销售文件记录中的“标记位”为“1”的情况，在这种情况下，两个文件中记录删除的同时，也需要涉及到商品库存文件相应记录中商品销售数量的改动。
4. 数据查询
为了实现方便灵活的快速查询功能，本系统的数据查询功能包括按“作者”查询、按“书名”查询、按“出版社”和按“图书类别”查询等方式。
5. 更新维护
更新维护是指用商品购入文件和商品销售文件中“标记位”为“0”的那些记录（用购入数量、销售数量）更新商品库存文件中相同商品代码的库存数量。然后将其“标记位”置为数值“1”，表明已经用该记录更新过商品库存文件。
6. 备份清除
是指对给定日期之前的商品购入记录和销售记录进行转储，然后再将它们从相应数据库文件中删除掉。需要注意两点：一是在这些待备份清除的记录中，字段“标记位”的值必须保证为数“1”，也就是说，执行此项操作之前应该先执行维护更新操作。二是一旦执行了此项操作，那么，这些被备份和被清除了的记录将从购入流水帐文件和销售流水帐文件中消失，它们将不可能再参与查询与统计等操作。
2.3 销售管理信息系统流程设计
根据系统分析阶段提出的系统逻辑模型，考虑数据处理的方便性，进行了相应改进。主要是为了便于输出打印库存月报表，可以先根据销售台帐文件、商品购入流水帐文件和商品销售流水帐文件生成一个临时报表库文件，然后再根据这个临时报表库文件进行打印输出。一旦打印输出结束，便将这个临时库报表文件清空。因此，该信息系统流程图设计成图2.2所示的形式。
图2.2 销售管理信息系统流程图
2.4 代码设计
1． 商品代码设计
考虑到本商店只经营七种类型的图书，而每种类型的图书有几种。因此，将商品（图书）的代码设计成由三位整数组成的层次码，设计方案如图2.3所示。
X X X
顺序号
图书类型代码
图2.3 商品代码设计方案
2． 商品购入单或商品销售单编号方案设计
考虑到每天出库或入库业务均为几十笔，故采用的编码方案如图2.3所示。
X X X X X X X X
顺序号
日
月
年
图2.3 购入单或销售单编码方案
2.5 系统物理配置方案设计
本系统采用单用户单机操作方式，基本配置如下：
CPU：P4 1.4G
硬盘：40G
内存：256M
显示器：17寸显示器
打印机：Epson LQ 1600KIII
软件：Foxpro2.5b for windows
机器安装在仓库办公室。
2.6 输出设计
本系统的输出报表是商品进销存月报表，其打印输出格式设计成表1.6所示的基本形式。
2.7 销售文件设计
根据系统分析和设计的要求，本系统中建立一个基础数据库，如表2.1所示。为了便于阅读理解，库文件中的字段名均用汉字命名。
表2.1 商品库存文件（sk.dbf）结构
字段 字段名 类型 宽度 小数位
1 编号 字符型 2
2 书名 字符型 12
3 进价 数值型 4 1
4 售价 数值型 4 1
5 销售数量 数值型 2
2.8 输入设计
本系统的商品入库数据录入单沿用现行系统的商品购入入库单和商品销售出库单格式，见图1.1和1.2
第三章 图书销售管理系统实施
3.1 试验数据的准备
为应用程序调试准备的试验数据如表3.1－3.4所示。
表3.1 商品库存文件（tsgl.DBF）的试验数据
商品代码 商品名称 进价 售价 销售数量
1 高等数学辅导 15.0 17.0 20
2 大学语文 12.0 20.0 10
3 教你游泳 12.8 16.0 50
4 网页制作 10.6 11.0 9
5 高级语言程序设计 18.4 20.4 22
6 市场营销学 24.5 25.8 20
7 社会经济学 23.2 26.2 80
3.2 程序框图设计
对某一功能模块设计程序框图（也可是N－S图），此处略。
3.3 程序设计
本系统的程序—
由:MAIN.PRG,ZCX.SPR,DL_FFYH,JH_XS.SPR,PM.MPR ,SMTJ.PRG,
TS_KC.SPR,TS_TJ.SPR,TSTJ.SPR,ZLTJ.PRG组成.
由于本系统主要是由屏幕生成器和菜单生成器做成的,因此不能一一列举,请参考系统软盘,请见谅!
现将本系统的主窗口如下图所示：
本系统的销售统计窗口如下图所示：
先将本系统的主程序(ys.spr)显示如下：
* *********************************************************
* *
* * 03-10-11 YS.SPR 18:25:55
* *
* *********************************************************
* *
* * Author\'s Name
* *
* * Copyright (c) 2003 Company Name
* * Address
* * City, Zip
* *
* * Description:
* * This program was automatically generated by GENSCRN.
* *
* *********************************************************
#REGION 0
REGIONAL m.currarea, m.talkstat, m.compstat
IF SET(\"TALK\"
= \"ON\" SET TALK OFF
m.talkstat = \"ON\"
ELSE
m.talkstat = \"OFF\"
ENDIF
m.compstat = SET(\"COMPATIBLE\"
SET COMPATIBLE FOXPLUS
m.rborder = SET(\"READBORDER\"
SET READBORDER ON
m.currarea = SELECT()
* *********************************************************
* *
* * MAIN/Windows Databases, Indexes, Relations
* *
* *********************************************************
*
IF USED(\"tsxs\"
SELECT tsxs
SET ORDER TO 0
ELSE
SELECT 0
USE (LOCFILE(\"d:\\综合作业\\tsxs.dbf\",\"DBF\",\"Where is tsxs?\"));
AGAIN ALIAS tsxs ;
ORDER 0
ENDIF
* *********************************************************
* *
* * Windows Window definitions
* *
* *********************************************************
*
IF NOT WEXIST(\"dl\"
; OR UPPER(WTITLE(\"DL\")) == \"DL.PJX\" ;
OR UPPER(WTITLE(\"DL\")) == \"DL.SCX\" ;
OR UPPER(WTITLE(\"DL\")) == \"DL.MNX\" ;
OR UPPER(WTITLE(\"DL\")) == \"DL.PRG\" ;
OR UPPER(WTITLE(\"DL\")) == \"DL.FRX\" ;
OR UPPER(WTITLE(\"DL\")) == \"DL.QPR\"
DEFINE WINDOW dl ;
AT 0.000, 0.000 ;
SIZE 10.892,36.188 ;
TITLE \"新华书店\" ;
FONT \"MS Sans Serif\", 24 ;
FLOAT ;
CLOSE ;
MINIMIZE ;
SYSTEM ;
COLOR RGB(,,,255,0,0)
MOVE WINDOW dl CENTER
ENDIF
* *********************************************************
* *
* * MAIN/Windows Setup Code - SECTION 2
* *
* *********************************************************
*
#REGION 1
set default to a:\\综合作业
* *********************************************************
* *
* * MAIN/Windows Screen Layout
* *
* *********************************************************
*
#REGION 1
IF WVISIBLE(\"dl\"
ACTIVATE WINDOW dl SAME
ELSE
ACTIVATE WINDOW dl NOSHOW
ENDIF
@ 3.324,9.750 SAY \"进入系统口令确认：\" ;
FONT \"MS Serif\", 18 ;
STYLE \"T\" ;
COLOR RGB(255,255,0,,,,)
@ 5.081,6.000 SAY \"用户名：\" ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"T\" ;
COLOR RGB(255,255,0,,,,)
@ 4.892,22.500 SAY \"口令：\" ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"T\" ;
COLOR RGB(255,255,0,,,,)
@ 5.324,12.125 GET dl_yh ;
SIZE 1.000,8.889 ;
DEFAULT \" \" ;
FONT \"MS Sans Serif\", 14 ;
PICTURE \"@K xxx\"
@ 5.000,27.125 GET dl_kl ;
SIZE 1.000,7.556 ;
DEFAULT \" \" ;
FONT \"MS Sans Serif\", 14 ;
PICTURE \"@K xxx\"
@ 7.459,9.000 GET qd ;
PICTURE \"@*HN 确 定\" ;
SIZE 1.276,5.615,0.308 ;
DEFAULT 1 ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"B\" ;
VALID _0zx13i8gk()
@ 10.270,25.500 SAY \"时间：\" ;
FONT \"MS Sans Serif\", 12 ;
STYLE \"T\" ;
COLOR RGB(255,255,0,,,,)
@ 10.162,28.625 SAY DATE() ;
SIZE 1.000,14.500 ;
FONT \"MS Sans Serif\", 12 ;
COLOR RGB(255,255,0,,,,)
@ 7.459,21.750 GET tc ;
PICTURE \"@*HN 退 出\" ;
SIZE 1.276,5.615,0.308 ;
DEFAULT 1 ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"B\" ;
VALID _0zx13i8gr()
@ 5.865,6.000 SAY \"(lml)\" ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"T\"
@ 5.541,22.500 SAY \"(lml)\" ;
FONT \"MS Sans Serif\", 18 ;
STYLE \"T\"
@ 1.486,9.750 SAY \"新华 图 书 销 售 系 统\" ;
FONT \"MS Sans Serif\", 24 ;
STYLE \"T\"
IF NOT WVISIBLE(\"dl\"
ACTIVATE WINDOW dl
ENDIF
READ CYCLE
RELEASE WINDOW dl
* *********************************************************
* *
* * Windows Closing Databases
* *
* *********************************************************
*
IF USED(\"tsxs\"
SELECT tsxs
USE
ENDIF
SELECT (m.currarea)
#REGION 0
SET READBORDER &rborder
IF m.talkstat = \"ON\"
SET TALK ON
ENDIF
IF m.compstat = \"ON\"
SET COMPATIBLE ON
ENDIF
* *********************************************************
* *
* * _0ZX13I8GK qd VALID
* *
* * Function Origin:
* *
* * From Platform: Windows
* * From Screen: MAIN, Record Number: 8
* * Variable: qd
* * Called By: VALID Clause
* * Object Type: Push Button
* * Snippet Number: 1
* *
* *********************************************************
*
FUNCTION _0zx13i8gk && qd VALID
#REGION 1
if dl_yh=\"xhy\".and.dl_kl=\"000\"
do pm.mpr
do zcx.spr
else
do dl_ffyh.spr
endif
return
* *********************************************************
* *
* * _0ZX13I8GR tc VALID
* *
* * Function Origin:
* *
* * From Platform: Windows
* * From Screen: MAIN, Record Number: 11
* * Variable: tc
* * Called By: VALID Clause
* * Object Type: Push Button
* * Snippet Number: 2
* *
* *********************************************************
*
FUNCTION _0zx13i8gr && tc VALID
#REGION 1
clear read
deactivate window dl
使用说明书
先打开foxpro for window,在command窗口中输入do yz.spr,既可打开图书销售管理信息系统的登陆窗口，在用户名中输入“xhy”，密码中输入“000”
就可进入系统。进入本系统后，具体的操作请参看参菜单。
参考文献
1. 田教文，《计算机信息处理综合作业教材》经济科学出版社 2000年10月
2. 牛允鹏，《数据库及其应用》，经济科学出版社，2000年3月
3. 黄梯云，《管理信息系统》，经济科学出版社，2000年3月
4. 马跃，《微机信息管理系统500例详解》电子科技大学出版社，1997年6月
致谢
在此特别向指导过我的老师表示感谢！也向检阅我作业的老师致敬。老师辛苦了。
