C語言實現(xiàn)病例管理系統(tǒng)
更新時間：2019年01月30日 17:15:32 作者：c751245630
這篇文章主要為大家詳細介紹了C語言實現(xiàn)病例管理系統(tǒng)，具有一定的參考價值，感興趣的小伙伴們可以參考一下
本文實例為大家分享了C語言實現(xiàn)病例管理系統(tǒng)的具體代碼，供大家參考，具體內(nèi)容如下
通過十字交叉鏈表實現(xiàn)一個病例管理系統(tǒng)，可以查找、刪除、更新信息。
#include"stdio.h"
#include"stdlib.h"
#include"string.h"
typedef struct hospital_info{
char dise_num[10]; /*病歷編號*/
char ke[10]; /*門診科別*/
char date[11]; /*門診時間*/
char symptom[60]; /*癥狀*/
char diagnosis[60]; /*診斷*/
char treatment[60]; /*治療意見*/
char doctor[10]; /*醫(yī)師姓名*/
struct hospital_info *next;
}hospitals;
typedef struct disease_info{
char dise_num[10]; /*病歷編號*/
char employee[10]; /*姓名*/
char sex; /*性別*/
char unit[30]; /*工作單位*/
char date[11]; /*出生日期*/
char drug_allergy[30]; /*藥物過敏史*/
char phone[12]; /*聯(lián)系電話*/
char addr[30]; /*住址*/
hospitals *head_hosp;
struct disease_info *next;
}diseases;
typedef struct unit_info{
char unit_num[10]; /*單位編號*/
char unit[30]; /*單位名稱*/
char manager[20]; /*負責人*/
char phone[12]; /*聯(lián)系電話*/
int total;
diseases *head_disease;
struct unit_info *next;
}units;
void create_cross_list(units**head);
void save_cross_list(units*head);
void traverse_cross_list(units*head);
void load_cross_list(units **head);
void Revise_unit(units *head);
void Revise_dise(units *head);
void Revise_hosp(units *head);
void Insert_unit(units *head);
void Insert_dise(units *head);
void Insert_hosp(units *head);
void Delete_unit(units *head);
void Delete_dise(units *head);
void Delete_hosp(units *head);
void Search_unit(units *head);
void Search_dise(units *head);
void Search_hosp(units *head);
void Display_no_hosp(units *head);
void Sortmonth(units *head);
void SortTotal(units *head);
void Sortpeople(units *head);
void main(void)
{
units *head=NULL;
short choice;
printf("-----the unit information manage system!------\n");
printf("< 1----------create the cross list >\n");
printf("< 2----------save the cross list >\n");
printf("< 3----------traverse the cross list >\n");
printf("< 4----------load the cross list >\n");
printf("< 5-----------Revise information >\n");
printf("< 6-----------Insert information >\n");
printf("< 7-----------Delete information >\n");
printf("< 8-----------Search information >\n");
printf("< 9--------------- tong ji >\n");
printf("< 10---------------退出 >\n");
printf("--------------------------------------------->\n");
f: while(1){
printf("請選擇要進行的操作:(1-10)");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:create_cross_list(&head);
break;
case 2:save_cross_list(head);break;
case 3:traverse_cross_list(head);
break;
case 4:load_cross_list(&head);break;
case 5:
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ---------修改函數(shù)菜單-----------\n");
printf(" 1----------------Revise_unit\n");
printf(" 2----------------Revise_dise\n");
printf(" 3----------------Revise_hosp\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(1){
printf("**請選擇子菜單操作:(1-4)");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:Revise_unit(head);break;
case 2:Revise_dise(head);break;
case 3:Revise_hosp(head);break;
case 4:goto f;
}
}
}
case 6:
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ---------插入函數(shù)菜單-----------\n");
printf(" 1----------------Insert_unit\n");
printf(" 2----------------Insert_dise\n");
printf(" 3----------------Insert_hosp\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(1){
printf("**請選擇子菜單操作:(1-4)");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:Insert_unit(head);break;
case 2:Insert_dise(head);break;
case 3:Insert_hosp(head);break;
case 4:goto f;
}
}
}
case 7:
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ---------刪除函數(shù)菜單-----------\n");
printf(" 1---------------Delete_unit\n");
printf(" 2---------------Delete_dise\n");
printf(" 3---------------Delete_hosp\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(1){
printf("**請選擇子菜單操作(1-4):");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:Delete_unit(head);break;
case 2:Delete_dise(head);break;
case 3:Delete_hosp(head);break;
case 4:goto f;
}
}
}
case 8:
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ---------查詢函數(shù)菜單-----------\n");
printf(" 1---------------Search_unit\n");
printf(" 2---------------Search_dise\n");
printf(" 3---------------Search_hosp\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(1){
printf("**請選擇子菜單操作(1-4):");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:Search_unit(head);break;
case 2:Search_dise(head);break;
case 3:Search_hosp(head);break;
case 4:goto f;
}
}
}
case 9:
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ---------統(tǒng)計函數(shù)菜單-----------\n");
printf(" 1---------------Display_no_hosp\n");
printf(" 2---------------Sortmonth\n");
printf(" 3---------------SortTotal\n");
printf(" 4---------------Sortpeople\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(1){
printf("**請選擇子菜單操作(1-5):");
scanf("%hd",&choice);
getchar(); /*用于吸收換行符*/
switch(choice)
{
case 1:Display_no_hosp(head);break;
case 2:Sortmonth(head);break;
case 3:SortTotal(head);break;
case 4:Sortpeople(head);break;
case 5:goto f;
}
}
}
case 10:goto down;
}
}
down: ;
}
/*創(chuàng)建十字交叉鏈表,并錄入信息*/
void create_cross_list(units **head)
{
units *hp=NULL,*p;
diseases *pcrs;
hospitals *phs;
char ch;
loop:
p=(units *)malloc(sizeof(units)); /*創(chuàng)建單位信息結(jié)點*/
printf("請輸入單位的編號:");
scanf("%s",p->unit_num);
printf("請輸入單位名稱:");
scanf("%s",p->unit);
printf("請輸入負責人:");
scanf("%s",p->manager);
printf("請輸入聯(lián)系電話:");
scanf("%s",p->phone);/*輸入各項數(shù)據(jù)*/
getchar(); /*用于讀scanf輸入中的換行符*/
p->head_disease=NULL;
p->next=hp;
hp=p;
printf("繼續(xù)輸入%s下單位的病例基本信息(Y/N)?\n",p->unit);
scanf("%c",&ch);
getchar();
while(ch=='y'||ch=='Y')
{
pcrs=(diseases *)malloc(sizeof(diseases));
printf("請輸入病例編號:");
gets(pcrs->dise_num);
printf("請輸入病人姓名:");
gets(pcrs->employee);
printf("請輸入性別:");
scanf("%s",&pcrs->sex);
getchar();
printf("請輸入出生日期:");
gets(pcrs->date);
printf("請輸入藥物過敏史:");
gets(pcrs->drug_allergy);
printf("請輸入聯(lián)系電話:");
gets(pcrs->phone);
printf("請輸入住址:");
gets(pcrs->addr);
/*輸入各項數(shù)據(jù)*/
strcpy(pcrs->unit,p->unit);
pcrs->head_hosp=NULL;
pcrs->next=p->head_disease; /*頭指針值賦給新結(jié)點的指針域*/
p->head_disease=pcrs; /*頭指針指向新結(jié)點*/
printf("繼續(xù)輸入%s的門診信息(Y/N)?\n",pcrs->employee);
ch=getchar();
getchar();
while(ch=='y'||ch=='Y')
{ /*是,循環(huán)創(chuàng)建信息鏈*/
phs=(hospitals *)malloc(sizeof(hospitals));
printf("請輸入門診科別:");
scanf("%s",phs->ke);
printf("請輸入門診時間:");
scanf("%s",phs->date);
printf("請輸入癥狀:");
scanf("%s",phs->symptom);
printf("請輸入診斷:");
scanf("%s",phs->diagnosis);
printf("請輸入治療意見:");
scanf("%s",phs->treatment);
printf("請輸入醫(yī)師姓名:");
scanf("%s",phs->doctor);
/*輸入各項數(shù)據(jù)*/
getchar();
strcpy(phs->dise_num,pcrs->dise_num);
phs->next=pcrs->head_hosp; /*頭指針值賦給新結(jié)點的指針域*/
pcrs->head_hosp=phs; /*頭指針指向新結(jié)點*/
printf("繼續(xù)輸入%s的下一條病例信息(Y/N)?\n",pcrs->employee);
ch=getchar();
getchar(); /*是否繼續(xù)創(chuàng)建下一個基本信息結(jié)點*/
}
printf("繼續(xù)輸入下一個病例的基本信息(Y/N)?\n");
ch=getchar();
getchar(); /*是否繼續(xù)創(chuàng)建下一個基本信息結(jié)點*/
}
printf("繼續(xù)輸入下一個單位的信息(Y/N)?\n");
ch=getchar();
getchar();
if(ch=='y'||ch=='Y')
goto loop;
(*head)=hp;
p=(*head);
}
/*保存十字交叉鏈表數(shù)據(jù)到磁盤文件*/
void save_cross_list(units *head)
{
FILE *out1,*out2,*out3;
units *p=head;
diseases *pcrs;
hospitals *phs;
if((out1=fopen("c:\\unit.dat","wb+"))==NULL)
/*以只寫方式將單位基本信息文件創(chuàng)建在c盤下的unit.text文本文件，并使out1指向它*/
exit(-1);
if((out2=fopen("c:\\disease.dat","wb+"))==NULL) /*打開病歷信息文件*/
exit(-1);
if((out3=fopen("c:\\hospital.dat","wb+"))==NULL) /*打開門診信息文件*/
exit(-1);
while(p!=NULL)
{
fwrite(p,sizeof(units),1,out1);/*寫單位基本信息記錄*/
pcrs=p->head_disease; /*病歷遍歷指針指向病歷鏈鏈頭*/
while(pcrs!=NULL)
{ /*遍歷病歷信息鏈*/
fwrite(pcrs,sizeof(diseases),1,out2); /*寫病歷記錄*/
phs=pcrs->head_hosp; /*門診遍歷指針指向門診鏈鏈頭*/
while(phs!=NULL)
{
fwrite(phs,sizeof(hospitals),1,out3); /*寫門診鏈*/
phs=phs->next;
}
pcrs=pcrs->next; /*指向下一個病歷鏈*/
}
p=p->next; /*指向下一個單位基本信息結(jié)點*/
}
fclose(out1); /*關(guān)閉基本信息文件*/
fclose(out2); /*關(guān)閉病歷信息文件*/
fclose(out3); /*關(guān)閉門診信息文件*/
printf("記錄已被保存.\n");
}
/*遍歷十字交叉鏈表，輸出各項基本信息*/
void traverse_cross_list(units *head)
{
units *p=head;
diseases *pcrs;
hospitals *phs;
printf("<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
while(p!=NULL)
{ /*遍歷單位基本信息鏈*/
printf("%s\t%s\t%s\t%s\n",p->unit_num,p->unit,p->manager,p->phone);
pcrs=p->head_disease;
while(pcrs!=NULL)
{ /*遍歷病歷基本信息鏈與門診信息鏈*/
printf("%s\t%s\t%c\t%s\t%s\t%s\t%s\t%s\n",pcrs->dise_num,pcrs->employee,\
pcrs->sex,pcrs->unit,pcrs->date,pcrs->drug_allergy,pcrs->phone,pcrs->addr);
phs=pcrs->head_hosp;
while(phs!=NULL)
{
printf("%s\t%s\t%s\t%s\t%s\t%s\t%s\n",phs->dise_num,phs->ke,phs->date,\
phs->symptom,phs->diagnosis,phs->treatment,phs->doctor);
phs=phs->next;
}
pcrs=pcrs->next;
}
p=p->next;
}
printf("<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
}
/*從磁盤文件中讀取*/
void load_cross_list(units **head)
{
FILE *in1,*in2,*in3;
units *hp=NULL,*p;
diseases *pcrs;
hospitals *phs;
if((in1=fopen("c:\\unit.dat","rb"))==NULL)
exit(-1);
if((in2=fopen("c:\\disease.dat","rb"))==NULL)
exit(-1);
if((in3=fopen("c:\\hospital.dat","rb"))==NULL)
exit(-1);
while(!feof(in1))
{
p=(units *)malloc(sizeof(units));
fread(p,sizeof(units),1,in1);
if(!feof(in1))
{
p->head_disease=NULL;
p->next=hp;
hp=p;
}
}
(*head)=hp;
while(!feof(in2))
{
pcrs=(diseases *)malloc(sizeof(diseases));
fread(pcrs,sizeof(diseases),1,in2);
if(!feof(in2))
{
p=(*head);
pcrs->head_hosp=NULL;
while(p!=NULL)
{
if(!strcmp(p->unit,pcrs->unit))
{
pcrs->next=p->head_disease;
p->head_disease=pcrs;
break;
}
else p=p->next;
}
}
}
(*head)=hp;
while(!feof(in3))
{
phs=(hospitals *)malloc(sizeof(hospitals));
fread(phs,sizeof(hospitals),1,in3);
if(!feof(in3))
{
p=(*head);
while(p!=NULL)
{
pcrs=p->head_disease;
while(pcrs!=NULL)
{
if(!strcmp(phs->dise_num,pcrs->dise_num))
{
phs->next=pcrs->head_hosp;
pcrs->head_hosp=phs;
break;
}
else pcrs=pcrs->next;
}
p=p->next;
}
}
}
fclose(in1);
fclose(in2);
fclose(in3);
}
//修改一個單位基本信息
void Revise_unit(units *head)
{
units *p,*q;
char num[10];
char choice;
char update[30];
p=q=head;
printf("please input 要修改的單位編號:");
scanf("%s",num);
getchar();
while(strcmp(num,p->unit_num)!=0&&p->next!=0) /*查找需要修改信息的單位編號*/
{
q=p;
p=p->next;
}
if(strcmp(num,p->unit_num)==0)
{
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ***a---------to revise unit_num\n");
printf(" ***b---------to revise unit_name\n");
printf(" ***c---------to revise unit_manager\n");
printf(" ***d---------to revise unit_phone\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
loop:
printf("please input要選擇的操作:(a-d)");
choice=getchar();
getchar();
printf("please input更新后的信息:");
switch(choice)
{
case 'a':
scanf("%s",update);
strncpy(p->unit_num,update,strlen(update)+1);
goto loop;
case 'b':
scanf("%s",update);
strncpy(p->unit,update,strlen(update)+1);
goto loop;
case 'c':
scanf("%s",update);
strncpy(p->manager,update,strlen(update)+1);
goto loop;
case 'd':
scanf("%s",update);
strncpy(p->phone,update,strlen(update)+1);
goto loop;
default:break;
}
printf("修改成功!\n");
}
else printf("not find!\n");
}
//修改一個病歷基本信息
void Revise_dise(units *head)
{
units *p;
diseases *pcrs;
char num[10];
char update[30];
char choice;
p=head;
printf("please input 要修改信息的員工編號:");
scanf("%s",num);
getchar();
pcrs=p->head_disease;
while(p!=NULL)
{
while(pcrs!=NULL)
{
if(strcmp(pcrs->dise_num,num)==0)
goto loop1;
pcrs=pcrs->next;
}
p=p->next;
pcrs=p->head_disease->next;
}
if(p==NULL)
{
printf("not find the unit");
goto end;
}
loop1:
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ***a--------to revise the dise num\n");
printf(" ***b--------to revise the employee\n");
printf(" ***c--------to revise the sex\n");
printf(" ***d--------to revise the unit\n");
printf(" ***e--------to revise the date\n");
printf(" ***f---------to revise the drug_allergy\n");
printf(" ***g---------to revise the phone\n");
printf(" ***h---------to revise the addr\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
loop2:
printf("please input要選擇的操作:(a-h)");
choice=getchar();
getchar();
printf("請輸入修改后的信息:");
switch (choice)
{
case 'a':
scanf("%s",update);
strncpy(pcrs->dise_num,update,sizeof(update)+1);
goto loop2;
case 'b':
scanf("%s",update);
strncpy(pcrs->employee,update,sizeof(update)+1);
goto loop2;
case 'c':
scanf("%c",&pcrs->sex);
goto loop2;
case 'd':
scanf("%s",update);
strncpy(pcrs->unit,update,strlen(update)+1);
goto loop2;
case 'e':
scanf("%s",update);
strncpy(pcrs->date,update,strlen(update)+1);
goto loop2;
case 'f':
scanf("%s",update);
strncpy(pcrs->drug_allergy,update,strlen(update)+1);
goto loop2;
case 'g':
scanf("%s",update);
strncpy(pcrs->phone,update,strlen(update)+1);
goto loop2;
case 'h':
scanf("%s",update);
strncpy(pcrs->addr,update,strlen(update)+1);
goto loop2;
default:break;
}
printf("修改成功!\n");
end: ;
}
/*修改一個門診基本信息*/
void Revise_hosp(units *head)
{
units *p;
diseases *pcrs;
hospitals *phs;
char num[10],date[11];
char choice;
char update[30];
p=head;
printf("please input 要修改信息的病歷編號:");
scanf("%s",num);
pcrs=p->head_disease;
while(p!= NULL)
{
while(pcrs!= NULL)
{
if(strcmp(pcrs->dise_num,num)==0)
goto loop1;
pcrs=pcrs->next;
}
p=p->next;
pcrs=p->head_disease->next;
}
if(p==NULL)
{
printf("not find the unit");
goto end;
}
loop1:
printf("please input 要修改信息的門診時間:");
scanf("%s",date);
phs=pcrs->head_hosp;
while(phs!= NULL)
{
if(strcmp(phs->date,date)==0)
goto loop2;
phs=phs->next;
}
if(phs==NULL)
{
printf("not find ");
goto end;
}
loop2:
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
printf(" ***a---------revise the dise_num\n");
printf(" ***b--------revise the ke\n");
printf(" ***c--------revise the date\n");
printf(" ***d--------revise the symptom\n");
printf(" ***e--------revise the diagnosis\n");
printf(" ***f--------revise the treatment\n");
printf(" ***g--------revise the doctor\n");
printf(" <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n");
loop3:
printf("please input要進行的操作:");
choice=getchar();
getchar();
printf("please input the update information:");
scanf("%s",update);
switch(choice)
{
case 'a':
strncpy(phs->dise_num,update,strlen(update)+1);
goto loop3;
case 'b':
strncpy(phs->ke,update,strlen(update)+1);
goto loop3;
case 'c':
strncpy(phs->date,update,strlen(update)+1);
goto loop3;
case 'd':
strncpy(phs->symptom,update,strlen(update)+1);
goto loop3;
case 'e':
strncpy(phs->diagnosis,update,strlen(update)+1);
goto loop3;
case 'f':
strncpy(phs->treatment,update,strlen(update)+1);
goto loop3;
case 'g':
strncpy(phs->doctor,update,strlen(update)+1);
goto loop3;
default:break;
}
printf("修改成功!\n");
end: ;
}
//按單位編號由小到大在鏈表中插入一個單位新結(jié)點
void Insert_unit(units *head)
{
units *p1,*p2;
int state;
loop:
p1=head;
p2=malloc(sizeof(units));
p2->next=NULL;
p2->head_disease=malloc(sizeof(diseases));
p2->head_disease->next=NULL;
printf("請輸入單位編號:");
scanf("%s",p2->unit_num);
a: while(p1->next!=NULL)
{
p1=p1->next;
if(strcmp(p1->unit_num,p2->unit_num)==0)
{
state = 1;
break;
}
else
{
state=0;
break;
}
}
switch(state)
{
case 0:if(strcmp(p1->unit_num,p2->unit_num)>0)
{
if(p1==head->next)
{
head->next=p2;
p2->next=p1;
}
else
{
p1->next=p2;
p2->next=p1->next;
}
break;
}
else
goto a;
case 1:printf("the unit num already exit,pleae input another one\n");
goto loop;
}
printf("請輸入單位名稱:");
scanf("%s",p2->unit);
printf("請輸入負責人:");
scanf("%s",p2->manager);
printf("請輸入聯(lián)系電話:");
scanf("%s",p2->phone);
printf("插入成功!\n");
}
//按病歷編號由小到大插入一個員工病歷信息結(jié)點
void Insert_dise(units *head)
{
units *p;
diseases *pcrs1,*pcrs2;
int state;
char name[30];
printf("請輸入單位名稱:");
scanf("%s",name);
p=head;
while(p->next!= NULL)
{
p=p->next;
if (strcmp(p->unit,name)==0)
break;
}
if(p==NULL)
{
printf("not find the unit!");
goto end;
}
pcrs1=p->head_disease;
pcrs2=malloc(sizeof(diseases));
pcrs2->next = NULL;
pcrs2->head_hosp= malloc(sizeof(hospitals));
pcrs2->head_hosp->next=NULL;
strcpy(pcrs2->unit,name);
loop:
printf("請輸入病例編號:");
scanf("%s",pcrs2->dise_num);
if (pcrs1==NULL)
p->head_disease->next = pcrs2;
else
{
a: while (pcrs1 ->next != NULL)
{
pcrs1= pcrs1->next;
if (strcmp(pcrs1->dise_num,pcrs2->dise_num)==0)
{
state = 1;
break;
}
else
{
state=0;
break;
}
}
switch(state)
{
case 0:if(strcmp(pcrs1->dise_num,pcrs2->dise_num)>0)
{
if(pcrs1=p->head_disease->next)
{
p->head_disease->next=pcrs2;
pcrs2->next=pcrs1;
}
else
{
pcrs1->next=pcrs2;
pcrs2->next=pcrs1->next;
}
break;
}
else
goto a;
case 1:printf("the disease number already exit,please input another one\n");
goto loop;
}
}
printf("請輸入姓名:");
scanf("%s",pcrs2->employee);
printf("請輸入性別:");
scanf("%c",pcrs2->sex);
printf("請輸入出生日期");
scanf("%s",pcrs2->date);
printf("請輸入藥物過敏史:");
scanf("%s",pcrs2->drug_allergy);
printf("請輸入聯(lián)系電話:");
scanf("%s",pcrs2->phone);
printf("請輸入住址:");
scanf("%s",pcrs2->addr);
printf("插入成功!\n");
end: ;
}
//按門診時間由小到大插入一個員工門診信息結(jié)點
void Insert_hosp(units *head)
{
units *p;
diseases *pcrs;
hospitals *phs1,*phs2;
char number[10];
printf("請輸入單位編號:");
scanf("%s",number);
p=head;
while(p->next!= NULL)
{
p=p->next;
if(strcmp(p->unit_num,number)==0)
break;
}
if(p==NULL)
{
printf("not find the unit\n");
goto end;
}
pcrs=p->head_disease;
printf("請輸入病例編號:");
scanf("%s",number);
while(pcrs->next!=NULL)
{
pcrs=pcrs->next;
if (strcmp(pcrs->dise_num,number)==0)
break;
}
if (pcrs==NULL)
{
printf("not find the question \n");
goto end;
}
phs1=pcrs->head_hosp->next;
phs2=malloc(sizeof(hospitals));
phs2->next=NULL;
if(phs1==NULL)
pcrs->head_hosp->next =phs2;
else
{
while(phs1->next!=NULL)
phs1=phs1->next;
phs1->next=phs2;
}
strncpy(phs2->dise_num,number,strlen(number)+1);
printf("請輸入科別:");
scanf("%s",phs2->ke);
printf("請輸入診斷時間:");
scanf("%s",phs2->date);
printf("請輸入主訴:");
scanf("%s",phs2->symptom);
printf("請輸入初步診斷:");
scanf("%s",phs2->diagnosis);
printf("請輸入治療意見:");
scanf("%s",phs2->treatment);
printf("請輸入醫(yī)師姓名:");
scanf("%s",phs2->doctor);
printf("插入成功!\n");
end: ;
}
/*刪除一條單位信息記錄*/
void Delete_unit(units *head)
{
units *p,*q;
char name[30];
printf("please input 要刪除的單位名稱:");
scanf("%s",name);getchar();
p=q=head;
while(strcmp(name,p->unit)!=0&&p->next!=0)/*p指的不是要找的結(jié)點,并且后面還有結(jié)點*/
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(name,p->unit)==0)
{ /*找要刪除位置*/
if(p==head) head=p->next; /*若p指向的是首結(jié)點,把第二個結(jié)點地址賦予head*/
else q->next=p->next; /*否則將下一個結(jié)點地址賦給前一結(jié)點地址*/
free(p);
printf("刪除成功!\n");
}
else printf("%s not been found!\n",name); /*找不到該結(jié)點*/
}
/*刪除一條病歷信息記錄*/
void Delete_dise(units *head)
{
units *p,*q;
diseases *pcrs,*t;
char name[10],employee[30];
printf("please input 要刪除信息的單位名稱:");
scanf("%s",name);
getchar();
p=q=head;
while(strcmp(name,p->unit)!=0&&p->next!=0) /*p指的不是要找的結(jié)點,并且后面還有結(jié)點*/
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(name,p->unit)==0)
{
printf("please input 要刪除信息的員工姓名:");
scanf("%s",employee);
getchar();
pcrs=t=p->head_disease;
while(strcmp(employee,pcrs->employee)!=0&&pcrs->next!=0)
{
t=pcrs;
pcrs=pcrs->next;
} /*pcrs后移一個結(jié)點*/
if(strcmp(employee,pcrs->employee)==0)
{
if(pcrs==p->head_disease) p->head_disease=pcrs->next; /*若pcrs指向的是首結(jié)點,把第二個結(jié)點地址賦予head*/
else t->next=pcrs->next; /*否則將下一個結(jié)點地址賦給前一結(jié)點地址*/
free(pcrs);
printf("刪除成功!\n");
}
}
else printf("%s not been found!\n",employee);
}
//刪除一條門診信息記錄
void Delete_hosp(units *head)
{
units *p,*q;
diseases *pcrs,*t1;
hospitals *phs,*t2;
char name[30],employee[10],date[11];
printf("please input 要刪除信息的單位名稱:");
scanf("%s",name);
getchar();
p=q=head;
while(strcmp(name,p->unit)!=0&&p->next!=0)/*p指的不是要找的結(jié)點,并且后面還有結(jié)點*/
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(name,p->unit)==0)
{
printf("please input 要刪除信息的員工姓名:");
scanf("%s",employee);
getchar();
pcrs=t1=p->head_disease;
while(strcmp(employee,pcrs->employee)!=0&&pcrs->next!=0)
{
t1=pcrs;
pcrs=pcrs->next;
} /*pcrs后移一個結(jié)點*/
if(strcmp(employee,pcrs->employee)==0)
{
printf("please input 要刪除信息的病歷時間:");
scanf("%s",date);
getchar();
phs=t2=pcrs->head_hosp;
while(strcmp(date,phs->date)!=0&&phs->next!=0)
{
t2=phs;
phs=phs->next;
}
if(strcmp(date,phs->date)==0)
{
if(phs==pcrs->head_hosp) pcrs->head_hosp=phs->next;
else t2->next=phs->next;
free(phs);
printf("刪除成功!\n");
}
}
}
else printf("%s not been found!\n",date);
}
/*查詢一條單位信息記錄并輸出信息*/
void Search_unit(units *head)
{
units *p,*q;
char num[10];
p=q=head;
printf("please input 要查詢的單位編號:");
scanf("%s",num);
getchar();
while(strcmp(num,p->unit_num)!=0&&p->next!=0)/*p指的不是要查詢的結(jié)點并且后面還有結(jié)點*/
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(num,p->unit_num)==0)
{/*找要查詢的結(jié)點,輸出各項基本信息*/
printf("單位編號:%s\n",p->unit_num);
printf("單位名稱:%s\n",p->unit);
printf("負責人:%s\n",p->manager);
printf("聯(lián)系電話:%s\n",p->phone);
}
else printf("%s not been found!\n",num); /*找不到要查詢的結(jié)點*/
}
//查詢一條病歷信息鏈并輸出信息
void Search_dise(units *head)
{
units *p,*q;
diseases *pcrs,*t;
char name[10],num[10];
p=q=head;
printf("please input 要查詢的單位名稱:");
scanf("%s",name);
getchar();
while(strcmp(name,p->unit)!=0&&p->next!=0)
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(name,p->unit)==0) /*找要查詢的結(jié)點*/
{
pcrs=t=p->head_disease;
printf("please input 要查詢的病歷編號:");
scanf("%s",num);
getchar();
while(strcmp(num,pcrs->dise_num)!=0&&pcrs->next!=0)
{
t=pcrs;
pcrs=pcrs->next;
} /*p后移一個結(jié)點*/
if(strcmp(num,pcrs->dise_num)==0)
{/*找要查詢的結(jié)點*/
printf("病歷編號:%s\n",pcrs->dise_num);
printf("姓名:%s\n",pcrs->employee);
printf("性別:%c\n",pcrs->sex);
printf("工作單位:%s\n",pcrs->unit);
printf("出生日期:%s\n",pcrs->date);
printf("藥物過敏史:%s\n",pcrs->drug_allergy);
printf("聯(lián)系電話:%s\n",pcrs->phone);
printf("住址:%s\n",pcrs->addr);
}
}
else printf("not been found!\n"); /*找不到要查詢的結(jié)點*/
}
//查詢一條門診信息鏈并輸出信息
void Search_hosp(units *head)
{
units *p,*q;
diseases *pcrs,*t1;
hospitals *phs,*t2;
char name[10],num[10],date[11];
p=q=head;
printf("please input 要查詢的單位名稱:");
scanf("%s",name);
getchar();
while(strcmp(name,p->unit)!=0&&p->next!=0)
{
q=p;
p=p->next;
} /*p后移一個結(jié)點*/
if(strcmp(name,p->unit)==0) /*找要查詢的結(jié)點*/
{
pcrs=t1=p->head_disease;
printf("please input 要查詢的病歷編號:");
scanf("%s",num);
getchar();
while(strcmp(num,pcrs->dise_num)!=0&&pcrs->next!=0)
{
t1=pcrs;
pcrs=pcrs->next;
} /*p后移一個結(jié)點*/
if(strcmp(num,pcrs->dise_num)==0) /*找要查詢的結(jié)點*/
{
phs=t2=pcrs->head_hosp;
printf("please input 要查詢的門診時間:");
scanf("%s",date);
getchar();
while(strcmp(date,phs->date)!=0&&phs->next!=0)
{
t2=phs;
phs=phs->next;
} /*p后移一個結(jié)點*/
if(strcmp(date,phs->date)==0)
{
printf("病歷編號:%s\n",phs->dise_num);
printf("診斷科別:%s\n",phs->ke);
printf("門診時間:%s\n",phs->date);
printf("主訴:%s\n",phs->symptom);
printf("初步診斷:%s\n",phs->diagnosis);
printf("治療意見:%s\n",phs->treatment);
printf("醫(yī)師姓名:%s\n",phs->doctor);
}
}
}
else printf("not been found!\n"); /*找不到要查詢的結(jié)點*/
}
/*列出從未門診的員工信息(單位.姓名.住址.電話)*/
void Display_no_hosp(units *head)
{
units *p=head;
diseases *pcrs;
hospitals *phs;
while(p!=NULL)
{
printf("%s\n",p->unit); //輸出各個單位名稱
printf("員工姓名\t電話\t住址\n");
pcrs=p->head_disease;
while(pcrs!=NULL)
{
phs=pcrs->head_hosp;
//如果phs是空鏈,則該員工從未門診過
if(phs==NULL)
printf("%s\t%s\t%s\n",pcrs->employee,pcrs->phone,pcrs->addr);
else ; //否則門診過,執(zhí)行空語句
pcrs=pcrs->next;
}
p=p->next;
}
}
/*統(tǒng)計一年中各月的門診量并按降序排列后輸出*/
void Sortmonth(units *head)
{
units *p=head;
diseases *pcrs;
hospitals *phs;
int s[12],i,j,t,count;
char year[10],month[10];
for(i=0;i<12;i++) s[i]=0;
printf("--請輸入要統(tǒng)計的年份:"); //手動輸入要統(tǒng)計的年份
scanf("%s",year);
getchar();
printf("--請輸入要統(tǒng)計的月份:");
for(i=0;i<12;i++)
{
count=0; //統(tǒng)計一年中各月的門診量
scanf("%s",month);
while(p!=NULL)
{
pcrs=p->head_disease;
while(pcrs!=NULL)
{
phs=pcrs->head_hosp;
while(phs!=NULL)
{
j=0;
while(phs->date[j]==year[j]&&(j<4))
j++;//判斷是否為要統(tǒng)計的年份
if(j==4) //是，比較是否為在該月的門診
if(phs->date[j+1]==month[0]&&phs->date[j+2]==month[1])
count++;
else ; //不是，執(zhí)行空語句
phs=phs->next;
}
pcrs=pcrs->next;
}
p=p->next;
}
s[i]=count;
}
for(i=0;i<12;i++) //輸出各月的總門診量
printf("%d\t",s[i]);
printf("\n");
for(i=0;i<11;i++) //降序排序
for(j=0;j<11-i;j++)
if(s[j]<s[j+1])
t=s[j],s[j]=s[j+1];s[j+1]=t;
printf("請輸出按降序排列后的統(tǒng)計量:\n");
for(i=0;i<12;i++) //輸出排列后的各月總門診量
printf("%d\t",s[i]);
printf("\n");
}
/*統(tǒng)計各單位員工的總門診量并按降序排列后輸出*/
void SortTotal(units *head)
{
units *p=head,*q;
diseases *pcrs;
hospitals *phs;
int count,i,j,t,len=0;
while(p!=NULL)
{ //計算各單位員工的總門診量
p->total=0;
count=0;
pcrs=p->head_disease;
while(pcrs!=NULL)
{
phs=pcrs->head_hosp;
while(phs!=NULL)
{
count++;
phs=phs->next;
}
pcrs=pcrs->next;
}
p->total=count;
printf("%s\t",p->unit); //輸出各個單位名稱
p=p->next;
}
printf("\n");
p=head; //遍歷指針p指向頭指針
while(p!=NULL)
{ //輸出統(tǒng)計數(shù)
printf("%d\t",p->total);
p=p->next;
}
printf("\n");
p=head;
while(p!=NULL)
{ //計算單位信息鏈表長度
len++;
p=p->next;
}
for(i=0,p=head;i<len-1;i++,p=p->next) //對統(tǒng)計量降序排序
for(j=i+1,q=p->next;j<len;j++,q=q->next)
if(p->total<q->total)
{
t=p->total;
p->total=q->total;
q->total=t;
}
p=head;
printf("請輸出按降序排列后的統(tǒng)計量:\n");
while(p!=NULL)
{ //輸出排序后的統(tǒng)計量
printf("%d\t",p->total);
p=p->next;
}
printf("\n");
}
//統(tǒng)計各單位員工總?cè)藬?shù)并輸出
void Sortpeople(units *head)
{
units *p=head;
diseases *pcrs;
int count;
while(p!=NULL)
{
p->total=0;
count=0;
pcrs=p->head_disease;
while(pcrs!=NULL)
{
count++;
pcrs=pcrs->next;
}
p->total=count;
p=p->next;
}
p=head;
while(p!=NULL)
{
printf("輸出單位名稱:%s",p->unit);
printf("統(tǒng)計單位總?cè)藬?shù):%d\n",p->total);
p=p->next;
}
}
更多學(xué)習(xí)資料請關(guān)注專題《管理系統(tǒng)開發(fā)》。
以上就是本文的全部內(nèi)容，希望對大家的學(xué)習(xí)有所幫助，也希望大家多多支持腳本之家。
相關(guān)文章
七夕節(jié)到了還不快給你的朋友安排上這只咕呱小青蛙？本文將用Matlab繪制一個可愛的咕呱小青蛙，感興趣的小伙伴可以動手嘗試一下2022-08-08
C++11中條件標量和互斥鎖應(yīng)用出現(xiàn)死鎖問題
這篇文章主要介紹了C++11中條件標量和互斥鎖應(yīng)用出現(xiàn)死鎖思考,本文通過示例代碼給大家介紹的非常詳細，對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值，需要的朋友可以參考下2023-06-06
C語言實現(xiàn)航空訂票系統(tǒng)課程設(shè)計
這篇文章主要為大家詳細介紹了C語言實現(xiàn)航空訂票系統(tǒng)課程設(shè)計，文中示例代碼介紹的非常詳細，具有一定的參考價值，感興趣的小伙伴們可以參考一下2022-03-03
C++字符數(shù)組、字符數(shù)組指針和string類
這篇文章主要介紹了C++字符數(shù)組、字符數(shù)組指針和string類，string是一個類而不是基本數(shù)據(jù)類型，數(shù)組不含有處理函數(shù)，下面更多詳細內(nèi)容，需要的小伙伴可以參考下面文章2022-03-03
這篇文章主要為大家介紹了c++ 判斷基類指針指向的真實對象類型示例詳解,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進步,早日升職加薪2023-08-08
這篇文章主要給大家分享了EC++虛函數(shù)注意事項，2022-01-01
C/C++ 運用Npcap發(fā)送UDP數(shù)據(jù)包的完美過程
UDP 是一種無連接、輕量級的傳輸層協(xié)議,與 TCP 相比,它不提供可靠性、流控制和錯誤恢復(fù)機制,但卻更加簡單且具有較低的開銷,這篇文章主要介紹了C/C++ 運用Npcap發(fā)送UDP數(shù)據(jù)包,需要的朋友可以參考下2023-11-11
這篇文章主要介紹了C實現(xiàn)的非阻塞方式命令行端口掃描器源碼,對于大家理解C端口掃描器有很大幫主,需要的朋友可以參考下2014-07-07
數(shù)據(jù)結(jié)構(gòu)課程設(shè)計-用棧實現(xiàn)表達式求值的方法詳解
本篇文章是對在c語言中用棧實現(xiàn)表達式求值的方法進行了詳細的分析介紹，需要的朋友參考下2013-05-05
這篇文章主要為大家詳細介紹了C++ DFS算法實現(xiàn)走迷宮自動尋路，文中示例代碼介紹的非常詳細，具有一定的參考價值，感興趣的小伙伴們可以參考一下2021-05-05