c语言综合设计作业医院管理系统,C语言之医院管理系统

这个是C语言学完后的一个程序实践的内用。编写一个医院病人管理系统。这个程序有一些BUG，要操作得当，否则可能结果有问题。不过作为作业应付一下还是有模有样的，哈哈。至少当时答辩时弄的还可以。

#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");

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();

}

运行时的截图，由于模块太多，就看看主页面吧。