C语言实现医院管理系统

 #include #include #include typedef struct patient { char ID[10]; char name[10]; char bingli[300]; int cost[3]; struct patient * next; }node1; typedef struct storage { int amount[3]; int price[3]; }node2; node2 init(node2 temp) { temp.amount[0]=20; temp.amount[1]=20; temp.amount[2]=10; temp.price[0]=5; temp.price[1]=9; temp.price[2]=16; return temp; } void mainmeun() { printf("\n"); printf(" 健康是快乐的源泉\n"); printf("********************************\n"); printf("1.注册新病人信息\n"); printf("2.查询病人信息\n"); printf("3.写病历\n"); printf("4.病人消费\n"); printf("5.列出所有病人信息\n"); printf("6.载入所有病人信息\n"); printf("7.保存\n"); printf("8.查询药品库存\n"); printf("9.离开\n"); printf("*********************************\n"); } node1 * create(node1 *p1) { node1 *p; p=(node1 *)malloc(sizeof(node1)); printf("请输入病人ID\n"); scanf("%s",p->ID); while(p1->ID&&strcmp(p1->ID,p->ID)) { p1=p1->next; } if(p1==NULL) { printf("请输入病人姓名\n"); scanf("%s",p->name); strcpy(p->bingli,"0"); p->cost[0]=0; p->cost[1]=0; p->cost[2]=0; p->next=NULL; printf("已注入您的信息\n"); return p; } else { printf("输入病人ID以存在,注册失败\n"); return p; } } node1 * insert(node1 * head,node1 *p) { node1 *p1; if(head==NULL) { head=p; p->next=NULL; } else { p1=head; while(p1->next) { p1=p1->next; } p1->next=p; p->next=NULL; } return(head); } void search(node1 *p1) { int sum; char a[10]; printf("请输入病人ID\n"); scanf("%s",a); while(p1->ID&&strcmp(p1->ID,a)) { p1=p1->next; } if(p1) { printf("ID:%s\n",p1->ID); printf("姓名:%s\n",p1->name); printf("病例:%s\n",p1->bingli); printf("消费记录:\n"); if(p1->cost[0]) printf("巴米尔\t%d\n",p1->cost[0]); if(p1->cost[1]) printf("感冒灵\t%d\n",p1->cost[1]); if(p1->cost[2]) printf("病毒灵\t%d\n",p1->cost[2]); sum=p1->cost[0]*5+p1->cost[1]*9+p1->cost[2]*16; printf("总费用\t%d\n",sum); } else printf("该病人没有注册\n"); } void bingli(node1 *p) { char a[10]; char bingli[300]; char enter[5]=":\n"; printf("请输入病人ID\n"); scanf("%s",a); while(p->ID&&strcmp(p->ID,a)) { p=p->next; } if(p==NULL) { printf("无该病人信息\n"); } else { printf("请写病例:\n"[email protected]*码网); scanf("%s",bingli); strcpy(p->bingli,bingli); strcat(p->bingli,enter); } } node2 buy(node1 *p,node2 temp) { char i[10]; printf("请输入病人ID\n"); scanf("%s",i); while(p->ID&&strcmp(p->ID,i)) { p=p->next; } while(1) { int a,b,c,d; printf("1.购买巴米尔\n"); printf("2.购买感冒灵\n"); printf("3.购买病毒灵\n"); printf("0.退出\n"); scanf("%d",&a); switch(a) { case 1: do { printf("现有库存%d\n",temp.amount[0]); printf("购买巴米尔数量:"); scanf("%d",&b); temp.amount[0]=temp.amount[0]-b; p->cost[0]+=b*5; }while(b>20); break; case 2: do { printf("现有库存%d\n",temp.amount[1]); printf("购买感冒灵数量:"); scanf("%d",&c); temp.amount[1]=temp.amount[1]-c; p->cost[1]+=c*9; }while(c>20); break; case 3: do { printf("现有库存%d\n",temp.amount[2]); printf("购买病毒灵数量:"); scanf("%d",&d); temp.amount[2]=temp.amount[2]-d; p->cost[2]+=d*16; }while(d>=10); break; case 0: return temp; } } } void list(node1 *p) { if(p==NULL) printf("尚无病人信息\n"); else { do{ printf("病人ID:%s\n",p->ID); printf("病人姓名:%s\n",p->name); printf("病人病例:%s\n",p->bingli); printf("购买巴米尔费用:%d\n",p->cost[0]); printf("购买感冒灵费用:%d\n",p->cost[1]); printf("购买病毒灵费用:%d\n",p->cost[2]); printf("\n"); p=p->next; }while(p!=NULL); } } node1 * load(node1 *p) { char ID[10],name[10],bingli[300]; int cost0,cost1,cost2; FILE *fp; fp=fopen("information.txt","r"); int n=0; node1 *p1,*p2; while(!feof(fp)) { n++; p1=(node1 *)malloc(sizeof(node1)); fscanf(fp,"%s",ID); fscanf(fp,"%s",name); fscanf(fp,"%s",bingli); fscanf(fp,"%d",&cost0); fscanf(fp,"%d",&cost1); fscanf(fp,"%d",&cost2); strcpy(p1->ID,ID); strcpy(p1->name,name); strcpy(p1->bingli,bingli); p1->cost[0]=cost0; p1->cost[1]=cost1; p1->cost[2]=cost2; p1->next=NULL; if(n==1) { p=p1; p2=p1; } else { p2->next=p1; p2=p1; } } fclose(fp); return p; } void save(node1 *p) { FILE *fp; fp=fopen("information.txt","w"); if(p!=NULL) do{ fprintf(fp,"%s\n",p->ID); fprintf(fp,"%s\n",p->name); fprintf(fp,"%s\n",p->bingli); fprintf(fp,"%d\n",p->cost[0]); fprintf(fp,"%d\n",p->cost[1]); fprintf(fp,"%d\n",p->cost[2]); p=p->next; }while(p!=NULL); fclose(fp); } void liststock(node2 temp) { printf("药品\t数量\t价格\t\n"); printf("巴米尔\t%d\t%d\t\n",temp.amount[0],temp.price[0]); printf("感冒灵\t%d\t%d\t\n",temp.amount[1],temp.price[1]); printf("病毒灵\t%d\t%d\t\n",temp.amount[2],temp.price[2]); } chose() { node1 *head=NULL,*p; node2 temp; temp=init(temp); while(1) { mainmeun(); int a; scanf("%d",&a); switch(a) { case 1: p=create(head); head=insert(head,p); break; case 2: search(head); break; case 3: bingli(head); break; case 4: temp=buy(head,temp); break; case 5: list(head); break; case 6: head=load(head); break; case 7: save(head); break; case 8: liststock(temp); break; case 9: printf("谢谢使用\n"); return(0); default: printf("输入有误，重新输入\n"); break; } } } void main() { chose(); }