優(yōu)秀畢業(yè)設(shè)計(jì)]C語(yǔ)言課程設(shè)計(jì)報(bào)告 醫(yī)院專家門診掛號(hào)系統(tǒng)

1、計(jì)算機(jī)0710班 XXX 學(xué)號(hào)：XXX華中科技大學(xué)計(jì)算機(jī)科學(xué)與技術(shù)學(xué)院C語(yǔ)言程序設(shè)計(jì)課程設(shè)計(jì)實(shí)驗(yàn)報(bào)告題目： 醫(yī)院專家門診掛號(hào)系統(tǒng) 專業(yè)： 計(jì)算機(jī)科學(xué)與技術(shù) 班級(jí)： 計(jì)算機(jī)XXX班 學(xué)號(hào)： XXXX 姓名： XXX 成績(jī)： 指導(dǎo)教師： XXX 完成日期： 20XX年 10月 10日一、 系統(tǒng)功能模塊圖主菜單數(shù)據(jù)管理保存和讀取統(tǒng)計(jì)查詢刪除修改錄入各項(xiàng)信息統(tǒng)計(jì)科室、專家、掛號(hào)信息查詢打印報(bào)表支持多關(guān)鍵字的搜索引擎退出添加二、 數(shù)據(jù)結(jié)構(gòu)設(shè)計(jì)及用法說明主要的三個(gè)結(jié)構(gòu)（采用了十字交叉鏈表）：科室信息的結(jié)構(gòu)、專家信息的結(jié)構(gòu)及掛號(hào)信息的結(jié)構(gòu)。分別如下：/*科室信息*/struct Troom char num

2、11;/*保存科室號(hào)*/ char name20;/*保存科室名*/ char man20;/*保存負(fù)責(zé)人*/ char tel12;/*保存電話*/int tot_reg;/*保存科室的總掛號(hào)量*/ struct Troom *next;/*保存指向下一個(gè)科室信息的指針*/ struct Tpro *sub;/*保存指向?qū)＜倚畔⒌念^指針*/;/*掛號(hào)信息結(jié)構(gòu)體*/struct Treg char pro_num11;/*保存專家編號(hào)*/ char case_num15;/*保存病歷號(hào)*/ char patient_name20;/*保存患者姓名*/ char date11;/*保存掛號(hào)日期*

3、/ char assistant20;/*保存掛號(hào)人員*/ intserial_num;/*保存掛號(hào)流水號(hào)*/ float fee;/*保存掛號(hào)費(fèi)*/ struct Treg *next;/*保存指向下一個(gè)掛號(hào)信息的指針*/;/*專家信息結(jié)構(gòu)體*/struct Tpro char room_num11;/*保存科室號(hào)*/ char num11;/*保存專家編號(hào)*/ char name20;/*保存姓名*/ char birth11;/*保存出生日期*/ char sex;/*保存性別*/ char tel12;/*保存電話*/ char profession15;/*保存職稱*/ char s

4、ummary50;/*保存簡(jiǎn)介*/int tot_reg;/*保存專家的總掛號(hào)量*/ struct Tpro *next;/*保存指向下一個(gè)專家信息的指針*/ struct Treg *sub;/*保存指向掛號(hào)信息的頭指針*/;用法說明圖示如下： head科室1科室2科室nNULL 專家1基本信息 專家2基本信息專家n基本信息專家1掛號(hào)記錄鏈 專家2掛號(hào)記錄鏈 專家n掛號(hào)記錄鏈 三、 程序結(jié)構(gòu)流程圖系統(tǒng)總體流程圖：開始主菜單錄入信息修改信息插入信息刪除信息保存文件讀取文件查詢信息統(tǒng)計(jì)數(shù)據(jù)打印報(bào)表退出系統(tǒng)科室信息專家信息掛號(hào)信息讀入關(guān)鍵字多關(guān)鍵字搜索結(jié)束查詢流程圖：查詢信息輸入關(guān)鍵字從信息總體中

5、提取含有關(guān)鍵字的信息輸出信息四、 各模塊功能數(shù)據(jù)管理模塊中包含錄入信息、修改信息、插入信息和刪除信息四大功能：1、 錄入信息：錄入科室、專家、掛號(hào)信息；2、 修改信息：對(duì)科室、專家、掛號(hào)信息進(jìn)行修改；3、 添加信息：添加科室或?qū)＜遥?、 刪除信息：取消科室或解雇專家。統(tǒng)計(jì)查詢模塊中包含查詢信息和統(tǒng)計(jì)數(shù)據(jù)1、 查詢信息：可查詢所有科室、專家和掛號(hào)信息，還可以查詢某個(gè)特定的信息，使用多關(guān)鍵字匹配和KMP字符串匹配技術(shù)；2、 統(tǒng)計(jì)數(shù)據(jù)：有3種統(tǒng)計(jì)的信息可供查看：（1） 各科室的掛號(hào)量；（2） 各專家的掛號(hào)量；（3） 某天掛號(hào)的患者的基本信息。保存和讀取模塊：保存文件和讀取文件；退出程序：退出醫(yī)院專家

6、門診掛號(hào)系統(tǒng)。各功能函數(shù)的相關(guān)說明見附錄中的源程序清單。五、 試驗(yàn)結(jié)果整個(gè)程序運(yùn)行起來(lái)很正常，沒有出現(xiàn)bug，我這就把輸出結(jié)果的截屏貼在下面：科室基本信息（部分）：專家基本信息（部分）：掛號(hào)基本信息（部分）：統(tǒng)計(jì)信息均準(zhǔn)確無(wú)誤：各科室的掛號(hào)量：各專家的掛號(hào)量：某天掛號(hào)的基本信息：六、 心得體會(huì)第一次寫管理系統(tǒng)這樣的大型程序，說真的，有點(diǎn)不習(xí)慣，以前的一些代碼風(fēng)格成了我這次課設(shè)的最大障礙。比如說，以前寫小程序因?yàn)橥ǔＶ挥幸粋€(gè)主函數(shù)，所以很多變量都是局部變量，而這次大型作業(yè)要求有很多的函數(shù)相互交叉，共同完成一些功能，所以必須要用全局變量。還有我的編程風(fēng)格無(wú)意義的變量名使我吃了很多苦頭，很多時(shí)候，我

7、的變量名都混淆了，以至于我最后改的時(shí)候很麻煩。這次課設(shè)，讓我學(xué)了很多東西，除了代碼風(fēng)格和編程習(xí)慣的優(yōu)化之外，我的代碼能力也明顯提高了。經(jīng)過這次課設(shè)，我一些以前沒有徹底掌握的東西都牢牢掌握了。比如指針的靈活運(yùn)用，函數(shù)之間的互相調(diào)用的代碼級(jí)優(yōu)化等等。盡管我學(xué)到了很多東西，但是對(duì)于這次大型作業(yè)我還是有一點(diǎn)遺憾，那就是代碼的重復(fù)利用率不高，很多幾乎一樣的代碼在我的程序中出現(xiàn)了多次（畢竟是一個(gè)上午寫出來(lái)的東西，這也不能怪我）。本來(lái)我有心想優(yōu)化一下，使重復(fù)利用率提高，但是由于ACM/ICPC將近，我全部時(shí)間都用在訓(xùn)練上，所以就算了。希望不會(huì)對(duì)我的課設(shè)的評(píng)價(jià)造成太大的影響。路漫漫其修遠(yuǎn)兮，吾將上下而求索。程

8、序設(shè)計(jì)這條路還很長(zhǎng)，我會(huì)繼續(xù)走下去，不斷自我完善，早日成為一個(gè)出色的程序員。七、 參考文獻(xiàn)所有資料均從百度而來(lái)附錄：程序清單/*/* 醫(yī)院門診掛號(hào)系統(tǒng)V1.01源代碼 */* Copyright by XXX */*/#include <stdio.h>#include <string.h>#include <stdlib.h>#define Troom_len sizeof(struct Troom)#define Tpro_len sizeof(struct Tpro)#define Treg_len sizeof(struct Treg)#define

9、 TLroom_len sizeof(struct TLroom)#define TLpro_len sizeof(struct TLpro)#define TLreg_len sizeof(struct TLreg)#define Room_in_mes puts("nt科室信息錄入中.")#define Spe_in_mes puts("nt專家信息錄入中.")#define Reg_in_mes puts("nt掛號(hào)信息錄入中.")/*掛號(hào)信息結(jié)構(gòu)體*/struct Treg char pro_num11;/*保存專家編號(hào)*/

10、char case_num15;/*保存病歷號(hào)*/ char patient_name20;/*保存患者姓名*/ char date11;/*保存掛號(hào)日期*/ char assistant20;/*保存掛號(hào)人員*/ intserial_num;/*保存掛號(hào)流水號(hào)*/ float fee;/*保存掛號(hào)費(fèi)*/ struct Treg *next;/*保存指向第一個(gè)專家信息的指針*/;/*專家信息結(jié)構(gòu)體*/struct Tpro char room_num11;/*保存科室號(hào)*/ char num11;/*保存專家編號(hào)*/ char name20;/*保存姓名*/ char birth11;/*保存

11、出生日期*/ char sex;/*保存性別*/ char tel12;/*保存電話*/ char profession15;/*保存職稱*/ char summary50;/*保存簡(jiǎn)介*/int tot_reg;/*保存專家的總掛號(hào)量*/ struct Tpro *next;/*保存指向下一個(gè)專家信息的指針*/ struct Treg *sub;/*保存指向第一個(gè)掛號(hào)信息的指針*/;/*科室信息*/struct Troom char num11;/*保存科室號(hào)*/ char name20;/*保存科室名*/ char man20;/*保存負(fù)責(zé)人*/ char tel12;/*保存電話*/in

12、t tot_reg;/*保存科室的總掛號(hào)量*/ struct Troom *next;/*保存指向下一個(gè)掛號(hào)信息的指針*/ struct Tpro *sub;/*保存指向第一個(gè)專家信息的指針*/;/*輔助變量*/struct TLroomstruct Troom *st;struct TLroom *next;*storep, *pp;struct TLprostruct Tpro *st;struct TLpro *next;*storeq, *qq;struct TLregstruct Treg *st;struct TLreg *next;*storer, *rr;struct Troo

13、m *p, *pl, *tempp, *head=NULL;struct Tpro *q, *ql, *tempq;struct Treg *r, *rl, *tempr;char rest20, ret5;int n;int flag, changed;void Main_menu();void Show_menu();void Write();void Save();void Load();void Modify();void Insert();void Delete();void Search();void Statistics();void Print();void Exit();vo

14、id Search_room();void Search_room_with_num(char *);void Search_room_with_name(char *);void Search_room_with_man(char *);void Search_room_with_tel(char *);void Search_pro();void Search_pro_with_num(char *);void Search_pro_with_name(char *);void Search_pro_with_tel(char *);void Search_reg();void Searc

15、h_reg_with_serial_num(int);void Search_reg_with_case_num(char *);void Sort_room();void Sort_pro();void Show_room();void Show_room_with_reg();void Show_pro();void Show_pro_with_reg();void Show_reg();void Print_room();void Print_pro();void Print_reg();char *Tostring(int);void PrnN();void PrnB();void P

16、rnM();void ClearAll();void Clearp();void Clearq();void Clearr();void cls();/*/* 主菜單 */*/void Main_menu() char command; do do Show_menu();command=getchar(); gets(rest);cls(); if (command<'0' | command>'9') puts("n無(wú)此選項(xiàng)！請(qǐng)重新選擇");printf("按ENTER以繼續(xù).");gets(rest);c

17、ls(); while (command<'0' | command>'9');switch (command) case '1':Write();break;case '2':Save();break; case '3':Load();break; case '4':Modify();break; case '5':Insert();break; case '6':Delete();break; case '7':Search();bre

18、ak; case '8':Statistics();break;case '9':Print();break; case '0':Exit(); while (command!='0');void Show_menu() puts("歡迎進(jìn)入醫(yī)院門診掛號(hào)系統(tǒng)！"); puts("n請(qǐng)選擇：n"); puts("t1: 錄入數(shù)據(jù)n"); puts("t2: 保存文件n"); puts("t3: 載入文件n"); puts("

19、t4: 修改數(shù)據(jù)n"); puts("t5: 插入數(shù)據(jù)n"); puts("t6: 刪除數(shù)據(jù)n"); puts("t7: 查詢信息n"); puts("t8: 統(tǒng)計(jì)數(shù)據(jù)n"); puts("t9: 輸出報(bào)表n");puts("t0: 退出系統(tǒng)n");/*/* 錄入信息 */*/void Write() char command0, command1, command2;char command;if (changed) puts("n錄入將覆蓋原有信息，您

20、尚未保存，是否保存？Y/N?");command=getchar();gets(rest);cls();if (command='Y' | command='y') Save();head=NULL; do p=(struct Troom *)malloc(Troom_len);Room_in_mes;puts("n請(qǐng)輸入科室號(hào)");gets(p->num);cls();Room_in_mes;puts("n請(qǐng)輸入科室名");gets(p->name);cls();Room_in_mes;puts(&

21、quot;n請(qǐng)輸入負(fù)責(zé)人姓名");gets(p->man);cls();Room_in_mes;puts("n請(qǐng)輸入電話");gets(p->tel);cls();p->sub=NULL;p->tot_reg=0;p->next=head;head=p;puts("n是否錄入此科室的專家信息？Y/N?");command1=getchar();gets(rest);cls();while (command1='Y' | command1='y') q=(struct Tpro *)m

22、alloc(Tpro_len);strcpy(q->room_num, p->num);Spe_in_mes;puts("n請(qǐng)輸入專家編號(hào)"); gets(q->num);cls();Spe_in_mes; puts("n請(qǐng)輸入姓名");gets(q->name);cls();Spe_in_mes;puts("n請(qǐng)輸入出生日期，例：XXXX/XX/XX");gets(q->birth);cls();Spe_in_mes;puts("n請(qǐng)輸入性別，M for MAN, W for WOMAN&qu

23、ot;);q->sex=getchar();gets(rest);cls();Spe_in_mes;puts("n請(qǐng)輸入電話");gets(q->tel);cls();Spe_in_mes;puts("n請(qǐng)輸入職稱");gets(q->profession);cls();Spe_in_mes;puts("n請(qǐng)輸入簡(jiǎn)介");gets(q->summary);cls();q->sub=NULL;q->tot_reg=0;q->next=p->sub;p->sub=q;puts(&quo

24、t;n是否錄入此專家的掛號(hào)信息？Y/N?");command2=getchar();gets(rest);cls();while (command2='Y' | command2='y') q->tot_reg+;r=(struct Treg *)malloc(sizeof(struct Treg);strcpy(r->pro_num, q->num);Reg_in_mes;puts("n請(qǐng)輸入掛號(hào)流水號(hào)");scanf("%d", &r->serial_num);gets(res

25、t);cls();Reg_in_mes;puts("n請(qǐng)輸入病歷號(hào)");gets(r->case_num);cls();Reg_in_mes;puts("n請(qǐng)輸入患者姓名");gets(r->patient_name);cls();Reg_in_mes;puts("n請(qǐng)輸入掛號(hào)費(fèi)（元）");scanf("%f", &r->fee);gets(rest);cls();Reg_in_mes;puts("n請(qǐng)輸入掛號(hào)時(shí)間，例：XXXX/XX/XX");gets(r->d

26、ate);cls();Reg_in_mes;puts("n請(qǐng)輸入掛號(hào)人員");gets(r->assistant);cls();r->next=q->sub;q->sub=r;puts("n是否錄入下一個(gè)掛號(hào)信息？Y/N?");command2=getchar();gets(rest);cls();p->tot_reg+=q->tot_reg;puts("n是否錄入下一個(gè)專家信息？Y/N?");command1=getchar();gets(rest);cls();puts("n是否錄入下

27、一個(gè)科室信息？Y/N?");command0=getchar();gets(rest);cls(); while (command0='Y' | command0='y'); puts("n錄入成功！"); printf("按ENTER以繼續(xù)."); gets(rest);cls();changed=1;/*/* 保存文件 */*/void Save() FILE *fp, *fq, *fr; char file120, file220, file320; do puts("nt正在創(chuàng)建科室數(shù)據(jù)文件.&

28、quot;);puts("n請(qǐng)輸入文件名：");gets(file1);cls();if (fp=fopen(file1, "wb")=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls(); while (fp=NULL); do puts("nt正在創(chuàng)建專家數(shù)據(jù)文件.");puts("n請(qǐng)輸入文件名：");gets(file2);cls();if (fq=fopen(file2, "wb"

29、;)=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls(); while (fq=NULL); do puts("nt正在創(chuàng)建掛號(hào)數(shù)據(jù)文件.");puts("n請(qǐng)輸入文件名：");gets(file3);cls();if (fr=fopen(file3, "wb")=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls();

30、while (fr=NULL);for (p=head; p; p=p->next) fwrite(p, Troom_len, 1, fp);for (q=p->sub; q; q=q->next) fwrite(q, Tpro_len, 1, fq);for (r=q->sub; r; r=r->next)fwrite(r, Treg_len, 1, fr); puts("n保存成功！"); printf("按ENTER以繼續(xù)."); gets(rest);cls();changed=0; fclose(fp); fclo

31、se(fq); fclose(fr);/*/* 讀取文件 */*/void Load() FILE *fp, *fq, *fr; int t; char file120, file220, file320; if (changed) char command;puts("n您尚未保存，是否保存？Y/N?");command=getchar();gets(rest);cls();if (command='Y' | command='y') Save(); ClearAll(); t=0; do puts("n正在載入科室數(shù)據(jù)文件.&q

32、uot;);t+;puts("n請(qǐng)輸入文件名：");gets(file1);cls();if (fp=fopen(file1, "rb")=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls();if (t>3) puts("n讀取失敗，返回主菜單");printf("按ENTER以繼續(xù).");gets(rest);cls();return; while (fp=NULL); t=0; do puts(&

33、quot;n正在載入專家數(shù)據(jù)文件");puts("n請(qǐng)輸入文件名：");gets(file2);cls();if (fq=fopen(file2, "rb")=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls();if (t>3) puts("n讀取失敗，返回主菜單");printf("按ENTER以繼續(xù).");gets(rest);cls();return; while (fq=NULL);

34、 t=0; do puts("n正在載入掛號(hào)數(shù)據(jù)文件");puts("n請(qǐng)輸入文件名：");gets(file3);cls();if (fr=fopen(file3, "rb")=NULL) puts("n文件不能打開！");printf("按ENTER以繼續(xù).");gets(rest);cls();if (t>3) puts("n讀取失敗，返回主菜單");printf("按ENTER以繼續(xù).");gets(rest);cls();return; w

35、hile (fr=NULL); head=NULL; while (!feof(fp) p=(struct Troom *)malloc(Troom_len);fread(p, Troom_len, 1, fp);p->sub=NULL;if (!feof(fp) p->next=head;head=p; while (!feof(fq) q=(struct Tpro *)malloc(Tpro_len);fread(q, Tpro_len, 1, fq);q->sub=NULL;Search_room_with_num(q->room_num);if (!feof(f

36、q) && p) q->next=p->sub;p->sub=q; while (!feof(fr) r=(struct Treg *)malloc(Treg_len);fread(r, Treg_len, 1, fr);for (p=head; p; p=p->next) Search_pro_with_num(r->pro_num);if (q) break;if (!feof(fr) && q) r->next=q->sub;q->sub=r; puts("n載入成功！"); printf

37、("按ENTER以繼續(xù)."); gets(rest);cls();changed=0; fclose(fp); fclose(fq); fclose(fr);/*/* 修改信息 */*/void Modify()char command1, command2;int flag2;int t;while (1) t=0;do puts("n請(qǐng)選擇您想修改的信息：n");puts("t1: 科室信息n");puts("t2: 專家信息n");puts("t3: 掛號(hào)信息n");printf(&quo

38、t;t"); PrnM(); puts("n");command1=getchar();gets(rest);cls();if (command1<'1' | command1>'3') && command1!='M' && command1!='m') puts("n無(wú)此選項(xiàng)！請(qǐng)重新選擇");printf("按ENTER以繼續(xù).");gets(rest);cls(); while (command1<'

39、;1' | command1>'3') && command1!='M' && command1!='m'); switch (command1) case '1':printf("n請(qǐng)?zhí)峁┛剖业南嚓P(guān)信息，");flag=0;Search_room();if (flag) continue;if (p) t=0;flag2=0;while (1) do puts("n請(qǐng)選擇您想修改的信息：n");puts("t1: 科室號(hào)n"

40、);puts("t2: 科室名n");puts("t3: 負(fù)責(zé)人n");puts("t4: 電話n");printf("t"); PrnB(); puts("n");command2=getchar();gets(rest);cls();if (command2<'1' | command2>'4') && command2!='B' && command2!='b') puts(&quo

41、t;n無(wú)此選項(xiàng)！請(qǐng)重新選擇");printf("按ENTER以繼續(xù).");gets(rest);cls(); while (command2<'1' | command2>'4') && command2!='B' && command2!='b');switch (command2) case '1':puts("n請(qǐng)輸入新的科室號(hào)");gets(p->num);cls();for (q=p->sub; q;

42、 q=q->next) strcpy(q->room_num, p->num);break;case '2':puts("n請(qǐng)輸入新的科室名");gets(p->name);cls();break;case '3':puts("n請(qǐng)輸入新的負(fù)責(zé)人姓名");gets(p->man);cls();break;case '4':puts("n請(qǐng)輸入新的電話");gets(p->tel);cls();break;case 'B':case &#

43、39;b':flag2=1;if (flag2) break;puts("n修改成功！");printf("按ENTER以繼續(xù).");gets(rest);cls();changed=1; else puts("n錯(cuò)誤！科室不存在");t+;if (t=5) puts("錯(cuò)誤太多！返回主菜單");printf("按ENTER以繼續(xù).");gets(rest);cls();return;printf("按ENTER以繼續(xù).");gets(rest);cls();cont

44、inue;break;case '2':printf("n請(qǐng)?zhí)峁＜宜诳剖业南嚓P(guān)信息，");flag=0;Search_room();if (flag) continue;if (p) printf("n請(qǐng)?zhí)峁＜业南嚓P(guān)信息，");flag=0;Search_pro();if (flag) continue;if (q) t=0;flag2=0;while (1) do puts("n請(qǐng)選擇您想修改的信息：n");puts("t1: 專家編號(hào)n");puts("t2: 姓名n"

45、);puts("t3: 出生日期n");puts("t4: 性別n");puts("t5: 電話n");puts("t6: 職稱n");puts("t7: 簡(jiǎn)介n");printf("t"); PrnB(); puts("n");command2=getchar();gets(rest);cls();if (command2>'7' | command2<'1') && command2!=

46、9;B' && command2!='b') puts("n無(wú)此選項(xiàng)！請(qǐng)重新選擇");printf("按ENTER以繼續(xù).");gets(rest);cls(); while (command2>'7' | command2<'1') && command2!='B' && command2!='b');switch (command2) case '1':puts("n請(qǐng)輸入新的專

47、家編號(hào)");gets(q->num);cls();for (r=q->sub; r; r=r->next) strcpy(r->pro_num, q->num);break;case '2':puts("n請(qǐng)輸入新的姓名");gets(q->name);cls();break;case '3':puts("n請(qǐng)輸入新的出生日期，例：XXXX/XX/XX");gets(q->birth);cls();break;case '4':puts("n請(qǐng)輸入新的性別");q->sex=getchar();gets(rest);cls();break;case '5':puts("n請(qǐng)輸入新的電話");gets(q->tel);cls();break;case '6':puts("n請(qǐng)輸入新的職稱");gets(q->profession);cls();break;c