【文章內(nèi)容簡介】 f ((fq=fopen(file2, wb))==NULL) { puts(\n文件不能打開！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 } } while (fq==NULL)。 do { puts(\n\t正在創(chuàng)建掛號數(shù)據(jù)文件 ...)。 puts(\n請輸入文件名： )。 gets(file3)。 cls()。 if ((fr=fopen(file3, wb))==NULL) { puts(\n文件不能打開！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 } } while (fr==NULL)。 for (p=head。 p。 p=pnext) { fwrite(p, Troom_len, 1, fp)。 for (q=psub。 q。 q=qnext) { fwrite(q, Tpro_len, 1, fq)。 for (r=qsub。 r。 r=rnext) fwrite(r, Treg_len, 1, fr)。 } } puts(\n保存成功！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 changed=0。 fclose(fp)。 計算機 0710 班 XXX 學(xué)號： XXX 17 fclose(fq)。 fclose(fr)。 } /***************************************************************/ /************************* 讀取文件 **************************/ /***************************************************************/ void Load() { FILE *fp, *fq, *fr。 int t。 char file1[20], file2[20], file3[20]。 if (changed) { char mand。 puts(\n您尚未保存，是否保存？ Y/N?)。 mand=getchar()。 gets(rest)。 cls()。 if (mand==39。Y39。 || mand==39。y39。) Save()。 } ClearAll()。 t=0。 do { puts(\n正在載入科室數(shù)據(jù)文件 ...)。 t++。 puts(\n請輸入文件名： )。 gets(file1)。 cls()。 if ((fp=fopen(file1, rb))==NULL) { puts(\n文件不能打開！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 if (t3) { puts(\n讀取失敗，返回主菜單 )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 return。 } } } while (fp==NULL)。 t=0。 do { 計算機 0710 班 XXX 學(xué)號： XXX 18 puts(\n正在載入專家數(shù) 據(jù)文件 )。 puts(\n請輸入文件名： )。 gets(file2)。 cls()。 if ((fq=fopen(file2, rb))==NULL) { puts(\n文件不能打開！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 if (t3) { puts(\n讀取失敗，返回主菜單 )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 return。 } } } while (fq==NULL)。 t=0。 do { puts(\n正在載入掛號數(shù)據(jù)文件 )。 puts(\n請輸入文件名： )。 gets(file3)。 cls()。 if ((fr=fopen(file3, rb))==NULL) { puts(\n文件不能打開！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 if (t3) { puts(\n讀取失敗，返回主菜單 )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 return。 } } } while (fr==NULL)。 head=NULL。 while (!feof(fp)) { p=(struct Troom *)malloc(Troom_len)。 fread(p, Troom_len, 1, fp)。 psub=NULL。 if (!feof(fp)) { 計算機 0710 班 XXX 學(xué)號： XXX 19 pnext=head。 head=p。 } } while (!feof(fq)) { q=(struct Tpro *)malloc(Tpro_len)。 fread(q, Tpro_len, 1, fq)。 qsub=NULL。 Search_room_with_num(qroom_num)。 if (!feof(fq) amp。amp。 p) { qnext=psub。 psub=q。 } } while (!feof(fr)) { r=(struct Treg *)malloc(Treg_len)。 fread(r, Treg_len, 1, fr)。 for (p=head。 p。 p=pnext) { Search_pro_with_num(rpro_num)。 if (q) break。 } if (!feof(fr) amp。amp。 q) { rnext=qsub。 qsub=r。 } } puts(\n載入成功 ！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 changed=0。 fclose(fp)。 fclose(fq)。 fclose(fr)。 } /***************************************************************/ /************************* 修改信息 **************************/ /***************************************************************/ void Modify() { char mand1, mand2。 int flag2。 int t。 計算機 0710 班 XXX 學(xué)號： XXX 20 while (1) { t=0。 do { puts(\n請選擇您想修改的信息： \n)。 puts(\t1: 科室信息 \n)。 puts(\t2: 專家信息 \n)。 puts(\t3: 掛號信息 \n)。 printf(\t)。 PrnM()。 puts(\n)。 mand1=getchar()。 gets(rest)。 cls()。 if ((mand139。139。 || mand139。339。) amp。amp。 mand1!=39。M39。 amp。amp。 mand1!=39。m39。) { puts(\n無此選項！請重新選擇 )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 } } while ((mand139。139。 || mand139。339。) amp。amp。 mand1!=39。M39。 amp。amp。 mand1!=39。m39。)。 switch (mand1) { case 39。139。: printf(\n請?zhí)峁┛剖业南嚓P(guān)信息， )。 flag=0。 Search_room()。 if (flag) continue。 if (p) { t=0。 flag2=0。 while (1) { do { puts(\n請選擇您想修改的信息： \n)。 puts(\t1: 科室號 \n)。 puts(\t2: 科室名 \n)。 puts(\t3: 負責(zé)人 \n)。 puts(\t4: 電話 \n)。 printf(\t)。 PrnB()。 puts(\n)。 mand2=getchar()。 gets(rest)。 cls()。 if ((mand239。139。 || mand239。439。) amp。amp。 mand2!=39。B39。 amp。amp。 mand2!=39。b39。) { puts(\n無此選項！請重新選擇 )。 printf(按 ENTER以繼續(xù) ...)。 計算機 0710 班 XXX 學(xué)號： XXX 21 gets(rest)。 cls()。 } } while ((mand239。139。 || mand239。439。) amp。amp。 mand2!=39。B39。 amp。amp。 mand2!=39。b39。)。 switch (mand2) { case 39。139。: puts(\n請輸入新的科室號 )。 gets(pnum)。 cls()。 for (q=psub。 q。 q=qnext) strcpy(qroom_num, pnum)。 break。 case 39。239。: puts(\n請輸入新的科室名 )。 gets(pname)。 cls()。 break。 case 39。339。: puts(\n請輸入新的負責(zé)人姓名 )。 gets(pman)。 cls()。 break。 case 39。439。: puts(\n請輸入新的電話 )。 gets(ptel)。 cls()。 break。 case 39。B39。: case 39。b39。: flag2=1。 } if (flag2) break。 puts(\n修改成功！ )。 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 changed=1。 } } else { puts(\n錯誤！科室不存在 )。 t++。 if (t==5) { puts(錯誤太多！返回主菜單 )。 計算機 0710 班 XXX 學(xué)號： XXX 22 printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 cls()。 return。 } printf(按 ENTER以繼續(xù) ...)。 gets(rest)。 c