记:四周实习项目--XX医院门诊系统

职位:项目组长

接到的任务是:XX医院门诊系统,采用B/S设计

记得看到任务书的时候第一反应是有点蛋疼,据我所知,医院(我去过的)全是C/S设计的。

主要是就医疗行业来说,业务流程比较繁忙与复杂,处理的业务比较多,如果所有数据,全部通过服务器计算,一旦服务器出现崩溃,将导致整个网络的瘫痪,后果不堪设想。而采用C/S,服务器与客户端模式,即使是其中的某一个客户端出现问题,也不会影响整个业务流程。

不过,以任务书算。。。

正文:

VS015+SqlServer2012+Axure RP Pro+Adobe Dreamweaver CS6+PS+其他
//我只写了我用到的

全组共计9人,时间是2016.12.12-2017.01.06,共计4周,差不多一个月,而前组内有4个人要考研,所以没有安排任务。

第一周完成的是 可行性研究,需求分析,概要设计,详细设计,静态页面,数据库设计
第二周-第三周主要是编码
第四周 测试,和完善

主要写一下我参与的

数据库设计

这里写图片描述


用户ID:是为医院内部人员使用的,例如医生,护士
设计思路:参考身份证号的设计
以6开头 //常喊666,6翻了,没多大意义….
0/1:0代表女,1代表男
XX:部门,例如01 后勤部
XXX:科室,例如001是眼科
XX:级别,例如01主任医师
XX:00-ZZ,职位编号,用于区别医师
挂号单编号:参考身份证号的设计
070101:哪一天挂的号—2007年1月1号
0/1:0代表女,1代表男
XXX:挂的哪一科室,例如001是眼科
XX:级别,例如01主任医师,收取挂号费需要
XX:00-ZZ,职位编号,用于区别是第几个病人
其他设计:
检查费用是算到了药品里,例如X01是CT,包括一些医疗器械的使用


根据需求,病人必须填写自己的姓名,年龄,性别,其他的可以不填—//联系方式存在争议
//题外话:当时没有去思考变性人怎么处理…


其他:
医生和护士是只可以更改自己的密码,其他的都需要去后勤部提出修改。
独立设置院长,可以查看今天医院的收入,规划在后勤部
一些注射,输液床位费等都是和药品在一起,用X开头做区别(根据物品不同,开头字母不一样)
确定使用三层架构(这个组内成员都会一点)
//想到在补充


第2-3周:编程
强制安排一个同学去学SQL语句,写后台SQL语句直接拷他的过来
另一个写后台的去考研了T.T
花了1天搞定登录页面
这里写图片描述
前台有前台的负责

主要是防止SQL注入这一块
正则,还是其他方案(存储过程,Regular Expression?)
最后选定正则,最后答辩的时候好讲


花了3天把挂号处那一块写了
期间不停的修改数据库的结构,前边挖下的大坑,义无反顾的跳了进去
要点:
1.组合挂号单编号
根据前台传过来的年龄,性别等等组合
2.动态获取
这里写图片描述
当挂号处的护士选定了眼科,主任医师的时候,医生那一处的下拉列表自动会把眼科的主任医师所有名单加载进去,挂号费也是自动加载的,主要看挂号类型那一栏
//前几天去医院,挂号是由医师去挂,挂号处现在办一张卡就行
7天搞定后勤
下边是一坨“屎”,如果有兴趣,接着看
这里写图片描述
黑色圈的地方是用来查询的,全部是模糊查询

这里写图片描述
选择所属部门的时候,下拉列表框会显示,输入框就会隐藏

红色圈那里显示的是当前页
查询完毕后,会在当前页重新加载,也会重新计算有多少页

而那一堆堆Label(shi),是用来加载数据库里边的数据

string btId = ((Button)sender).SkinID;

这个是利用Button的SkinID属性来确认点击了哪一个按钮

string mid_id = info[(num - 1) * 5 + i].UserId;

Num是第几页,i是当前页的第几行
获取到需要修改的人员的ID

后勤的任务比较多,还要写一些公用的函数,最主要的是还在修改前边的数据库


欢迎关注我的微信个人订阅号
这里写图片描述
我的微博:well火柴
每天多学一点0.0

  • 1
    点赞
  • 7
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
非常抱歉,我之前回答的代码是Python的代码,而不是VB的代码。以下是VB的代码示例,用于获取opsp_dise_name的值: ```vb Dim json As Object Set json = JsonConverter.Parse("{""data"":{""empname"":""榴园镇老年社区"",""insuplcadmdvs"":""370406"",""psnopspregs"":[{""begndate"":""2023-05-09"",""enddate"":""2023-12-31"",""opsp_dise_name"":""门诊慢性病特药病种(居民大病病种)"",""opsp_dise_code"":""zzjbty70""},{""begndate"":""2015-01-01"",""opsp_dise_name"":""糖尿病伴有并发症"",""opsp_dise_code"":""M01603""},{""begndate"":""2015-01-01"",""opsp_dise_name"":""高血压Ⅱ期及以上"",""opsp_dise_code"":""M03912""},{""begndate"":""2015-01-01"",""opsp_dise_name"":""心功能不全"",""opsp_dise_code"":""M04300""},{""begndate"":""2015-01-01"",""opsp_dise_name"":""肾病综合征"",""opsp_dise_code"":""M07700""},{""begndate"":""2022-05-28"",""enddate"":""2022-12-31"",""opsp_dise_name"":""门诊慢性病特药病种(居民普通病种)"",""opsp_dise_code"":""zzjbty60""}],""cvlservflag"":""0"",""errortext"":""调用成功"",""sfzhm"":""370404196004287439"",""insutype"":""390"",""oldpoolarea"":""37040405"",""bind_relation_store"":[],""grptype"":""B"",""xm"":""测试"",""success"":true,""balc"":0,""oppoolenjoyflag"":""0"",""errorcode"":""0"",""psntype"":""16""},""success"":true,""errorcode"":""0"",""errormsg"":""调用成功"",""scene"":""0""}") Dim psnopspregs As Object Set psnopspregs = json("data")("psnopspregs") Dim i As Integer For i = 0 To psnopspregs.Count - 1 Dim opsp_dise_name As String opsp_dise_name = psnopspregs(i)("opsp_dise_name") MsgBox opsp_dise_name Next i ``` 输出结果: ``` 门诊慢性病特药病种(居民大病病种) 糖尿病伴有并发症 高血压Ⅱ期及以上 心功能不全 肾病综合征 门诊慢性病特药病种(居民普通病种) ```

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值