超市进销存管理系统
超市进销存管理信息系统
本文依据中小型超市的管理特点开发了适合业务需求的进销存管理系统。该系统是融合了众多先进管理知识开发而成的通用商业进销存一体化计算机管理软件，用于满足用户采购管理、销售管理、财务管理、库存管理、基本信息管理等各项要求。本文首先对超市进销存的现状进行了分析，其次了解了中小超市的需求并进行了系统设计，最后对超市进销存系统的发展前景进行了展望。
在管理上的重要资源之一就是信息，能否做出有效的决策是衡量管理工作成败与否的标准，衡量决策是否正确也在一定得程度上取决于信息的质量。
随着人类文明的发展，现在已经是一个知识经济时代，知识经济时代也是科技的高速发展创新和信息、知识膨胀的时代。一些所谓信息威胁的言论，这是指人类面临的要处理的信息量大到难以处理的地步，以至造成混乱的结果。
计算机的产生和普及见解决了这个问题，这是由于计算机能准确、迅速地对信息进行收集、加工、使用、查询。
计算机辅助管理发展的四个阶段如表1-1所示：
表1-1 计算机辅助管理发展的四个阶段
阶
段
年代目标典型功能核心技术代表性系统
事务处理
50~70
年代初
提高文书、统
计等事务处理
工作的效率
统计、计算、
制表、文字处
理
高级语言、文
件管理
电子数据处理
（EDP）系统
系统处理
60~70
年代末
提高管理信息
处理的综合
性、系统性、
及时性、准确
性
计划、综合统
计、管理报告
生成
数据库技术、
数据通讯与计
算机网络
传统的管理信
息系统（MIS）
支持决策70~80
年代
为决策者在决
策过程中的活
动提供支持，
以改善管理决
策有效性
分析、优化、
评价、预测
人机对话、模
型管理、人工
智能的应用
决策支持系统
（DSS）、现代的
管理信息系统
（含DSS）
综合服务90年代
~今
提高人员素
质、创造良好
工作环境
上述功能的综
合集成，特别
是对人们的智
能活动（如决
策分析、研究、
学习等）提供
主动积极支持
高速信息传输
技术、多媒体
信息处理技
术、人工智能
技术的应用
综合业务数字
网络（ISDN）系
统、国际互联网
（INTERNET）、
WWW（World Wide
Web）服务器
在以计算机技术、网络技术、通信技术代表的现代信息技术的跳跃式发展，
人类正迅速地从工业时代迈向信息时代，信息时代拥有的高科技，商品经济化带来的高效益，让计算机的应用普及到经济生活和社会生活的各个领域。信息资源的开发和利用也越来越受到人们的重视。可以说，信息化水平的高低将在未来成为衡量一个国家现代化水平的重要标志。
管理信息系统是一个结合计算机硬件、软件、网络通信设备和其他外设，对信息进行收集、传输、加工、储存、更新和维护并以人为主导的人机系统。它能实现对国民经济和企业的行为进行记录并帮助其实现规划目标。
管理信息系统的功能结构一般分为：
1、信息收集；
2、信息存储，分为三个大部分：数据库系统、模型库系统和知识库系统；
3、问题处理：管理信息系统的核心；
4、对话和信息输出；
5、信息管理机构：具有双重身份，既是管理信息系统的组成部分，又是企业管
理系统的一个子系统。
第二节超市进销存管理系统研究现状
一、超市的起源及发展
超市（super market）在国外是一种以由顾客自我服务为主，品种多为品牌产品的大型零售业。它最早出现在美国20世纪30年代的一种零售业态。被成为“零售商业的第三次革命”。超市产生可归结于上个世纪商业竞争的加剧和信息
技术的发展。超市采取的是顾客自我服务销售方式，以满足消费者每天生活需求的零售业态。其特点：顾客自我服务代替了营业员的服务；节约了劳动力，使成本降低，从而促进商品价格的降低；货款当面交易，大大提高了购物效率；食品的销售占据了较大比重。
在20世纪 80年代特别是到了90年代以后，生产厂家在百货零售商和厂商交易关系的支配地位，转换为零售商占主导地位。从供应链上来看，零售商和生产厂家为了取得对整个供应链的主导权展开激烈的竞争，从而让供应链中的各个环节成本形成转移，导致供应链整体成本呈上升的趋势。
从零售商角度来看，新的零售业态的形成和发展，百货业业内的竞争日益激烈，零售商从而着手寻找新的管理方法。从生产厂家角度来看，为了达到获得销售渠道的目的，从各个方面进行降价，牺牲了其自身利益。所以，生产厂家和零售商结成紧密的联盟提上了议程，对双方而言达到双赢。
二、超市进销存管理系统
进销存管理是商品零售商在管理中的一个极为重要的环节，并且也是零售商能否取得利润的关键。也就是说，如果能做到进货合理、销售及时、库存量最少、积压商品的减少，那么零售商将得到一个最理想的效益。由此可见，进销存管理决策的是否正确直接影响了零售商获得的经济效益。
在对进销存手工管理的情况下，超市管理人员无法对进货量和库存量进行良好的控制，很难及时并正确得到商品的动态供求信息和库存信息，并且采购部门、仓储部门和销售部门各部门之间的通讯也不能做到通畅，这在竞争激烈的市场中也是非常不利的。超市进销存管理系统就是在这种状况下出现的，它利用计算机的技术，使得超市进货、库存和销售能够有机结合起来，提高超市正常运营的效率，提升效益，而且超市在系统的运用下可以在客观性、时效性、科学性等方面获得信息，为管理者运用现代化手段管理超市提供了保证，使超市的各个方面的投入最大限度地发挥效益，避免了在商品购、销、存多方面产生漏洞。
我国国内超市行业在信息技术设备上投入的资金相对较小，在日常管理中，计算机应用、数据交换、信息传输上都存在滞后的问题。尽管一些超市已经配备了POS系统，不过仅仅充当着计算器、出纳和打印机的功能，而在市场预测、资料读取存储、报表生成、商品的分析等功能都无法进行落实。在一些环节上往往还是采用人力管理的方式进行低效的销售、采购、仓储、财务处理。
本文以已有的进销存系统作为基础，对超市的经营管理中的信息收集、加工、使用进行分析研究，实现超市进销存系统的设计和实施，最终进行对经营的管理和决策，增加超市的效益，并提高日常运营效率。
第二章 超市管理需求分析
进销存管理系统开发的目标是实现对超市的采购、销售和库存等环节中进行系统、规范、自动地管理。这是建立在用户所提供的需求的基础上总结出来的。用户的基本要求如下：
第一节 超市管理需求
1、 采购销售仓储的有效关联：在超市利用进销存管理系统后，要求能够对超市
内的各种商品流动进行监控，并且进行有效地查找，在商品采购、出入库、库存和销售的过程中进行负责人的设定，便于落实责任人以及进行有效地监督与控制。
2、 采购管理：能够对进货的商品进行录入，并生成采购表单进行统计。
3、 库存管理：通过超市进销存管理系统，能够方便地查询到库存中的商品类别
和数量，且能根据安全库存和销售情况对库存中的商品进行缺货查询显示。 4、 销售管理：能够对销售的商品进行录入生成销售单并进行统计。
第二节 超市功能需求
依据进销存管理系统的开发目标，并且对于实际的多方面情况进行考虑，并且结合了Delphi 的程序特点，设计了如图2-1所示的系统功能模块图。
根据客户要求，得到下面的系统目标：
1、 采购管理能够对进货的商品信息进行输入、查询并生成采购表单进行统计。
2、 库存管理能够对商品的入库信息、库存信息、出库信息进行输入并能对各个
环节的商品进行查询。
3、 销售管理能够对商品的销售信息进行输入、查询并生成销售表单进行统计。
进 销 存 管 理 系 统
采
购 管 理 模 块
库 存 管 理 模 块
销 售 管 理 模 块
基 本 信 息 模 块
图2-1 系统功能模块图
4、 基本信息模块能够对商品信息、客户信息、采购商信息等重要信息进行管理，
并可查询全部信息。
第三节 超市管理业务流程分析
依据超市商品的流通程序，制定了如图2-2的业务流程图。
第四节 超市管理数据流程分析
数据流图就是用图的方式表达系统的逻辑功能、数据在系统内部的逻辑流向和逻辑变换过程，是结构化系统分析方法的主要表达工具及用于表示软件模型的一种图示方法。
超市进销存系统顶层流程图如图2-5所示。
商品
采购员
仓库
出库员
前台
销售员
销售
管理人员
图2-2商品流通业务流程图
F6
F10
F9
F8
F7 F5
F4 F3
F2
F1
商品入库信息
商品信息录入
商品销售信息
4
销售信息录入
D1 进货信息表 D2 销售信息表 1
信息修改库存 D3 库房库存表 D4 前台库存表
3
信息修改库存
图2-5顶级数据流程图
F1：入库单 F2：入库信息存储 F3：入库商品信息 F4：入库商品信息汇总 F5：出库返库信息 F6：出库返库信息 F7：销售商品信息汇总 F8：销售商品信息 F9：销售信息存储 F10：销售单
2
信息修改库存
第三章系统设计
第一节开发和运行环境选择
一、运行环境选择
由于本系统针对商品繁多的超市，对各方面要求较高，因此决定软件方面，服务器端采用Windows 2000 server，此系统容易操作且维护简单并且兼容性高，客户端则采用Windows 98/2000/XP。
在硬件方面，系统对服务器端要求较高，采用高端配置的PC机或者专门的服务器，客户端采用普通的PC机。考虑到对网络传输的数据量并不是很大，故网络连接采用10M局域网，如果在预算资金充裕的情况下可采取100M局域网，来达到加快数据传输的目的。
二、开发方法选择
开发过程中需要用一个软件生命期模型来反映软件生命周期内的各种活动应怎样组织，各类模块该怎样连接。
软件生命期模型是指对在经历需求、分析、设计、实现、部署后，软件将被使用并进入维护阶段，直到最后由于缺少维护费用而逐渐消亡的过程。
1、瀑布模型（waterfall modal）就是一种软件生命期模型。它是将软件生命周期划分为制定计划、需求分析、软件设计、程序编写、软件测试和运行维护等六个基本活动，并且规定了它们自上而下、相互衔接的固定次序，如同瀑布流水，逐级下落。如图3-1所示。
问题定义
可行性研究
需求分析
系统设计
详细设计
编码
测试
运行维护
图3-1 软件生命周期的瀑布模型
如图3-1所示，瀑布模型规定了软件生命周期中各个阶段的活动次序。在实际进行软件开发的过程中，软件生命周期中各阶段的活动并不完全是自上而下的，而是遵循以下原则：
从上一项活动接收该项活动的工作对象作为输入，利用这一输入实施该项活动应完成的内容给出该项活动的工作成果，并作为输出传给下一项活动。同时评审该项活动的实施，若确认，则继续下一项活动；否则返回前面，甚至更前面的活动的过程。当前阶段的活动结束时，总是将工作成果作为输出传给下一阶段的活动
软件生命周期法将软件开发过程分为八个阶段，其开发的时间比较长，而在这段时间内，用户的参与只局限在软件定义期的三个阶段中，以后的开发工作实际上只是由软件开发人员去完成。这样，在开发过程中，由于环境的变化，用户对系统的要求也在变更，但因用户不参与实际的开发过程，这些变化与用户产生的新的要求就得不到及时反映。因此，当最后将产品交给用户时，用户对产品不满意的现象就会经常发生，同时也造成软件维护工作量的增加。
2、原型法（prototyping approach）是软件生命周期法的改进后的一种开发方法。原型法的实施过程中用户与开发人员进行合作，一起工作，在软件开发的各个阶段中都要有用户的直接参与。这样的开发方式，就能在软件开发的全部过程中，都可以及时反映用户的需求，不断地缩小开发人员与用户之间对需求理解的差距，以此降低软件开发的风险，并提高软件产品的质量。
原型法将软件开发过程分为以下四个步骤：
1、确定用户的基本要求；
2、开发初始原型；
3、实现并运行原型；
4、修改并完善原型。
以上步骤显示，它输入初始原型，在过程中不断进行试验、纠正错误、使用、评价和修改原型，从而不断获得新的原型，这是一个典型的迭代过程。在每次的迭代时，都有用户的直接参与，面对于实际存在的模型，用户也有了实实在在的感受，并能结合自己的需求提出切合实际的要求，使得经过每一次修改后得到的新的原型完成更多的任务，并具有更强的功能。如此反复，直到用户满意为止。
采用原型法进行软件开发，可以使开发过程更加迅速快捷，整个开发过程为用户提供了一个可塑性强的系统，这样便于用户有兴趣地参与到开发过程中。
根据本超市进销存管理系统的基本要求，决定对上述两种方法进行综合利用。总体上采用生命周期法进行系统的分析和设计，系统的实现则采用了原型法。
首先将系统分成四个模块：采购管理模块、库存管理模块、销售管理模块、基本信息模块。
然后对每一个模块进行详细的划分，确定每一部分的内容。
最后采用原型法对每一部分进行细节设计。
三、开发工具选择
目前，许多的数据库厂商和应用开发工具厂商都在推出32位快速应用开发（Rapid Application Development，RAD）工具，它们让应用开发人员开发企业级C/S结构应用程序极其便捷。
现在常用的开发软件包括：Visual Basic、Visual C++、Delphi、Power Builder、Java和.Net系列。
开发这个超市进销存管理系统，我选取了Delphi 7.0作为开发工具。
Delphi的特性如下：
1、直接编译生成可执行代码，编译速度快。在处理速度和存取服务器
方面，Delphi的性能远远高于其他同类产品。
2、支持将存取规则分别交给客户机或服务器处理的两种方案，而且允
许开发人员建立一个简单的部件或部件集合，封装起所有的规则，
并独立于服务器和客户机，所有的数据转移通过这些部件来完成。
3、提供了许多快速方便的开发方法。
4、具有可重用性和可扩展性。
5、具有强大的数据存取功能。Delphi既可用于开发系统软件，也适合
于应用软件的开发。
6、Delphi使用独特的VCL类库，使得编写出的程序显得条理清晰。
7、拥有强大的可视化功能和高效率的编译器。
第二节系统总体设计
一、系统功能模块设计
系统总共分成五大模块，每一模块的内容如图：
图3-2采购管理模块结构图
图3-3库存管理模块结构图
图3-4销售管理模块结构图
图3-5基本信息模块结构图
二、 数据字典设计
数据字典DD （data dictionary ）与数据流程图进行配合，能清晰地表达数据处理所有的要求。数据流程图仅仅给出了所开发系统组成结构和内部的各元素之间的相互关系，可没有表明数据元素所具有的含意。所以，仅靠数据流程图开发人员和用户很难理解到它所要描述的对象。数据词典的任务就是对数据流程图中涉及到的所有被命名的图形元素，包括数据流、数据文件、数据元素以及数据的源、汇点等等，在数据词典中作为一个词条加以定义，使得每一个图形元素的名字都有一个确切的解释。
下面给出数据元素、数据流、数据结构的一些DD 例子。 数据元素，如表3-1。 数据流，如表3-2。
库 存 管 理 模 块
功 能
库存操作
查 询
入库单录入
出库单录入
更新库存
查询库存
查询出库单
查询返库单
销 售 模 块
登 录
销售信息录入
计算汇总 基 本 信 息 模 块
商品管理
查 询
盘 点
数据维护
部门管理
大类管理
新商品定价
商品变价
商品销售码更改
支付方式管理
计算机信息管理
采购单查询
退货单查询 出库单查询 返库单查询 销售单查询
库存查询
商品信息查询
变价单查询
销售码变更查询
生成盘点表
盘点数量录入
盘点结果生成 盘点结果汇总
备 份
还 原 初
始化
数据存储，如表3-3。
表3-1数据字典条目类型之一：数据元素
数据元素
系统名：超市进销存系统编号：
条目名：商品代码别名：
发球数据流：存储处：
数据元素值：代码类型取值范围意义
字符串 0000 – 9999 每一种商品的编号
简要说明：商品代码是一个大类下一种商品的识别符，一个大类下的每种商品都有唯一的商品代码。
修改记录：
编写张毅日期2009-04-23
审核张毅日期2009-04-23
表3-2数据字典条目类型之一：数据流
数据流
系统名：超市进销存系统编号：
条目名：进货信息统计别名：
来源：入库单去处：进货信息汇总
数据流结构：
进货信息统计= { 日期 + 进货单编号 + { 进货单位代码 + 部门代码 + 大类代码 + 商品代码 +进货数量 + 进价 + 支付方式代码 + 进货员代码 + 备注 } }所有进货信息
需要说明：进货管理员将进货信息录入计算机后，管理员可进行汇总。
修改记录：
编写张毅日期2009-04-23
审核张毅日期2009-04-23
表3-3数据字典条目类型之一：数据存储
数据存储
系统名：超市进销存系统编号：
条目名：商品基本信息别名：
存储组织：
每一种商品一条记录
按代码排序记录数：约30000
数据量：约3MB
主关键字：部门代码 + 大类
代码 + 商品代码
辅关键定：
记录组成：
项名：部门代码大类代码商品代码商品名称销售码销价单位
备注
近似长度： 2 2 4 20 13 4 4 50
（字节）
需要说明：其它信息可在备注中说明。
修改记录：编写张毅日期2009-04-23
审核张毅日期2009-04-23 三、数据库设计
一个建立在计算机上的管理信息系统是以众多的数据资源为基础并且以此作为中心而建立的具有实用性的应用系统。该类系统的目的是给组织中的各个部门以及管理层提供必要的管理信息和决策数据，由于它会涉及到应用领域中的各个层面，因此必然会使用到不同类型的数据。管理信息系统开发中的一项重要工作就是对于这些数据进行合理有效地组织和存储。
概念结构设计的任务是在需求分析阶段产生的需求说明书的基础上，按照特定的方法把它们抽象为一个不依赖于任何具体机器的数据模型，即概念模型。概念模型不是对软件设计的描述，而是对真实世界中事物的描述，是独立于数据库，它充满了主观的色彩，其描述的是从用户角度看到的数据库，并不去考虑数据库的实现，仅仅关心的是用户的现实环境。
根据超市进销存系统的需求，对数据库进行概念设计，下面给出几个例子：采购信息，大类信息，入库信息，商品信息，销售信息，出库信息等。
逻辑结构设计是将概念数据模型转换成特定的数据库管理系统（DBMS）支持的数据模型。
根据系统数据库概念设计模型，得出下面的表结构：
表3-4商品信息表
字段名称类型是否为空说明
部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品的大类代码
商品代码CHAR（2）否每一大类中商品的代码
商品名称CHAR（20）否商品的名称
销售码CHAR（13）否商品的销售码
销价MONEY 否商品的销售价格
单位CHAR（4）否商品的单位
备注VARCHAR（50）是其它说明信息
表3-5采购信息表
字段名称类型是否为空说明
采购单编号CHAR（12）否每一张采购单都有一个编号
日期CHAR（20）否采购日期
采购单位代码CHAR（8）否采购单位的代码
部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品的大类代码
商品代码CHAR（4）否商品具体的代码
采购数量INT 否采购的数量
是否到货BIT 是采购商品是否到货
备注VARCHAR（50）是其它说明信息
表3-6商品大类信息表
字段名称类型是否为空说明
部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品每一个部门分几个大类大类名称CHAR（10）否每一个大类的名称
表3-7入库信息表
字段名称类型是否为空说明
入库单编号CHAR（20）否每一张入库单都有唯一编号日期CHAR（19）否具体入库日期
进货单位代码CHAR（8）否进货单位的代码
部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品的大类代码
商品代码CHAR（4）否商品具体的代码
进货数量INT 否进货的数量
进价MONEY 否进货的价格
员工代码CHAR（4）否录入信息的员工的代码
是否更新CHAR（1）否入库单是否已经修改库存备注VARCHAR（50）是其它说明信息
表3-8销售信息表
字段名称类型是否为空说明
销售单编号CHAR（16）否每一张销售单都有唯一编号部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品的大类代码
商品代码CHAR（4）否商品具体的代码
销价MONEY 否商品的销售价格
销售数量INT 否商品的销售数量
日期CHAR（19）否商品销售的日期
员工代码CHAR（4）否销售此商品的员工代码
表3-9出库信息表
字段名称类型是否为空说明
出库单编号CHAR（20）否每一张出库单都有唯一编码部门代码CHAR（2）否商品的部门代码
大类代码CHAR（2）否商品的大类代码
商品代码CHAR（4）否商品具体的代码
出库数量INR 否商品出库的数量
日期CHAR（19）否商品出库的日期
图3-6员工数据库信息
图3-7商品数据库信息
第三节 超市进销存管理系统详细设计
本次针对超市进销存管理系统，针对四个模块进行详细设计：采购管理模块、库存管理模块、销售管理模块和基本信息管理模块。
采购管理模块：通过选择采购商品，采购数量，并且对单笔采购或者单项商品采购人员设置从而进行采购。每笔采购可以进行多种不同商品的混合采购，操作便捷，界面简单。采购单查询功能可以根据采购单编号，采购时间等进行查询，并且能够将已处理采购单和未处理采购分开显示，更有利于业务部门进行业务处理。
员工代码 CHAR （4） 否 录入出库信息的员工的代码 是否更新 CHAR （1） 否 出库单是否已经更新库存 备注 VARCHAR （50）
是
其它说明信息
图3-8采购管理子系统界面
库存管理子系统：库存管理子系统有6个功能模块。库存操作包括商品入库，
库存管理，商品出库；库存查询包括入库单查询，库存信息查询，出库单查询。
图3-9库存管理子系统界面
在进行商品入库操作时，有两种入库方式，第一种为常规采购单入库，另一
种非采购单商品入库有多种，如赠送，退货等。入库操作与采购界面相似，同样
非常简单方便。
图3-10商品入库操作界面
出库操作都是根据销售单出库的，同前面所有的模块一样，必须选择出库员
才能执行操作。
图3-11商品出库操作界面
库存管理模块是对库存商品的信息管理、安全库存设置、货架摆放以及货架
负责人设置的操作。通过安全库存的设置可以及时地监控商品的库存，一旦发生
缺货，即能通过缺货查询提交到采购部门进行采购。
图3-12库存管理操作界面
图3-13货柜负责人设置界面
图3-14缺货查询界面
销售管理子系统：销售管理子系统包括订单查询处理、销售处理以及销售单查询。
图3-15销售管理子系统界面
销售处理模块分为订单销售与非订单销售两种形式，均包括客户信息，销售员信息，销售的商品信息，以及销售单信息。操作简洁，界面友好。
图3-16销售处理界面
基本信息子系统分为市场信息与公司信息。市场信息包括商品信息、供应商信息与客户信息。而公司信息则包括员工信息和部门信息。在该子系统中可以对各种信息进行更新维护，使系统信息随时保持最新性。
图3-17基本信息子系统界面
图3-18商品信息输入界面
第四章系统实施
第一节硬件配置要求
服务器：Pentium 166 以上（推荐Pentium Ⅲ 800以上，可加快数据处理） 128M以上内存（推荐256M以上，可加快数据存取速度）
4G以上硬盘空间（推荐10G以上，根据实际数据大小而定）
10M网卡（推荐10M/100M网卡或100M网卡，可加快数据传输速度） VGA 或更高分辨率的显示器。
键盘和鼠标。
刻录机（用来备份数据）
客户机：Pentium 133 以上（推荐Pentium Ⅱ 400以上，可加快反应速度） 64M以上内存（推荐128M以上，可加快数据存取速度）
1G以上硬盘空间（推荐4G以上，根据实际数据大小而定）
10M网卡（推荐10M/100M网卡或100M网卡，可加快数据传输速度） VGA 或更高分辨率的显示器或专业显示器。
键盘和鼠标或专用设备。
第二节软件配置要求
服务器：Windows 2000 server、SQL server 2005 企业版服务器端
客户端：Windows 98 SE、SQL server 2005 企业版客户端
开发工具：Delphi 7.0 企业版
第三节关键代码介绍
//连接数据库程序段，对Query控件里的sessionName，DatabaseName属性进行赋值。
function Tericselldeal_form.databasedefineing(query:TQuery):boolean; begin
with Query do
begin
sessionName:=Ericmain_Form.Database1.SessionName;
DatabaseName:=Ericmain_Form.Database1.DatabaseName;
end;
end;
//用Qurey控件，执行SQL语句显示在DBGrid控件中
function
Tericselldeal_form.queryshow(query:Tquery;sqlstr:string):boolean; begin
with Query do
begin
Close;
SQL.Clear;
SQL.Add(sqlstr);
Open;
end;
end;
//动态的执行Query控件程序段
function Tericselldeal_form.dynamicquery(sqlstr:string):boolean; begin
with tquery.Create(nil) do
begin
try
Close;
sessionName:=Ericmain_Form.Database1.SessionName;
DatabaseName:=Ericmain_Form.Database1.DatabaseName;
SQL.Clear;
SQL.Add(sqlstr);
ExecSQL;
finally
Free;
end;
end;
end;
//采购程序段
procedure Tericpurchase_form.N8Click(Sender: TObject);
var
cdmedno,cdpurno,sqlstr,cdemno:string;