河 南 城 建 学 院
实习报告
实 习
实 习
系
专
姓 名
指 导
完 成 类 别:课 题:别:业:学 号:教 师:时 间: 数据库应用课程设计 药品管理系统 20xx年12月
河南城建学院实习报告
目录
1本组课题及任务分配...............................2
2系统需求及调查分析...............................3
3系统设计.........................................4
3.1系统总体设计流程图...........................4
3.2系统详细设计.................................5
3.3数据库设计...................................6
4系统实施.........................................8
4.1启动功能.....................................8
4.2登录界面.....................................9
4.3主界面界面..................................10
4.4信息查询界面................................10
4.5信息管理界面................................11
4.6打印界面....................................12
4.7系统管理....................................13
4.8关于........................................17
4.9退出界面 ...................................18
5设计体会........................................19
6参考书目........................................20
河南城建学院实习报告
1本组课题及任务分配
本组课题:药品管理系统
任务分配:
XXXX:用户表、药品信息表、生产信息表、供应商信息表、登陆页面及最后的修改美化。
XXXX:启动界面、用户注册表单、注销用户表单、修改密码表单及其退出表单。
XXXX:生产厂家信息查询表单、供应商信息查询表单、药品信息查询表单以及关于表单。
XXXX:生产厂家信息管理表单、供应商信息管理表单、药品信息管理表单以及帮助表单。
河南城建学院实习报告
2.系统要求及调查分析
2.1系统要求
经过对药品管理的要求分析,可知要完成此系统需要时系统具有以下一些基本的功能,以便适合用户操作及管理。
(1)系统用户在初始化药品管理的时候的时候,要能添加药品,建立药品库,对所有药品实行编码并生成相应的编号。药品添加要把药品所有信息进行添加,包括药品编号、药品通用名、剂型、规格、生产地址、适应症等内容;对于添加的药品数据信息也可以进行相应的修改,或者删除,全凭用户需要。
(2)系统用户需要能使用正确的密码登陆进入主程序,并且在主程序中能对密码进行修改以及添加新用户和注销以往用户。
(3)系统能够准确的查询和管理生产厂家信息,生产厂家信息,包括生产厂家编号、公司全称、地址、电话、联系人等内容;对于添加的生产厂家信息也可以进行相应的修改或者删除以上各种操作全可凭用户的需求而定。
(4)系统能够准确的查询和管理供应商信息,包括供应商编号、全称、地址、联系电话、联系人、开户银行等内容;对于添加的供应商信息可以由用户进行相应的修改或者删除等操作,全由用户需求而定。
(5)除以上系统主要需求外还需要以下内容完成系统,其中包括启动页面,在系统操作时的帮助和关于系统的信息,以及最后的退出页面。
2.2调查分析
通过对药品管理系统的分析和功能的需求,经调查分析后可知系统需要以下表格及内容来充实各个方面的信息和完成一些基本的实践性操作。
(1)药品信息,包括药品编号、药品通用名、剂型、规格、生产地址、适应症等内容;
(2)用户信息,包括用户名及密码等内容;
(3)生产厂家信息,包括生产厂家编号、公司全称、地址、电话、联系人等内容;
(4)供应商信息表,包括供应商编号、全称、地址、联系电话、联系人、开户银行等内容;
河南城建学院实习报告
3.系统设计
3.1系统总体设计流程图
河南城建学院实习报告
3.2系统详细设计
由上节系统设计流程图可知系统的大概流程,又经过对药品管理的要求分析,及系统需求可知要完成此系统需要时系统具有以下一些基本的功能,以便适合用户操作及管理。也就是药品管理系统的详细设计有如下内容。
(1)点击快捷方式后能够显现出启页面并顺序显示出登陆表单以便于下一步的操作。
(2)系统用户在初始化药品管理的时候的时候,要能添加药品,建立药品库,对所有药品实行编码并生成相应的编号。药品添加要把药品所有信息进行添加,包括药品编号、药品通用名、剂型、规格、生产地址、适应症等内容;
对于添加的药品数据信息也可以进行相应的修改,或者删除,全凭用户需要。
(3)系统能够准确的查询和管理生产厂家信息,生产厂家信息,包括生产厂家编号、公司全称、地址、电话、联系人等内容;
对于添加的生产厂家信息也可以进行相应的修改或者删除以上各种操作全可凭用户的需求而定;
(4)系统能够准确的查询和管理供应商信息,包括供应商编号、全称、地址、联系电话、联系人、开户银行等内容;
对于添加的供应商信息可以由用户进行相应的修改或者删除等操作,全由用户需求而定;
(5)系统用户需要能使用正确的密码登陆进入主程序,并且在主程序中能对密码进行修改以及添加新用户和注销以往用户;
(6)具有一个关于页面,能够显示对本系统的帮助选项以及关于本系统的一些信息;
(7)系统能够正常的退出,并且有一个退出页面,显示是否确定退出以免操作失误;
河南城建学院实习报告
3.3数据库设计
3.3.1.用户表
3.3.2.药品信息表
河南城建学院实习报告
3.3.3.
生产厂家信表
3.3.4.供应商信息表
注:以上都是数据库中相关表,通过各个表的属性给对应的表中添加相应的数据,再导入到程序中进行添加,查询,修改,删除,插入等功能。每个表之间建立存储过程以及触发器来进行手动的查询,存储。
河南城建学院实习报告
4.系统实施
4.1
启动界面
4-1.启动页面 启动代码:this.timer1.Interval=100 Public i as Integer
i=1
转入登录页面代码:i=i+1
if i=20 then
do form 登录表单.scx
thisform.release
Endif
河南城建学院实习报告
4.2.登录界面
4-2.登录页面
登录代码:count=count+1
loca for ALLTRIM(用户表.用户名)==alltrim(thisform.combo1.value) IF thisform.text1.Value==""
MESSAGEbox("输入不能为空!")
else
if found()and ALLTRIM(用户表.密码)==alltrim(thisform.text1.value) DO FORM 主界面.scx
release thisform
else
if count<3 then
=messagebox("输入有误!",48,"警告")
else
messagebox("对不起您是非法用户,系统将自动退出!",48,"警告") quit
endif
endif
Endif
河南城建学院实习报告
4.3.主界面界面
4-3.主界面 代码:thisform.windowstate=0 do 主菜单.mpr with this,"T" thisform.release
4.4.信息查询界面 第 10 页 共 11 页
河南城建学院实习报告
4-4.生产厂家信息查询
代码:cz=ALLTRIM(Thisform.Text1.value)
n=RECNO()
GO TOP
SCAN
IF 生产厂家信息表.编号=cz OR 生产厂家信息表.公司全称=cz Thisform.Text1.value=""
Thisform.Text1.SetFocus
Thisform.Refresh
RETURN
ENDIF
ENDSCAN
MESSAGEBOX("该生产厂家信息不存在!",0,"查找失败") GO n
Thisform.Text1.Value=""
Thisform.Text1.SetFocus
Thisform.Refresh
4.5.信息管理界面
河南城建学院实习报告
4-5.供应商信息管理
4.6.打印界面
河南城建学院实习报告
4-6-1.打印界面
代码:
report form 药品信息报表 noco for 通用名=thisform.combo1.value prev report form 供应商信息报表 noco for 全称=thisform.combo2.value prev report form 生产厂家信息报表 noco for 公司全称=thisform.combo3.value
prev
2-6-2.打印界面预览
4.7.系统管理
4.7.1.修改密码界面
河南城建学院实习报告
4-7-1.修改密码
代码:if empty(thisform.text4.value)
mess=messagebox("用户名不能为空!",48,"警告")
else
if empty(thisform.text1.value)
mess=messagebox("旧密码不能为空!",48,"警告")
else
if empty(thisform.text2.value)
mess=messagebox("新密码不能为空!",48,"警告")
else
if empty(thisform.text3.value)
mess=messagebox("重复密码不能为空!",48,"警告") else
if
alltrim(thisform.text2.value)<>alltrim(thisform.text3.value) or
len(alltrim(thisform.text2.value))<>len(alltrim(thisform.text3.value))
mess=messagebox("二次密码不一致!",48,"警告") else
河南城建学院实习报告
locate for alltrim(用户
名)==alltrim(thisform.text4.value) and alltrim(密
码)==alltrim(thisform.text1.value)
if eof()
mess=messagebox("密码错误,系统将取消你的修改权利!",48,"警告")
thisform.release
else
repl 密码 with alltrim(thisform.text3.value) mess=messagebox("密码修改成功!",48,"信息") thisform.release
endif
endif
endif
endif
endif
endif
4.7.2.用户注册界面
河南城建学院实习报告
4-7-2.用户注册
代码:use 用户表 excl
public u1,pw1
u1=allt(thisform.text1.value)
pw1=allt(thisform.text2.value)
if empty(thisform.text1.value)
messagebox ("用户名不能为空!",48+0,"添加新用户")
thisform.text1.setfocus
else
locate for allt(用户名)==u1
if found()
messagebox("该用户名已存在",48+0,"添加新用户")
thisform.text1.setfocus
else
if thisform.text2.value==thisform.text3.value
tempstr=''
for i=1 to len(trim(pw1))
tempchr=bitxor(asc(subs(pw1,i,1)),123)
tempstr=tempstr+chr(tempchr)
endfor
dimension b(1,2)
b[1,1]=u1
b[1,2]=tempstr
append from array b
messagebox("添加成功",48+0,"添加新用户")
release thisform
else
messagebox("两次密码输入不一致,请重新输入",48+0,"添加新用户")
thisform.text3.setfocus
endif
endif
endif
河南城建学院实习报告
4.7.3.注销用户界面
4-7-3.注销用户
代码:USE 用户表.dbf EXCLUSIVE
LOCATE ALL FOR 用户名=ALLTRIM(thisform.Text1.value) IF EOF()
MESSAGEBOX("注销用户不存在!",48,"温馨提示") ELSE
IF thisform.Text1.Value==""
MESSAGEBOX("注销不能为空!",48,"温馨提示")
else
a=messagebox("是否删除?",4+32+0,"温馨提示") if a=6
dele ALL FOR 用户名=ALLTRIM(thisform.Text1.value) pack
messagebox("删除成功!")
河南城建学院实习报告
ENDIF
ENDIF
thisform.Refresh
4.8.关于
4.8.1.帮助界面
2-8-1.帮助
4.8.2.关于界面
河南城建学院实习报告
4-8-2.关于界面
4.9.
退出界面
4-9.退出
代码:quit
以上即为系统实施的主要内容,包括每一功能模块的表单界面、实现功能、表单控件及主要属性、事情相应代码、程序文件等
河南城建学院实习报告
5.设计体会
为了提高我们的实践能力,让我们学以致用,能灵活运用所学的知识进行再创造,学校特安排我们进行为期三周的数据库应用课程设计实习,并安排了指导老师帮助辅导,让我们在规范化、严谨化、实用化上面有了很大进展。
在此次药品管理系统程序开发过程中,有很多东西值得我们思考并总结。 开发过程大体可分为以下几个步骤:
(1)思考总体设计方案:总体结构和模块外部设计,功能分配。思考要实现整个程序大体需要的几个模块和其中用到的代码语言,数据库语言基本操作符、语句等。
(2)画出总体设计方案流程图:用流程图的形式展现我们的基本编程思想。
(3)流程图具体化:即将流程图中的几大模块的具体实现思考清楚,可以用流程图的形式展现.并想好实现的关键代码。
(4)编辑程序代码:这是一个至关重要复杂而且需要反复修改的环节,在此环节中你将发现总体设计和模块思想会存在很多问题,需不断改进.如何实现各函数功能,达到预期效果也将是一项繁复的工作。
(5)代码的调试:在调试过程中会遇到很多需要精化的地方,需要十足的耐心与细心,不断改进完善程序。
(6)最后修饰:程序可以正确运行之后,再不影响程序功能的情况下,运用各种辅助性符号,使界面更加美观漂亮,操作更人性化.增强程序的新意与可行性。
通过这次课程设计,使我们更加熟悉的掌握了数据库语言的运用。帮助我们熟悉了更多数据库语言及其功能,提高了我们的动手能力,学到了许多解决实际问题的宝贵经验.我们每个人都通过课程设计对理论知识的理解进一步加深,也对学科间的相互联系真正做到了学以致用。另一方面对收集资料、查阅文献、方案制定等实践能力也得到了很好的锻炼,促进了我对所学知识的应用能力;同时,发现问题、分析归纳、综合比较的逻辑分析能力、处理问题等能力也得到了很好的提高。也挖掘出了我们潜在的能力,使我们对自己更有自信,对编程也更有兴趣。我相信,只要努力、勤奋、坚持不懈,就没有什么做不到的事,不能还没开始就退缩,要勇于拼搏,敢于创新。
河南城建学院实习报告
6.参考书目
(1)谢维成等编写的《Visual FoxPro 6.0实用教程》 清华大学出版社
(2)李雁翎等编写的《Visual FoxPro应用基础与面向对象程序设计教程》 高等教育出版社
(3)明日科技、周桓、徐微等编写的《Visual FoxPro 数据库系统开发精选案例》 人民邮电出版社
(4)陈林、陈艳华、魏珉等编写的《Visual FoxPro 数据库开发实例精粹》 电子工业出版社
品管实习小结毕业实习是每个大学生必须拥有的一段经历,它使我们在实践中了解社会,让我们学到了很多在课堂上根本就学不到的知识,受益匪浅…
前言品管QC的工業術語是產品品質管制商品管理的簡稱指產品品質控制的行為也指質檢工作崗位或質檢人員品管部是加工企業內的重要部門負責產…
深圳普道电器有限公司品管部实习报告一实习时间20xx年3月13日3月19日二实习人员邓楚明人事部储干三实习内容进料检验成品检验品质…
公司品管实习总结在这近三个月的工作和学习中,接触了不少人和事,在为自己的成长欢欣鼓舞的同时,我也明白自己尚有许多缺点需要改正。工作…
品管员岗位实习小节十月份我分别在在一、二、三、六车间的品管岗位实习了一个星期,感觉收获颇丰:我了解到品管员的主要职责是在车间生产现…
《浙江大学优秀实习总结汇编》药品经营与管理岗位工作实习期总结转眼之间,两个月的实习期即将结束,回顾这两个月的实习工作,感触很深,收…
药品经营与管理专业寒假社会实践个人总结本文个人原创,绝非复制本文包括药品经营与管理专业社会实践目的、实践内容、心得体会三部分,共4…
我实习的单位是省市食品药品监督管理局,该单位是地区综合监督食品、保健品、化妆品安全管理和主管药品监管的直属机构,负责对药品(包括中…
姓名刘焕鑫班级药品经营与管理1201学号1610120xx5指导教师张丽媛赵静赵璇时间20xx916927教室化工医药实训楼414…
河北化工医药职业技术学院系别班级姓名学号实习单位实习时间指导老师成绩实习报告书经管系药品经验与管理30902郭耀34中天医药有限公…
今年暑假我到永新县人民医院的药房实习了两星期,了解了医院的大概部门,有门诊部,药房,注射室,还有B超室,放射室等。门诊又有分眼科,…