版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、#in clude#in clude#in clude#in clude struct medici ne/药品名称/药品编号/单价/库存数量/品牌/假设最大数为100.char n ame20;char nu mber50;char price50;char inven tory50;char bran d20; medici ne100;/定义全局变量numint num;int menu _select()char s80;int a;/*定义整形变量*/system(cls);nn);printf(tt 您好!您已进入药房管理系统printf(ttt1.输入药品信息 n);printf
2、(ttt2.查看药品信息 n);printf(ttt3.修改药品信息 n);printf(ttt4.按编号查找药品n);prin tf(ttt5.按价格排序 n);printf(ttt6.删除药品信息 n);prin tf(ttt7.退出 n);printf(ttnn);doprin tf(E nter you choice(17):);scan f(%s,s); a=atoi(s);while (a7);return a; int addmedici ne()n);printf(ttt 请输入您要保存的信息printf(ttt 输入药品名称:n);sca nf(%s,medici nenu
3、m. name);printf(ttt 输入药品编号:n);sca nf(%s,medici nenu m. nu mber);prin tf(ttt 单价:n);sca nf(%s,medici nenu m.price);prin tf(ttt品牌:n);sca nf(%s,medici nenu m.bra nd);prin tf(ttt 库存数量:n);sca nf(%s,medici ne nu m.i nven tory);nu m+;printf(ttt 是否继续添加?(Y/N):n”);if(getch()=y | getch()=Y) addmedic in e();retu
4、rn(0);void modifybyname()/按药品名称修改char c;int i,mark=0;char n ame20;prin tf(ntt请输入要修改的药品名称:);sca nf(%s, name);if(num=0)prin tf(ntt文件中无相关药品);prin tf(ntt按任意键返回主菜单);getch(); mark+;return;for(i=0;i nu m;i+)if(strcmp(medici nei. name, name)=0)prin tf(ntt以下是您要修改的药品信息 );prin tf(ntt药品名称:%s,);pri
5、n tf(ntt药品编号:%s,medicinei.number);prin tf(ntt单价:%s,medicinei.price);prin tf(ntt品牌:%s,medicinei.brand);prin tf(ntt库存数量:%s,medicinei.inventory);prin tf(ntt是否修改(y/n);if(getch()=y) TOC o 1-5 h z printf(nt 请选择修改信息 );prin tf(nt1-修改药品名称);prin tf(nt2-修改药品编号);prin tf(nt3-修改单价);prin tf(nt4-修改品牌”);prin tf(nt5-
6、修改库存数量);printf(nt);printf(nt请选择您所要的服务:”);scan f(%s, &c);switch(c)case 1: printf(nt请输入新药品名称:);sca nf(%s,medici nei. name);break;case2:printf(nt 请输入新药品编号: %s);sca nf(%s,medici nei. nu mber);break;case3:printf(nt 请输入新单价:);sca nf(%s,medici nei.price);break;case4:printf(nt 请输入新品牌:);sca nf(%s,medici nei.b
7、ra nd);break;case5:printf(nt请输入新库存数量:”);sca nf(%s,medici nei.i nven tory);break;if(mark=0)prin tf(ntt药品信息修改完毕);printf(nt 是否继续修改?(Y/N):);if(getch()=y)modifyb yn ame();return;void list()int i;system(cls);if(n um!=0)printf(ttt 已为您显示所有药品信息 n);for (i=0;i nu m;i+)prin tf(ttt药品名称:%sn,medici nei. name);prin
8、 tf(ttt药品编号:%sn,medici nei. nu mber);prin tf(ttt单价:sn ”,medici nei.price);prin tf(ntt品牌:%sn,medicinei.brand);prin tf(ttt库存数量:%sn,medici nei.i nven tory);if(i+1 num)system(pause);printf(tttn);elseprintf(ttt系统中无任何记录n);prin tf(ttt按任意键返回主菜单:n);getch();return;int searchb yn ame()int mark=O;int i;printf(t
9、tt 按药品名称查找 n);char n ame20;printf(ttt 请输入药品名称:n);sca nf(%s, name);for(i=0;i nu m;i+)if (strcmp(medici nei. name ,n ame)=0)printf(ttt 以下是您查找的药品信息 n);prin tf(ttt药品名称:%s,medici nei. name);prin tf(ttt药品编号:%s,medici nei. number);prin tf(ttt单价:%s,medici nei.price);printf(ntt品牌:%s,medicinei.brand);prin tf(
10、ttt库存数量:%sn,medici nei.i nven tory);printf(tttn);mark+;if(i+1) num)prin tf(ttt是否继续查找相同名称的药品信息:(y/n)n);if(getch()=y | getch()=Y)con ti nue;elsereturn(0); elsegetch();return(O);if(mark = 0)prin tf(ttt没有您要查找的药品记录n);prin tf(ttt请按任意键返回主菜单n);getch();return(O);return 0;int searchb ynu mber()int mark=0;int
11、i;printf(ttt按药品编号查找-n);char nu mber10;printf(ttt请输入药品编号:n);sca nf(%s, nu mber);for(i=0;i nu m;i+)if (strcmp(medici nei. nu mber, nu mber)=0)n “);printf(ttt 以下是您查找的药品信息 -prin tf(ttt 单价:%s,medici nei.price);printf(ntt 品牌:%s,medicinei.brand);prin tf(ttt 库存数量:%sn,medici nei.i nven tory);printf(tttn ”);p
12、rin tf(ttt请按任意键返回主菜单n); mark+;getch();return(0);if (mark=0)printf(ttt没有改药品的信息n);prin tf(ttt请按任意键返回主菜单n);getch();return(0);return(0);void deleteb ynu mber()int i,j;int deletemark=0;char nu mber20;prin tf(ttt请输入要删除药品编号:n);sca nf(%s, nu mber);if(num=0)getch();return;for (i=0;i nu m;i+)if (strcmp(medici
13、 nei. nu mber, nu mber)=0)prin tf(ttt以下是您要删除的用户记录:n);prin tf(ttt 药品名称:%s,medici nei. name);prin tf(ttt 药品编号:%s,medici nei. number);prin tf(ttt 单价:%s,medicin ei.price);printf(ntt 品牌:%s,medicinei.brand);prin tf(ttt 库存数量:%sn,medici nei.i nven tory);printf(ttt是否删除?(y/n)”);if (getch()=y | getch()=Y)for (
14、j=i;j nu m_1;j+)medic in ej=medici nej+1;num-;deletemark+;printf(ttt 删除成功);printf(ttt 是否继续删除?(y/n);if (getch()=y | getch()=Y)deleteb ynu mber();return;elsereturn;con ti nue;if (deletemark=O)prin tf(ttt 没有该药品的记录”);printf(ttt 是否继续删除?(y/n)”); if(getch()=y | getch()=Y) deleteb ynu mber();return;return;v
15、oid deleteb yn ame()int a=0;int fin dmark=0;int j;int deletemark=0;int i;char n ame20;prin tf(ttt请输入要删除药品名称:n);sca nf(%s, name);for (i=a;i nu m;i+)if(strcmp(medici nei. name, name)=0)prin tf(ttt以下是您要删除的药品信息:”);fin dmark+;printf(ttt);prin tf(ttt 单价:%s,medici nei.price);printf(ntt品牌:%s,medicinei.brand
16、);prin tf(ttt 库存数量:%sn,medici nei.i nven tory);printf(ttt);printf(ttt是否删除?(y/n);if (getch()=y | getch() = Y)for(j=i;j nu m_1;j+)medic in ej=medici nej+1;num-;deletemark+;printf(ttt 删除成功);if(i+1) num)prin tf(ttt是否继续删除相同名称的药品信息?(y/n);if (getch()=y)a=i;con ti nue;printf(ttt是否继续删除?(y/n);if (getch()=y)de
17、leteb yn ame();return;if(i+1) num)if (getch()=y | getch() = Y)a=i;con ti nue;elsecon ti nue;if (deletemark=O) &(fin dmark=0)prin tf(ttt没有该药品的记录);prin tf(ttt是否继续删除?(y/n);if(getch()=y | getch() = Y) deleteb ynu mber();return;else if (fin dmark!=0)prin tf(ttt没有重名信息”);prin tf(ttt没有该药品的记录);prin tf(ttt是否继
18、续删除?(y/n);if(getch()=y | getch() = Y) deleteb ynu mber();return;int dele()/删除记录char choic;prin tf(ttt 请选择:);choic=getch();switch (choic)case 1:deleteb ynu mber();break;case 2:deleteb yn ame();break;return(O);int sortbyprice()/按药品单价进行排序int i,j;struct medici ne tmp;for (i=1;i nu m;i+)if(strcmp(medici nei.price,medici nei-1.price)0)tmp=medici nei;j=i
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 院学生会生活部工作总结
- 公司管理制度完整版(25篇)
- 征文大赛获奖感言(31篇)
- 河北省秦皇岛市(2024年-2025年小学五年级语文)统编版小升初模拟(下学期)试卷及答案
- 2024年羧甲淀粉钠项目资金筹措计划书代可行性研究报告
- 2024年金属层状复合材料项目资金申请报告代可行性研究报告
- 2024年医用射线防护用品装置项目资金筹措计划书代可行性研究报告
- 二十四式太极拳教案
- 定制化工程测绘技术服务规范征求意见稿
- 上海市县(2024年-2025年小学五年级语文)人教版能力评测((上下)学期)试卷及答案
- 小眼睛大手术-眼科显微手术技能知到章节答案智慧树2023年温州医科大学
- 2023石景山区高三一模数学试卷
- 大学生劳动教育通论知到章节答案智慧树2023年大连海洋大学
- 国网基建各专业考试题库大全-质量专业-下(判断题汇总)
- 傅雷家书读后感3000字(3篇)
- 议论文阅读训练10篇(附答案及解析)
- 山西省普通高级中学办学基本标准
- 房建工程二次预埋施工技术交底强弱电管线预埋
- 血液透析个案护理两篇
- 工会会议记录范文
- YY 0636.1-2008医用吸引设备第1部分:电动吸引设备安全要求
评论
0/150
提交评论