智能决策技术分析报告.docx
- 文档编号:9870922
- 上传时间:2023-02-07
- 格式:DOCX
- 页数:28
- 大小:660.05KB
智能决策技术分析报告.docx
《智能决策技术分析报告.docx》由会员分享,可在线阅读,更多相关《智能决策技术分析报告.docx(28页珍藏版)》请在冰豆网上搜索。
智能决策技术分析报告
智能决策技术
期末考核
设计题目:
生产物料需求决策支持系统
智能决策技术1
期末考核1
1.规划与分析时期3
1.问题描述3
1.1现状3
1.2解决手段5
2.数据处理分析6
2.1数据流程图6
2.2物料需求分析的核心流程:
6
2.3建立数据字典:
8
3.抽象模型建立10
3.1系统功能结构图10
3.2系统业务流程图10
2.设计时期12
1.系统平台设计12
1.1开发平台设计12
2.要紧功能模块设计13
2.1登录模块13
2.2主界面模块14
2.3主生产打算模块15
2.4订单治理模块19
2.5用户治理模块19
3.数据库设计20
3.实施时期27
1.实现方案27
2.系统开发、调试与运行28
2.1登录模块设计28
2.2订单治理35
2.3库存治理46
2.4物料需求分析55
4.总结97
一・规划与分析时期
1•问题描述
1・1现状
选定决策支持主题是生产物料需求打算。
在现代企业的生产经营活动中物料是企业价值链中极其重要的一环,物料釆购决策占有十分重要的地位。
在成熟、稳定的市场条件下,理性的企业决策者总是力争在“正确时刻”采购“正确数量”的物料,供企业生产使用。
物料需求计算的差不多任务是:
一是从最终产品的生产打算导出相关物料(原材料、零部件)的需求量和需求时刻(相关需求);二是依照物料的需求时刻和订货周期来确定其开始订货的
3/98
时刻。
物料需求计算的差不多内容是编制物料(包括零部件和原材料)的采购打算(那个地点不考虑生产的自制,假定所有的物料都进行采购)。
要正确编制物料采购打算,首先必须落实最终产品的产出进度打算,即主生产打算,这是物料需求计算展开的依据。
还要需要明白产品的零部件和原材料结构,即无聊清单,才能把主生产打算展开成物料需求打算;同时,必须明白库存数量才能准确地计算出各种零部件和原材料的采购数量。
因此,以主生产打算,物料清单为依据计算物料需求。
物料需求打算原理框架如下图1.1:
囱11
1.2解决手段
建立物料需求分析的决策支持系统,完成复杂的分析过程,
并自动生成物料需求订单,以供生产使用。
1.3意义
应用该系统,可为企业生产过程中物料需求和选择供应商提
供依据。
2.数据处理分析
2.1数据流程图
分析
分析
物料订单
图2.1
2.2物料需求分析的核心流程:
物料需求打算要紧按照反工艺路线(成品一一组装件一一零部件)的原理,按照产品产出打算规定的产品的生产数量和期限要求,利用产品结构文件、库存信息文件等数据资料,反工艺顺序计算出各种物料的需求数量与需求期限,进而,依照企业实际确定自制和采购的数量和期限。
物料需求计算时要紧用到五种库存状态数据:
毛需求G(t)、打算到货量S(t)、现有量H(t)、净需求量N(t)和打算发出订货量R(t-L),那个地点t是表示周期的变量,L是提早期。
计算在第t周期第i层所有物料需求量和需求时刻的步骤为:
第一步:
确定第i层第t周期所有毛需求量。
毛需求量是指生产中实际需要的量,0层的毛需求由主生产打算确定,其余各层的毛需求量是由其上层的打算订单下达。
第二步:
确定物料第i层第t周期的净需求量,净需求量是指实际需要的增加量。
第三步:
依照净需求量确定第t周期打算下达数量
第四步:
第i层第t周期的打算订单下达数量,即为第i层物料的毛需求量,由毛需求量开始重复上述1—4步,直至最低层物料。
其分析流程图如下图:
2.3建立数据字典:
总编
号
编
号
名
称
来
源
去向
包含数据结构
1-01
F1
客户订
单
客
户
分析
处理
订单号、产品编号、订购数量、
交货日期
1-02
F2
产
品结构
设
计
分析
处理
产品编号、层次、上层编号、上
层需求
1-03
F3
库存状态
库
存
分析
处理
产品编号、产品名称、库存总量、可用量、将要入库量、安全库存
1-04
F4
物
料订单
分
析
处
理
订单
下达
订单号、物料编号、订购数量、
订购日期、有效期至
1-05
F5
用户信息
用
户
登录
推断
用户名、密码、权限、备注
表2.3
3•抽象模型建立
图3.1
3.2系统业务流程图
图3.2
二.设计时期
1・系统平台设计
1・1开发平台设计
前台设计工具:
BorlandDelphi6后台数据库:
SQLServer2008开发环境:
硬件环境:
PC电脑软件环境:
(见下图)
服务器
操作系
统
WINDOWS2007
应用程
序
SQLServer2008
客户端
操作系
统
WINDOWS2007
应用程
序
BorlandDelphi6
1.2网络运行模式设计
本系统采纳C/S模式,即客户端/服务器模式
网络拓扑结构为星型结构
2•要紧功能模块设计
2.1登录模块
界面截图如下图4.21:
图4.21
功能是验证用户是否合法,是否同意登入系统,假如合法则
还要推断其权限,以限定用户的操作权限。
2.2主界面模块
界面如图4.22登录之前及4.23登录之后,其功能是实现
在各个功能模块的界面之间的进行跳转:
图
图4.23
生产计划物料管理
物料纟吉构管理
物科库存状态
物料需求分解
场科采购
系统晉理
风格更换
—欢迎使用按
4.2
2・3主生产打算模块
界面如下图4.24,要紧是实现客户订单治理:
15/98
图4.24
图4.25为产品结构治理:
曲料库存详情——
□允许编辑□□□□
物科编号物科名称
层次|库存总量
可用虽
即将入库量|安全£
A1011
成人自行车
0
30
20
15
1
B5011
成人车架
1
120
50
20
B5012
成人车轮
1
50
35
20
三1
B5013
成人车把
1
50
35
20
C5011
成人车圏
2
50
30
20
C5012
成人轮胎
2
50
20
20
C5013
成人辐条
2
500
200
20
*
王I — 图4.25 图4.26为物料库存治理: 图4.26 图4.27为物料需求分析界面: 图4.27 2.4订单治理模块 图4.28为订单治理界面: ► 20171051 A1011 60 Z017-11-12 2017-11-12 20171052 B5011 70 2017-11-12 2017-11-12 己入库 20171052 B5011 70 201711-12 201711-12 有效 20171054. C5011 70 2017-11-12 2017-1112 有效 20171055 C5012 70 2017-11-12 2017-11-12 有效 20171056 C5013 70 2017-11-12 2017-11-12 有效 订购卑号|物科编号|订炖数星|下車时间 |应衣期眼 |当前伏态 图4.28 2.5用户治理模块 图4.29为用户治理界面,包括注册、修改密码、权限设置 图4.29 3-数据库设计 数据库设计如下: 客户订单文件表oderform 字段名称 字段描 述 数据类型 字段长 度 是否主 键 同意为 空否 Oderno 订单号 Char 10 Y N Pno 产品编 Char 10 N N 号 Pnum 订单总 量 Int 4 N N Pselfnum 自产量 Int 4 N N Pbuynum 外购量 Int 4 N N Odert 下单日 期 Datetime 8 N Y Delit 交货日 期 Datetime 8 N Y State 当前状 态 Datetime 10 N Y 物料需求订单文件表matelist 字段名称 字段描 述 数据类型 字段长 度 是否主 键 同意为 空否 Mino 订单编 号 Char 10 Y N Mno 物料编 号 Char 10 N Y Mlnum 订购数 Int 4 N Y 量 Mltime 订购日 期 Datetime 8 N Y Mlvivtime 有效期 至 Datetime 8 N Y Remark 备注 Char 30 N Y 物料库存文件表matestor 字段名称 字段描 述 数据类型 字段长 度 是否主 键 同意为 空否 Mno 物料编 号 Char 8 Y X Mname 物料名 称 Char 10 N Y Mlayer 所属层 次 Int 4 N Y Mpreno 上层编 号 Char 8 N Y Mprenum 上层需 求 Int 4 N Y Mtnum 库存总 量 Int 4 N Y Mvnum 可用数 量 Int 4 N Y Mwnum 将要入 库量 Int 4 N Y Secnum 安全库 存 Int 4 N Y Mut 计量单 位 Char 4 N Y Mfinish 成品率 Float 8 N Y Madvant 提早期 Int 4 N Y Avat 生效日 期 Datetime 8 N Y Invat 失效日 期 Datetime 8 N Y Remark 备注 Char 30 N Y 物料分析临时表tempinfo 字段名称 字段描 述 数据类型 字段长 度 是否主 键 同意为 空否 Dtime 需求日 期 Datetime 8 N N Dmno 物料编 号 Char 8 N N Dmname 物料名 称 Char 10 N N Dmlayer 所属层 次 Int 4 N N Dmadvantt 提早期 Int 4 N N Dpreno 上层编 号 Char 8 N N Dprenum 上层需 求 Int 4 N N Dmfinish 成品率 Float 8 N N Dvnum 可用数 量 Int 4 N N Dwnum 将要入 库量 Int 4 N N Dsnum 安全库 存 Int 4 N N Ddtnum 毛需求 量 Int 4 N N Ddnetnum 净需求 量 Int 4 N N dselfn 自产量 Int 4 N Y dbuyn 外购量 Int 4 N Y 用户信息表userinfo 字段名称 字段描述 数据类型 字段长 度 是否主 键 同意为 空否 Username 用户名 Char 10 Y N Passswd 用密码 Char 10 N N Uright 用户权限 Char 10 N Y Lastit 最近登录 时刻 Datetime 8 N Y Lastot 最近登出 时刻 Datetime 8 N Y Remark 备注 Char 30 N Y 三.实施时期 1.实现方案 以一个简化了的自行车产品来讲明,其库存状态书记库如上图所示。 其结构示意图为: 0层 1 层 2层 差不多的物料打算步骤为: (1)确定自行车的总需求、净需求和打算定单下达的时刻; (2)依照上层的结果,确定第1层上所有物料的净需求和打算定单下达的时刻; (3)依照上层车轮的结果,确定第2层上所有物料的净需求和打算定单下达的时刻。 其中用到的公式有: 期打算入库量+安全库存 不考虑批量问题,则t-L周期计算打算订单下达数量等于t周期 净需求量,即: R(t-L)=N(t) 2•系统开发、调试与运行 2.1登录模块设计 界面如图 要紧程序代码为: unitLogin;var fmLogin: TfmLogin;implementationusesdatamd,Main; {$R*.dfm} //////////////////////自定义过程,验证用户///////////////////////////////procedureTfmlogin.userjug(u,p,r: string); varupsql,upsql2: string; begin ifu二'1then begin showmessage('用户名不能为空,请输入用户名! ');edtun.setfocus; end elseifp二''then begin showmessage(r密码不能为空,请输入密码! '); edtpw.setfocus; end else begin upsql: 二'selectusernm,passwd,urightfromuserinfowhereusernm=++u++andpasswd二++p++ anduright=,+*1**+r+f111; userinfo where lastit=r+1111+datetostt(Now)+''''+ F.IIIf..ffff usernm=++u+; try dtmd.qryup.Close; dtmd.qryup.SQL.Clear; dtmd.qryup.SQL.Add(upsql); dtmd.qryup.Open; ifnotdtmd.qryup.Eofthen//用户合法,则进入系统 begin dtmd.qryup.Close;//更新用户的最近登 录时刻 dtmd.qryup.SQL・Clear; dtmd.qryup.SQL・Add(upsql2); dtmd.qryup.ExecSQL; fmMain.RzGroupl.Visible: =false; fmMain.RzGroup2.Visible: =true; fmMain.RzGroup2.Opened: =true;fmMain.RzGroup3.Visible: =true; 31/98 fmMain.RzGroup4.Visible: =true; fmMain.RzGroup5.Visible: =true; fmMain.RzGroup5.Visible: =true; fmMain.pu: =u; fmMain.pp: 二p; fmMain.pr: =r; fmMain.sttb.Panels[0].Text: =fmMain.pu; fmLogin.Close; end else begin showmessage(*用户名或密码错误! 1); edtun.SetFocus; end except showmessage('连接数据库失败,请检查数据库服务是 否正常! '); end; end; end; //////////////////////////////退出登录 ///////////////////////////////// procedureTfmLogin.btnextClick(Sender: TObject); begin self.Close; end; //////////////////////////////登录按钮 //////////////////////////////// procedureTfmLogin.btnlgClick(Sender: TObject); varri: string; begin ifself.rbu.Checkedthen ri: =fuser1 elseifself.rba.Checkedthen ri: =fadmini'; userjug(trim(edtun.Text),trim(edtpw.Text),ri);end; ////////////////////用户名和密码文本框里回车 ///////////////////////// procedureTfmLogin.edtunKeyPress(Sender: TObject;var Key: Char); varri: string; begin ifkey二#13then begin ifself.rbu.Checkedthen ri: =,userF elseifself.rba.Checkedthen ri: 二'admini'; userjug(trim(edtun.Text),trim(edtpw.Text),ri); end; end; end. 2.2订单治理 界面如图5.42 35/98 ®5・42 unitoderform; var fmoderfornkTfmoderform; implementation usesdatamd・Main; 亠SR*dfm) 二二二二二二二二二三二二二恥^^禅蔺崑嵐井函肚就 36_98 /////////////////////// procedureTfmOderform.cbpbdpd(tet: string); var i,j: integer; osql: string; begin withdtmd.qryofmdo begin osql: =fselectdistinct'+tet+‘fromoderform1; 〃查询唯一值 try Close; SQL・clear; SQL.Add(osql); Open; fmOderform.dbno.DataSource: =nil; fmOderform.dbgo.DataSource: =nil; First; i: =RecordCount; forj: 二0toi-1do//循环赋值 begin ifm=lthen cbnol.Items.Add(FieldByName(fodernor).AsString) elseifm=2then cbno2.Items.Add(FieldByName(fodernor).AsString); Next; end; except showmessageC数据库连接失败! 请检查数据库服务 是否正常! '); end; end; end; procedureTfmOderform.btnexitClick(Sender: TObject); begin self.Close; end; procedureTfmOderform.cbnolDropDown(Sender: TObject);begin m: =1; self,cbnol.Items.Clear; self,cbpbdpd(foderno1); end; procedureTfmOderform.cbno2DropDown(Sender: TObject);begin m: =2; self.cbno2・Items.Clear; self,cbpbdpd(foderno1); end; H匸================================屮 procedureTfmOderform.btnsearClick(Sender: TObject); var ssql,cdt: string; begin ssql: =,selectodernoas订单号,pnoas产品编号,mnameas产品名称,pnumas订购量,odertas订购日期,delitas交货日期,stateas当前状态fromoderform,matestorwheremno=pnoandpno〈>'+‘'''+' ifcbnol.TextO*1thencdt: =,andoderno>=,+*'1*+trim(cbno1.Text)+r'*1; ifcbno2.TextO**thencdt: 二cdt+‘and oderno<=,+*'1*+trim(cbno2.Text)+f'''; ifdatetostr(dtpl.Date)<>frthencdt: =cdt+'anddelit>=,+,''*+datetostr(dtpl.DateTime)+'*11; ifdatetostr(dtp2.Date)<>frthencdt: =cdt+'anddelit<='+‘''*+datetostr(dtp2.DateTime)+*'''; ifcbnm.TextO**thencdt: 二cdt+‘and pno二11+trim(cbnm.Text)+***1; ifcbst.TextO**thencdt: 二cdt+‘and state二1+trim(cbst.Text)+*f11; ssql: 二ssql+cdt; withdtmd.qryofmdo
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 智能 决策 技术 分析 报告
![提示](https://static.bdocx.com/images/bang_tan.gif)