1、医院候诊管理系统【附录一】源代 码#in elude#defi ne Max 1000000oom); oom)case 1:ren shu0+;coutvtvvnt请到第1急诊室! nnt;break;case 2:ren shu1+;coutvtvnt请到第2急诊室! nnt;break;case 3:ren shu2+;coutvtvnt请到第3急诊室! nnt;break;case 4:ren shu3+;coutvtvnt请到第4急诊室! nnt;break;case 5:ren shu4+;coutvtvnt请到第5急诊室! nnt;break;+;乙 是);system(paus
2、e);return 1;ame的收入为:Ji.money ;cout n t=n t; system(pause);return(1);Ji.+Ji.+Ji.;for(i=0; i5; i+)cout vvtvvji. namevvtvvji.vvt Ji.vvtvJi.vvt vJi.vvt sumi;coutnn;coutvv=nt;system(pause);return(1);Ji.name的就诊人数为:renshui;cout n t=n t; system(pause);return(1);.nn;system(pause);return 1;elsechar date8;int
3、flag=1;while(flag=1)clear();memset(str_1,0,size of(str_1);memset(str_2,0,size of(str_2);cout = =n;cout nt 注意:预 约挂号只能预约七天以内nn date; strcpy(Pl.time, datfor(i nt j=0,r=0; jstrle n(date); nn;j+)system(pause);break;ssca nf(str_2,%d,&m);oom)case1:ren shu0+;break;case2:ren shu1+; break;case3:ren shu2+; bre
4、ak;case4:ren shu3+; break;case5:ren shu4+; break;QL.zp=PI-1.zp;QL.age=Pl-1.age; strcpy(QL.jz,Pl-1.jz);strcpy(QL. num,Pl-1. nu m);QL.room=Pl-1.room;QL.sex=Pl-1.sex;strcpy(QL.time, Pl-1.time);L+; system(pause); return 1;ame,内科);ame,外科);strcpy(J4. name, for(i=0; i5; i+)Ji.m oney = 0;Ji.=0;Ji.=0;Ji.=0;G
5、hsr = 0;for(i=0; im; i+)if(Pi.zp=Y)Ghs r+=10,JPi.room-1.mo ney+=10; p =N) Ghs r+=5,JPi.room-1.mo ney+=5; ge=14)oom- 1.+;else if (Pi.age =25)JPi.room-1.+;else if(Pi.age =55)JPi.room-1.+;else JPi.room-1.+;couttt2.couttt3.couttt4.外科;骨科nn;皮肤科;coutt5.couttr.口腔科返回!;cout nnt=n;cout room1; 2. 女):;cin sex1;i
6、f (strle n( sex1)=1) sex2=sex10;while(age2150) 新填写!tt2. 信息正确!;cout cls;if (strle n( cls)=1)cls1=tolower(cls0); ge =age2;Pl.room=room2;strcpy(Pl. num,temp1);Pl.sex=sex2-O;Pl.zp=zp2;I+;return 0; 当日号t2.预约挂号t3.挂急诊号t4.挂号向导n;cout ntttr. 返 回!tq. 退 岀!n;cout nt=n;coutt 请输编号(1,2,3,4,r,q):;cintemp; 有名单t2.内科名单t
7、3.夕卜科名单n;cout t4. 骨科名单t5.皮肤科名单t6. 口腔科名单n;cout t7. 预约名单;cout tr. 返回! n;cout nt=nn;cout temp;if (strle n(temp)=1 ) n=tolower(temp0);oom != 0)cout tPi. numtvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve ndl; break;case 2:oom = 1)cout tPi.num tvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve ndl;break;case 3:oom=
8、2)cout tPi. numtvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve ndl;break;case 4:oom=3)cout tPi. num tvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve ndl;break;case 5:oom=4)cout tPi. numtvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve ndl;break;case 6:oom=5)cout tPi. numtvvPi.sexvvtvvPi.roomvvtvPi.jzvvtvvPi.zpvve
9、ndl;break;case 7:oom != O)cout tQi. num tvvQi.sexvvtvvQi.roomvtvvQi.jzvv tQi.zp tQi.timee ndl;break;cout nt=nn;cout n t;system(pause); 看挂号情况t2.各科就诊人数t3.患者年龄段t4.挂号收入情况nnt5.打印病人名单;cout tr. 返 回!tq. 退 岀!n;cout nt=n;coutnt 请输入编号(1,2,3,4,5,6,r,q):;cintemp; 号功能t2.统计功能t3.查找与退挂tq.退岀n;cout nnt=n;cout temp; xt
10、, wb);fp1 = fopen( 患者名单.txt, wb); xt, wb);fp4 = fopen( 挂号人数.txt, wb);xt, wb);fp6 = fopen( 各科人数.txt, wb);fprintf(fp2, %ldn%ldn, I, L); . i * /NUM %r;xt, rb);fp1 = fopen( 患者名单.txt, rb); xt, rb);fp4 = fopen( 挂号人数.txt, rb);xt, rb);fp6 = fopen( 各科人数.txt, rb);fscanf(fp2, %ld%ld, &I, &L); . i * /NUM %r;oom
11、&age2=Pj.age)if(flag=1)clear();cout nttt 系统查找到以下信息: n;cout nt=n;cout t 患者编号t 性别t 科室t 急诊t 专家门诊n;flag=0;cout tvP|j.num tPj.sexvvtvvPj.roomvvtvvPj.jzvvtvvPj.zpvve ndl;char ch=0,temp110=;docout nnntt 以上是否有您的信息 :;cin temp1;ch=tolower(temp10);while(ch!=y&ch!= n);switch(ch)case y:char temp10;long i=-1;whil
12、e(i = 0) um tPi-1.sextPi-1.roomvvtvPi-1.jzvvtvvPi-1.zpvve ndl;break;case n:cout nnt 建议您到服务窗口去查找 !nnnt;break;system(pause); . i * /50 %r;clear();cout nt=n;cout t 患者编号t 性别t 科室t 急诊t 专家门诊n;cout tPn-1.num tPn-1.sextPn-1.roomvtvP n-1.jzvtvP n-1.zpnnt;system(pause); 诊号查找t2.模糊查找t3.退订号t4.清除数据nn;cout tr. 返 回!
13、tq. 退 岀!n;cout nt=n; cout temp; oom)case 1:ren shuO_;break;case 2:ren shu1-;break;case 3:ren shu2-;break;case 4:ren shu3_;break;case 5:ren shu4_;break;ge = O;Pi-1.zp = 0;Pi-1.room = 0;strcpy(Pi-1. num, 0);ime ,) != 0)Jelse if(strcmp( Pi-1.jz , 是)=0)JelseJclear();cout nnntt 单号已经退订成功 !nt;system(pause)
14、;return 1;oom)case 1:ren shuO_;break;case 2:ren shu1-;break;case 3:ren shu2-;break;case 4:ren shu3_;break;case 5:ren shu4_;break;ge = O;Pi-1.zp = 0;Pi-1.room = 0;strcpy(Pi-1. num, 0);ime ,) != 0)Jelse if(strcmp( Pi-1.jz , 是)=0)JelseJclear();cout nnntt 单号已经退订成功 !nn;system(pause);return 1;xt, wb);fp1
15、= fope n(”患者名单.txt, wb); xt, wb);fp4 = fope n(”挂号人数.txt, wb);fp6 = fopen (”各科人数.txt, wb);remove(”全局变量.txt);remove(”患者名单.txt);remove(”预约名单.txt);remove(”挂号人数.txt);remove(各科人数.txt);fclose(fp4);fclose(fp3);fclose(fp1);fclose(fp2);fclose(fp6);system(cls);cout nnntt本地数据已经全部清除exit(1);!nn;else / 选择了否return
16、1;#i nclude/ 主函数 int mai n()system(color 3F);hospital hp; / 定义一个对象();return 0;#ifndef HOSPITAL_H_INCLUDED#defi ne HOSPITAL_H_INCLUDED#in elude #in clude #in clude #in clude #in clude #in clude #in clude class hospital / 定义医院类public :int delete_file(); /删除本地文件int delete1(); /重载删除函数int delete1(l ong i
17、);/删除函数int cz_me nu(); /查找删除函数菜单int serch(i nt i); /重载serch函数实现两种不冋查找方式int serch(); /查找删除函数void f_write(); /写文件函数,用于在程序关闭之前保存数据到本地void f_read(); /读文件函数,用于在程序打开之前读取数据要程序中int in put(); /输入函数void men u(); /主菜单函数void tj(); /统计功能函数int gh_me nu(); /挂号功能选择菜单int tj_me nu(); /统计功能选择菜单函数int gjzh(); /挂急诊号int yygh(); /预约挂号函数int ghxd(); /挂号向导函数int ghrs(); /挂号情况统计函数int jzrs(); /各科就诊人数统计函数int nlb(); /年龄人数统计函数int ghsr(); /挂号收入情况int gdrh(); /挂当日号函数int show(); /展示病人名单void room(char room);/ 分诊室函数;#en dif / HOSPITAL_H_INCLUDED
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1