物流信息系统课程设计201733063.docx

《物流信息系统课程设计201733063.docx》由会员分享，可在线阅读，更多相关《物流信息系统课程设计201733063.docx（86页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、成 绩武汉轻工大大学经济与管理理学院 物物流信息系系统课程设设计报告题 目 物物流信息系系统课程程设计报告告 姓 名 学 号号 专业年级 物流管理理15011指导教师 黄键 职 称称 年 月月 日日教师评语：指导教师_（签名）年 月 日目 录目录一课程设设计的序言言3二课程设设计的内容容及其步骤骤4 （一）建立数据库4（二）主程程序.6.（三）主菜菜单.7（四）建立立工具栏.7.（五）建立立logoo表单.8.（六）表单单基本信息息表sysstem.15.（七）表单单rkd（入入库单）.19.（八）出库单cckd.25.（九）器材材明细表表表单qcmmx.sccx.35（十）浏览览修改表单单l

2、lxgg.scxx. .411（十一）修修改总数据据库表单xxgmaiin.55（十二）个个人工具卡卡表单grrgj. 58（十三）创创建本地视视图ll_gjk.60（十四）创建修修改个人工工具卡表单单grgjjk .61（十五）建立报报表.64.（十六）连编.667（十七）制作安安装盘.688三课程设设计的总结结和感想771一、设计的的序言设计目的：物流信息息系统课课程设计为为学生提供供了一个既既动手又动动脑，独立立实践的机机会。培养养学生“物流信息息系统”课程所学学知识的综综合应用，分分析和解决决企业物流流信息系统统实际问题题的能力。设计要求由教师布置置课程设计计的思路，提提供设计资资料，

3、学生生根据资料料，结合企企业物流系系统的相关关知识，对对资料进行行深入分析析，独立完完成物流信信息系统课课程设计。设计内容：1根据企企业库房需需求进行分分析。2利用VVFP进行行软件设计计。 二、课程设设计的内容容及其步骤骤（一）建立立数据库11、新建数数据库1550809900033郑万芳，保保存到e：150080900003郑郑万芳 目目录下。2、在数据据库中新建建表syssten（.dbf），五五个字段：fzr、bbgy、jjhy、ccly、mmima，其其标题分别别为：负责责人、保管管员、计划划员、材料料员、密码码。3、新建表表mainn（.dbff）： ckkbh cc(10), r

4、qq d(88),qccmc cc(16),ggxxh c(20),lb cc(6),dw cc(4), dj n(8,2),ppzbh c(100),rkksl nn(8,22),rkkje nn(10,2), cksll n(88,2), ckjje n(10,22),gccmc cc(30),bz c(6),clyy c(66),bggy c(6),jjhy cc(6),llr c(6),fzrr c(66),lhh c(66),ytt c(220),qqu c(2),jjia cc(2),hao c(2),ku c(2)。其标题题分别为：出库编号号，日期，器器材名称，规规格型号，类类别

5、，单位位，单价，凭凭证编号，入入库数量，入入库金额，出出库数量，出出库金额，工工程名称，班班组，材料料员，保管管员，计划划员，领料料人，负责责人，料号号，用途，区区，架，号号，库。说说明：c-字符型；d-日期期型；n-数值型，括括号内为字字节长度，逗逗号后面的的数值为几几位小数。4、新建表表grgjjk（.dbff）: cckbh c(100), rrq d(8),qqcmc c(166),gggxh cc(20),lb c(6),dw c(4), djj n(88,2), ckssl n(8,2), ckkje nn(10,2),bbz c(6),jjhy cc(6),llr c(6)。其标

6、题题分别为：出库编号号，日期，器器材名称，规规格型号，类类别，单位位，单价，出出库数量，出出库金额，班班组，计划划员，领料料人。完成后（二）主程程序sett tallk offf &关关闭对话模模式set ssafe off&关闭对对话框set sstat off&不不显示提示示对话框set ddele on &不处理理已删除的的记录set ccent on&设定日期期格式年为为4位数set ccons on &激激活从程序序中向 VVisuaal FooxProo 主窗口口或活动的的用户自定定义窗口的的输出set ddate to aansi &设置置日期格式式set sstat bar o

7、n &打打开状态栏栏set ccolorr to &设定配配色方案set ssysmeenu ooff &关关闭系统主主菜单closee alll &关闭各种种类型的文文件RELEAASE WWINDOOW 常用用 &关闭常常用工具栏栏if mmod(dday(ddate(),22)=0 &偶偶数日期_SCREEEN.bbackccolorr=rgbb(80,180,150) &窗口背景景颜色MOODIFYY WINNDOW SCREEEN TTITLEE 库房管理理应用软件件 verr 2.11 为为齐;鲁石石化检修公公司机泵车车间编制 今天是是：+ddtoc(datee()+ +cdoow

8、(daate()elsse &奇数日日期_SCCREENN.bacckcollor=rrgb(880,1550,1880) &窗口口背景颜色色MODIIFY WWINDOOW SCCREENN TITTLE 库房房管理应用用软件 vver 22.1 ; 软软件编制者者：王永成成 今天天是：+dtocc(datte()+ +cddow(ddate()enndifZZOOM WINDDOW SSCREEEN MAAX &主窗窗口最大化化_SCRREEN.conttrolbbox=.f. &去去掉主窗口口控制按钮钮deacctivaate wwindoow 项项目管理器器 &关闭闭项目管理理器myp

9、path=leftt(syss(16),ratt(,syss(16) &确确定程序所所在的位置置set defaa to (myppath) &设置当前前路径seet paath tto daata;fform;pic &指明路径径openn dattabasse kffgl &打开开数据库ddo foorm llogo &运行表单单logooreadd eveents &占用用进程，启启动事件处处理quiit &退出（三）主菜菜单操作(BBR器材入库库 命令令：do formm rkdd器材出出库 命命令：doo forrm ckkd-退出 命令：Cleaa eveent编辑辑(BRR编编辑

10、浏览出出入库单 命令：do fform llxgg浏览览个人工具具卡 命令：do fform grgjjk修改改个人工具具卡 命令：do fform grgjjk-基基本设置 命令：do fform systten游戏戏(BRR猜猜数游戏 命令令：do formm csyyx身身体状态测测试 命令：ddo foorm sstcs-心灵感感应 命令：ddo foorm xxlgy退退出(BR 命令Cllea（四）建立立工具栏11、点击“文件”“新建”按钮，选择择“类”，出现新建建类对话框框。2、类名输输入郑万万芳kuff，派生生于选择toollbar，存储于于：“e:1150800900003郑

11、万芳芳郑万芳芳kuf.vcx”，按确确定按钮钮，出现类类设计器。3、跟建立立表单一样样，如图55-2，我们建立88个命令按按钮，其toolltipttext分别为：器材入库库，器材出出库，修改改，浏览，查查找器材，身身体状态测测试，猜数数游戏，退退出。给按按钮加上图图片、文字字（例如：猜字字）。在各各自的cclickk方法程程序中输入入相应的命命令（如：do fform rkd），现现在还没建建立这些表表单，可以以在建完以以后再输。（五）建立立logoo表单（1）新建建表单loogo，ttitleebar为为0-关闭闭，heiight=115，wwidthh=2222。其innit过程程：us

12、ee sysstenTThisfform.Labeel1.wwidthh =0TThisfform.Labeel3.LLeft =thiisforrm.wiidthppubliic tbbs,bggy1,ccly1,jhy11,fzrr1thiisforrm.toop=0tthisfform.leftt=0bggy1=bbgyclly1=cclyjhhy1=jjhyfzzr1=ffzr（2）Laabel11的capptionn为“欢迎迎使用库房房管理软件件”，透明明，楷体，112号，黄黄色。（3）Laabel22的capptionn为“输入入密码”，透透明，黑体体，12号号，绿色。（4）Lab

13、el3的caption为“软件作者：武汉轻工大学 郑万芳”，透明，白色。（5）文本本框的Naame为ttxtpaasswoord，ppasswworchhar为*。（66）计时器器timeer1，iinterrval=200。其timeer过程：if tthisfform.top1600 &判断laabel11的宽度是是否大于1160 Thhisfoorm.LLabell1.wiidth =0 &llabell1的宽度度设为0EElse TThisfform.Labeel1.wwidthh = TThisfform.Labeel1.wwidthh +166 &宽度增加加16EnndIf*以下作

14、用用是让laabel33向左移动动If TThisfform.Labeel3.LLeft =3 =mmessaageboox(你你不是合法法用户！你你不能使用用！,64,提示窗口口) thissformm.relleasee Cleea evvent eelse =meessaggeboxx(口令令不正确！请重新输输入！,64,提示窗口口)thissformm.txttpassswordd.vallue=tthisfform.txtppasswword.setffocuss()eendiffENDIIF（8）命令令按钮caancel，退退出。其cclickk过程：tthisfform.rele

15、easeCClea evennt出现的问题题：点击确定按按钮，出现现一个程序序错误的提提升，显示示文件不存存在以及找找不到变量量解决方案：因为对vvfp软件件操作不够够精通，暂暂时没有想想到解决方方案。望老老师见谅。（六）表单单 基本信信息表syystemm（1）表表单的“ccaptiion”为为“基本信信息”，“wwindoowtyppe”为11-模式（2） 建立标签“llabell1laabel55”、文本本框“teext1textt5”和命命令按钮“ccommaand1”。（3）右击击表单选择择“数据环环境”（图图6-1）。（4）填加加表syssten.dbf。（图图6-2）（5） 、t

16、extt1teext5的的“conntrollsourrce”分分别选择ssysteen.fzzr、syystenn.jhyy、syssten.cly、ssysteen.bggy、syystenn.mimm（6）、llabell1laabel55的capptionn为：负责责人、计划划员、材料料员、保管管员、密码码。（7） 、commmand11.cillck为：thissformm.relleasee。（8）、ttext55的“innputmmask”为为：“XXXXXXXX”，“ppasswwordcchar”为为：“*”。出现的问题：Text11-4无法法输入数据据，基本信信息表不能能正

17、常使用用。解决方案：因为对vvfp软件件的使用不不够精通，所所以对该出出现的问题题无法解决决，望老师师见谅。（七）表单单rkd（入入库单）（11）、我们们用一些标标签和线条条建立（如如图6-33）表单rrkd，你你可以根据据自己单位位的情况设设计。其“ttitleebar”为为：0-关关闭（2）、建建立17个个文本框（由由于我在设设计时进行行过修改，删删掉了一些些文本框，所所以现在不不连续），其其“bacckstyyle”为为：0-透透明、“bbordeercollor”为为：0-无无(没有“0-无”这个选项项，只有颜颜色的选择择，如下图图：)其“conntrollsourrce”分分别为：t

18、text99为bgyy1，teext122为fzrr1，teext177为clyy1，其它它的均与其其namee相同（例例：texxt1为ttext11.）。（3）、组组合框coombo22，“boorderrcoloor”为：0-无(没有“0-无”这个选项项，同上)，“coontroolsouurce”为为cbo11，“roowsouurce”为为：“钢材材,管件,配件,工工器具,量量具,杂品品,消耗品品,油料,劳保,阀阀门”，“rrowsoourceetypee”为：11-值。（4）、命命令按钮ccommaand1（确确定）的cclickk过程为：tis=messsagebbox(保存入库

19、库单？,4+644,提示示窗口)if ttis=66if !usedd(maain)use maiinelsseselle maainenndifAAPPENND BBLANKKrepll lbb wiith ccbo1rrepl rq withh datte()rrepl pzbbh wwith textt4reppl ggcmc witth teext5rrepl yt withh texxt6reepl lh wwith textt13reepl qcmcc witth teext199repll gggxh withh texxt20rrepl dw withh texxt7reepl

20、 rksll witth teext8rrepl dj witth ttext110reppl rrkje witth ttext111reppl jjhy withh teext233repll bggy wwith bgyyrepll fzzr wwith fzrrrepll lllr wwith clyyuseteext200=ttext113=textt4=textt8=0.00teext100=0.000texxt11=0.000textt1=yeear(ddate()teext2=montth(daate()texxt3=dday(ddate()thhisfoorm.ccbo2.s

21、etffocussthissformm.reffreshhendiif（5）、命命令按钮ccommaand2（退退出）的cclickk过程：uusethhisfoorm.rreleaase（6）、表表单forrm1的iinit过过程： publlic ttext11,texxt2,ttext33,texxt4,ttext55,texxt6,ttext77,texxt8,ttext110,teext111,; ttext119,teext200,texxt23,cbo11,texxt9,ttext113texxt5=texxt6=texxt7=texxt13=teext177=ttext119=

22、textt20=texxt23=teext122=ttext99=ttext44=ttext88=0.000texxt10=0.000textt11=00.00ttext11=yeaar(daate()texxt2=mmonthh(datte()textt3=daay(daate()cboo1= thhisfoorm.ccbo2.setffocuss（7）、表表单forrm1的ddestrroy过程程：relleasee texxt1,ttext22,texxt3,ttext44,texxt5,ttext66,texxt7,ttext88,texxt10,textt11,; texxt19,t

23、extt20,ttext223,cbbo1,ttext99,texxt13出现的问题题：1. 点击组合框框1的下拉拉箭头，无无法选择2. 点击确定命命令后，弹弹出是否保存存入库单，选择“是”，出现以以下程序错错误，显示示文件不存存在解决方案：因为对vvfp软件件的使用不不够精通，所所以对出现现的问题无无法解决，望望老师见谅谅。（八）出库库单ckdd 最初我设设计的出库库单象入库库单一样，一一次只能开开一种材料料，由于在在车间使用用就改成现现在这样。图图7-1（11）、文本本框texxt1的“daatefoormatt”为：14-汉汉语；“ttapstoop”（如如下图：）为：.F.假；“val

24、ue”为：=date()。其他略。（2）、建建立表格GGrid11。右击GGrid11选择生成成器选择mmain表表，选定如如下字段：qcmcc、ggxxh、dww、dj、ccksl、cckje、llb，按确确定按钮。（图图7-2）（3） 、修改表格格Gridd1。“ddelettemarrk”为：.F.-假；“reccordmmark”为为：.FF.-假；“reecorddsourrce”为为：（无）（去去掉maain）；“scrrollbbars”为为：2-垂直。CComboo1的“rrowsoourcee”为：一班,二二班,三班班,四班,五班,六六班,办公公室；“rrowsoourcee

25、typee”为：1-值。（4）、表表单的innit过程程：pubblic bz1,bh1,llr11*建立临临时表lsscreaat cuursorr ls ( ckkbh cc(10), rqq d(88),qccmc cc(16),ggxxh c(20),dw cc(4), ; dj nn(8,22), ccksl n(8,2), ckjee n(110,2),gcmmc c(30),bz cc(6),; yyt c(20),cly c(6),bgyy c(66),jhhy c(6),lllr cc(6),fzr c(6),lb c(6)witth thhisfoorm.ggrid11.r

26、eecorddsourrce=ls.collumn11.conntrollsourrce=ls.qqcmc.coolumnn2.coontroolsouurce=ls.ggxhh.ccolummn3.ccontrrolsoourcee=lss.dw.coolumnn4.coontroolsouurce=ls.dj.collumn55.conntrollsourrce=ls.ccksl.coolumnn6.coontroolsouurce=ls.ckjee.ccolummn7.ccontrrolsoourcee=lss.lbendwwith（5）、打打印按钮的的cilcck过程：bz1=mbo1

27、.valuuebh11=alllt(thhisfoorm.ttext55.vallue)lllr1=alltt(thiisforrm.teext6.valuue)seele llsmesssageebox(请用BB5纸！,16,提示信信息)RREPORRT FOORM cckdann.frxx TOO PRIINTERR thiisforrm.reefressh（6）、保保存按钮的的cilcck过程：bz1=mbo1.valuuebh11=alllt(thhisfoorm.ttext55.vallue)rrq1=ddate()llrr1=alllt(tthisfform.textt6.vaal

28、ue)gcmcc1=alllt(tthisfform.textt3.vaalue)yt1=alltt(thiisforrm.teext4.valuue)*检检查输入是是否有效ssele lscoount for !delletedd() tto zssif zzs=0messsagebbox(至少要有有一条记录录才能保存存！,116,提提示信息)reeturnnendiifif emptty(bzz1)mmessaageboox(请请填写班组组,166,提示示信息)retturneendifflocaat foor lss.ckssl=0iif foound()meessaggeboxx(请填

29、填写数量,16,提示信信息)retuurnenndif*加入到正正式表中ggo toopdo whille !eeof()inssert intoo maiin (cckbh,rq,qqcmc,ggxhh,dw,dj,ccksl,ckjee,gcmmc,ytt,llrr,jhyy,lb,bz) ; vallue (bh1,rq1,ls.qqcmc,ls.gggxh,ls.ddw,lss.dj,ls.ccksl,ls.cckje,gcmcc1,lss.yt,llr11,jhyy1,lss.lb,bz1) iff alllt(lss.lb)=工器器具 inssert intoo grggjk (c

30、kbbh,rqq,qcmmc,gggxh,ddw,djj,ckssl,ckkje,lllr,jjhy) ; vallue (bh1,rq1,ls.qqcmc,ls.gggxh,ls.ddw,lss.dj,ls.ccksl,ls.cckje,llr11,jhyy1) endiif skippendddozapp（6）、退退出按钮的的cilcck过程：tt=00thissformm.relleasee（7）、GGrid11下的Coolumnn1下的TText11的DbllClicck过程：do fform qcmxx selle lssthiss.vallue=mmain.qcmccwithh t

31、hiisforrm.grrid1.collumn22.texxt1.vvaluee=maiin.gggxh.coluumn3.textt1.vaalue=mainn.dw.collumn44.texxt1.vvaluee=maiin.djj .ccolummn5.ttext11.vallue=00 .coluumn6.textt1.vaalue=0.ccolummn7.ttext11.vallue=mmain.lbenndwitththiisforrm.reefresshthiisforrm.grrid1.coluumn5.textt1.seetfoccusthhisfoorm.rrefree

32、sh（8）、GGrid11下的Coolumnn5下的TText11的LosstFoccus过程程：if thiss.vallueccksl11 sss=alllt(sttr(ckksl1) messsagebbox(开票数量量不能大于于库存数量量+sss,16,提示信信息) thhisfoorm.ggrid11.collumn55.texxt1.vvaluee=0 thiisforrm.grrid1.coluumn5.textt1.seetfoccus retuuendiif tthisfform.gridd1.coolumnn6.teext1.valuue=lss.ckssl*lss.djt

33、thisfform.gridd1.reefressh（9）、GGrid11的rigghtciilck过过程：seele llsdo tjiaa.mprr &调调用tjiia菜单tthisfform.gridd1.reefresshthiisforrm.grrid1.setffocuss 附附加：建立立tjiaa菜单（11）、新建建快捷菜单单（2）、“填填加一条”的的过程内容为：locaat foor lss.ckssl=0iif foound()meessaggeboxx(请填填写数量,16,提示信信息)retuurnenndifaappennd bllank（3）、“删删除选定一一条”的过程

34、内内容为：iif meessaggeboxx( 是是否真的删删除该行？,366,提示示信息)=6ddeleeendiff（4）、生生成为tjjia。出现的问题题：1. 点击保存命命令，出现现以下程序序错误，显显示文件不不存在2. 点击退出命命令，出现现以下程序序错误解决方案：因为对vvfp软件件的使用不不够精通，所所以对以上上出现的错错误无法给给出解决方方案，望老老师见谅。（九） 器材明细表表表单qccmx.sscx（1）建立立标签（按按其capptionn内容）：“在上面面的文本框框中输入”，“器器材名称或或规格型号号”，“库库存数量：”，“库库存金额：”，“器器 材 明明 细 表表”，“库库”，“区区”，“架架”，“号号”，“器器材名称：”，“规规格型号：”，“单单位：