✌ This is a project in C program languege using file i/o for management information of hospital include:
- Doctor
- Patient
- Room
- Create function input(scanf) to avoid an error.
- Store information using file.
- Style & Interface
- Security (User Login)
Source Code Of Hospital Management System
#include<stdio.h>
#include<conio.h>
#include<ctype.h>
#include<string.h>
#include<stdlib.h>
#include<dos.h>
#include<time.h>
#define PASSWORD 0
#define NUMBER 1
#define LETTER 2
#define ALLINPUT 3
#define _pwd "PWD.BIN"
#define _room "ROOM.BIN"
#define _doct "DOCTOR.BIN"
#define _pati "PATIENT.BIN"
#define _type "TYPE.BIN"
#define EMPTY 'n'
#define STAY 'y'
FILE *f_ro;
FILE *f_doc;
FILE *f_pat;
FILE *f_ty;
FILE *f_pwd;
struct Login{
char pwd[15];
char usr[15];
};
struct Types{
int co;
char na[10];
float pri;
};
struct Room{
int no;
struct Types type;
char sta;
};
time_t current;
struct tm *gt;
struct DateTime {
int day;
int mon;
int year;
int hour;
int min;
int sec;
};
struct Doctor{
char id[10];
char fname[15];
char lname[15];
char sex;
char blo[5];
struct date birth;
char nat[20];
char spec[20];
struct DateTime join;
char tel[20];
char email[35];
char addr[40];
};
struct Patient{
char id[10];
char fname[15];
char lname[15];
char sex;
char blo[5];
struct date birth;
char prob[35];
char nat[20];
char tel[20];
char addr[40];
struct DateTime regi;
int ro;
};
/*Function Declaration*/
void help();
int login(int);
int resetpwd(int);
int changepwd();
void box(int,int,int,int,int);
void updatedoc(int);
void sortroom(Room *ro,int n);
int blockey();
void sortpat(Patient *pat,int n);
void sortpatname(Patient *pat,int n);
void sortdoc(Doctor *doc,int n);
void sorttype(Types *type,int n);
int getFileElement(const char *name, int size);
int checkf_pwd();
void drawbox(int left, int top, int right, int bottom);
void notice(char text[30],int x1,int y1,int x2,int y2);
void notice(char text[2][30],int x1,int y1,int x2,int y2);
void drawwindow(char head[30],int x1, int y1, int x2, int y2, int c);
int confirm(char str[15]);
void updatepat(int);
void welc();
void inputdat(int &day,int &mon,int &year,int c);
void createfile();
void addtype();
void checkoutinput(int opt);
int checkout(int id);
int selecttype();
char selectsex();
int selectblood();
int findroom(int no);
int finddocid(char id[10]);
int findpatid(char id[10]);
void addroom();
int addpatient(int);
void setroomEMPTY(int);
void setroomSTAY(int);
void patidetail(char id[10]);
void docdetail(char id[10]);
void adddoc();
void deletetype(int);
void deletetypeinput();
void deleteroom();
void deletepat(char id[10]);
int deletedoc(char id[10]);
void deletedocinput(int opt);
int viewpat(char head[30],Patient *source,int n,int opt);
int viewdoc(char head[30],Doctor *source,int n,int opt);
void findpat(int opt);
void finddoc(int opt);
void updateroom();
int viewroom(char head[30],Room *source,int n);
void allroom();
void allpat();
void alldoc();
void findviewroom();
void availroom();
void alltype();
int menu(int);
int doctor();
int patient();
int dropmenu(char menu[7][20],int x1,int y1,int x2,int y2,int opt);
void box(int x1,int y1,int x2,int y2,int c);
void clrwin();
int program();
int about();
int room();
char *input(int,int,int);
float inputf(int,int);
/*end Function Declaration*/
void main(){
createfile();
_setcursortype(0);
int opt=0;
if(login(3)==1)
goto start;
exit(0);
start:
welc();
textbackground(14);
clrscr();
gotoxy(22,1);textcolor(9);cprintf("==== Hospital Management System ====");
do{
switch(menu(opt)){
case 0:opt=program();break;
case 1:opt=doctor();break;
case 2:opt=patient();break;
case 3:opt=room();break;
case 4:opt=about();break;
}
}while(1);
}
int resetpwd(int opt){
struct Login log;
int s,sh=0,h=0;
char usr[20],pwd[20],ch;
char code[8];
char head[2][30]={"SET USER","RESET USER"};
int t=0;
do{
h=checkf_pwd();
if(opt==1){
clrwin();
}else{
textbackground(9);
window(1,1,80,25);
clrscr();
gotoxy(22,4);textcolor(9);cprintf("==== Hospital Management System ====");
box(2,2,79,24,15);
}
drawwindow(head[h],20,7,60,19,12);
textcolor(15);
gotoxy(1,4); cprintf("Enter Code of program:");
gotoxy(1,6); cprintf("Enter New Username:");
gotoxy(1,8); cprintf("Enter New Password:");
if(sh==1){
textcolor(3);
gotoxy(24,4);cprintf("%s",code);
gotoxy(21,6);cprintf("%s",usr);
}else{
gotoxy(24,4); strcpy(code,input(1,10,3));
if(strcmp(code,"00")==0) {s=0;break;}
gotoxy(21,6); strcpy(usr,input(2,14,3));
if(strcmp(usr,"00")==0) {s=0;break;}
}
gotoxy(21,8); strcpy(pwd,input(3,14,3));
if(strcmp(pwd,"00")==0) {s=0;break;}
else if(strlen(pwd)<8){sh=1;notice(">Password too short<",24,10,55,15);blockey();continue;}
if(atol(code)!=111110){
sound(888);delay(33);nosound();
textbackground(0);
window(19,11,63,17);
clrscr();
textbackground(3);
textcolor(15);
window(18,10,62,16);
clrscr();
drawbox(1,1,45,7);
gotoxy(5,2); textcolor(15);cprintf(">PLEASE ENTER CORRECT CODE OF PROGRAM<");
gotoxy(3,3);printf("<You have %02d more time to set User Login>",2-t);
gotoxy(22,6);textbackground(2);cprintf(" OK ");
sh=0;
t++;
if(t>=3) {s=0;break;}
ch=blockey();
if(ch==13) {continue;}
else if(ch==27) {s=0;break;}
}else{
s=1;
strcpy(log.usr,usr);
strcpy(log.pwd,pwd);
f_pwd=fopen(_pwd,"wb");
fwrite(&log,sizeof(Login),1,f_pwd);
fclose(f_pwd);
notice("<Completely Successful>",24,10,55,15);
blockey();
break;
}
}while(1);
return s;
}
int changepwd(){
struct Login log;
int s,sh;
char ousr[20],opwd[20],ch,nusr[20],npwd[20];
char head[30]="CHANGE USER LOGIN";
int t=0;
do{
f_pwd=fopen(_pwd,"rb");
if(f_pwd==NULL) {
notice("<User Login hasn't set yet>",24,10,55,15);
fclose(f_pwd);
blockey();
break;
}
rewind(f_pwd);
fread(&log,sizeof(Login),1,f_pwd);
fclose(f_pwd);
clrwin();
drawwindow(head,20,7,60,19,12);
textcolor(15);
gotoxy(1,4); cprintf("Enter Old Username:");
gotoxy(1,6); cprintf("Enter Old Password:");
gotoxy(21,4); strcpy(ousr,input(2,30,3));
if(strcmp(ousr,"00")==0) {s=0;break;}
gotoxy(4,12),textcolor(15),cprintf("<<Press Shift+6 To Show PASSWORD>>");
gotoxy(21,6); strcpy(opwd,input(0,15,3));
if(strcmp(opwd,"00")==0) {s=0;break;}
if(strcmp(log.usr,ousr)!=0||strcmp(log.pwd,opwd)!=0){
sound(888);delay(33);nosound();
textbackground(0);
window(19,11,63,16);
clrscr();
textbackground(3);
textcolor(15);
window(18,10,62,16);
clrscr();
drawbox(1,1,45,7);
gotoxy(8,2);printf(">Incorrect Username or Password<");
gotoxy(2,3);printf("<You have %d more time to reset User Login>",2-t);
gotoxy(22,6);textbackground(2);cprintf(" OK ");
t++;
if(t>=3) {s=0;break;}
ch=blockey();
if(ch==13) {continue;}
else if(ch==27) {s=0;break;}
}else{
re: clrwin();
drawwindow(head,22,7,57,17,12);
textcolor(15);
gotoxy(1,4); cprintf("Enter New Username:");
gotoxy(1,6); cprintf("Enter New Password:");
if(sh==1){
gotoxy(21,4);textcolor(3);cprintf("%s",nusr);
}else{
gotoxy(21,4); strcpy(nusr,input(2,30,3));
if(strcmp(nusr,"00")==0) {s=0;break;}
}
gotoxy(21,6); strcpy(npwd,input(3,15,3));
if(strcmp(npwd,"00")==0) {s=0;break;}
else if(strlen(npwd)<8){sh=1;notice(">Password too short<",24,10,55,15);blockey();goto re;}
s=1;
strcpy(log.usr,nusr);
strcpy(log.pwd,npwd);
f_pwd=fopen(_pwd,"wb");
fwrite(&log,sizeof(Login),1,f_pwd);
fclose(f_pwd);
notice("<Completely Successful>",24,10,55,15);
blockey();
break;
}
}while(1);
return s;
}
int blockey(){
char ch;
ch: ch=getch();
if(ch!=13&&ch!=27)goto ch;
return ch;
}
void box(int x1,int y1,int x2,int y2,int c){
int y,x,i;
gotoxy(x1,y1);textcolor(c);cprintf("%c",201);
for(x=x1+1;x<x2;x++){
gotoxy(x,y1);textcolor(c);cprintf("%c",205);
}
gotoxy(x2,y1);textcolor(c);cprintf("%c",187);
for(y=y1+1;y<y2;y++){
gotoxy(x1,y);textcolor(c);cprintf("%c",186);
gotoxy(x2,y);textcolor(c);cprintf("%c",186);
}
gotoxy(x1,y2);textcolor(c);cprintf("%c",200);
for(i=x1+1;i<x2;i++){
gotoxy(i,y2);textcolor(c);cprintf("%c",205);
}
gotoxy(x2,y2);textcolor(c);cprintf("%c",188);
}
int checkf_pwd(){
int f=1;
f_pwd=fopen(_pwd,"rb");
if(f_pwd==NULL) {
f=0;
}
return f;
}
int login(int n){
struct Login log;
char usr[15],pwd[15],usri[15],pwdi[15],ch;
int s=0,i=0;
do{
f_pwd=fopen(_pwd,"rb");
if(f_pwd==NULL) {
s=1;
fclose(f_pwd);
break;
}
rewind(f_pwd);
fread(&log,sizeof(Login),1,f_pwd);
textcolor(9);
textbackground(9);
window(1,1,80,25);
clrscr();
gotoxy(30,4);printf("===== User Login =====");
gotoxy(22,7);printf("Welcome to Hospital Management System");
gotoxy(21,8);printf("Please Enter Login Information to Start");
box(2,2,79,24,15);
gotoxy(30,12); textcolor(15);cprintf("Username:");
gotoxy(30,13); textcolor(15);cprintf("Password:");
gotoxy(40,12); strcpy(usri,input(2,30,3));
if(strcmp(usri,"00")==0) {fclose(f_pwd);exit(0);}
gotoxy(23,18),textcolor(15),cprintf("<<Press Shift+6 To Show PASSWORD>>");
gotoxy(40,13); strcpy(pwdi,input(0,15,3));
if(strcmp(pwdi,"00")==0) {fclose(f_pwd);exit(0);}
if(strcmp(log.usr,usri)!=0||strcmp(log.pwd,pwdi)!=0){
gotoxy(25,16); textcolor(15);cprintf(">Incorrect Username or Password<");
gotoxy(27,17); textcolor(15);cprintf("<You have %d more attempt(s)>",n-i-1);
gotoxy(15,18); textcolor(15);cprintf("<<Press R to reset User Login or Enter to try again>>");
i++;
if(i>=n) {fclose(f_pwd);exit(0);}
a: ch=toupper(getch());
if(ch=='R') {
if(confirm("Reset PWD")==1){
s=resetpwd(0);
if(s==0) {fclose(f_pwd);continue;}
else {fclose(f_pwd);break;}
}else {fclose(f_pwd);continue;}}
else if(ch==13){fclose(f_pwd);continue;}
else if(ch==27) {fclose(f_pwd);exit(0);}
else goto a;
}else {s=1;fclose(f_pwd);break; }
}while(1);
return s;
}
void removeusr(){
struct Login log;
char head[30]="REMOVE USER LOGIN";
char usr[15],pwd[15],usri[15],pwdi[15],ch;
int i=0;
do{
f_pwd=fopen(_pwd,"rb");
if(f_pwd==NULL) {
notice("<User Login hasn't set yet>",24,10,55,15);
blockey();
break;
}
rewind(f_pwd);
fread(&log,sizeof(Login),1,f_pwd);
clrwin();
drawwindow(head,20,7,60,19,12);
gotoxy(9,5); textcolor(15);cprintf("Username:");
gotoxy(9,7); textcolor(15);cprintf("Password:");
gotoxy(19,5); strcpy(usri,input(2,30,3));
if(strcmp(usri,"00")==0) {fclose(f_pwd);break;}
gotoxy(4,12),textcolor(15),cprintf("<<Press Shift+6 To Show PASSWORD>>");
gotoxy(19,7); strcpy(pwdi,input(0,15,3));
if(strcmp(pwdi,"00")==0) {fclose(f_pwd);break;;}
if(strcmp(log.usr,usri)!=0||strcmp(log.pwd,pwdi)!=0){
textbackground(0);
window(17,11,65,17);
clrscr();
textbackground(3);
textcolor(15);
window(16,10,64,16);
clrscr();
drawbox(1,1,49,7);
gotoxy(9,2); textcolor(15);cprintf(">Incorrect Username or Password<");
gotoxy(4,3);printf("<You have %d more time to remove User Login>",2-i);
gotoxy(24,6);textbackground(2);cprintf(" OK ");
i++;
if(i>=3) {fclose(f_pwd);break;}
ch=blockey();
if(ch==13){fclose(f_pwd);continue;}
else if(ch==27) {fclose(f_pwd);break;}
}else{
fclose(f_pwd);
remove(_pwd);
notice("User Login Removed",24,10,55,15);
blockey();
break;
}
}while(1);
}
int program(){
int opt=0,close=1;
char menu[2][20]={"User Login >","Quit"};
char menu1[3][20]={"Reset","Remove","Change"};
do{
clrwin();
if(checkf_pwd()==0){
strcpy(menu1[0],"Set");
}else{
strcpy(menu1[0],"Reset");
}
switch(dropmenu(menu,2,3,18,6,opt)){
case -2:close=0;break;
case -1:close=0;break;
case 0: switch(dropmenu(menu1,19,4,32,8,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=0;
break;
case 0: resetpwd(1);opt=0;break;
case 1: removeusr();opt=0;break;
case 2: changepwd();opt=0;break;
}
break;
case 1: if(confirm("Quit")==1) exit(0);
else {opt=1;break;}
}
}while(close);
return 0;
}
int room(){
char menu[4][20]={"All rooms","Available","Manage room >","Manage type >"};
char menu1[4][20]={"Add new","Delete","Search","Update"};
char menu2[3][20]={"Add new","Delete","All types"};
int opt=0,close=1;
do{
clrwin();
switch(dropmenu(menu,22,3,39,8,opt)){
case -2:close=0;break;
case -1:close=0;break;
case 0:allroom();opt=0;break;
case 1:availroom();opt=1;break;
case 2: switch(dropmenu(menu1,40,6,52,11,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=2;
break;
case 0: clrwin();addroom();opt=2;break;
case 1: clrwin();deleteroom();opt=2;break;
case 2: clrwin();findviewroom();opt=2;break;
case 3: clrwin();updateroom();opt=2;break;
}break;
case 3: switch(dropmenu(menu2,40,7,54,11,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=3;
break;
case 0: clrwin();addtype();opt=3;break;
case 1: clrwin();deletetypeinput();opt=3;break;
case 2: clrwin();alltype();opt=3;break;
}break;
}
}while(close);
return 3;
}
int menu(int select){
char ch, menu[5][20]={"\360","Doctor","Patient","Room","About"};
int i;
struct date da;
textbackground(9);
window(2,2,79,24);
clrscr();
getdate(&da);
do{
textbackground(11);
textcolor(0);
window(2,2,79,2);
clrscr();
for(i=0;i<5;i++)
if(i==select){
textbackground(2);
textcolor(15);
cprintf(" %s ",menu[i]);
}else
printf(" %s ",menu[i]);
gotoxy(68,1);printf("%02d/%02d/%d",da.da_day,da.da_mon,da.da_year);
ch=getch();
switch(ch){
case 75:select--;
if(select==-1) select=4;
break;
case 77:select++;
if(select==5) select=0;
break;
case 80:if(select<4)
ch=13;
break;
case 27:select=0;break;
}
}while(ch!=13);
return select;
}
int doctor(){
char menu[5][20]={"Add","Delete >","Update >","Search >","View All"};
char menu1[3][20]={"By ID","By First Name","By Last Name"};
char menu2[3][20]={"All","Name","Specialty"};
char menu3[4][20]={"By ID","By First Name","By Last Name","By Specialty"};
int opt=0,close=1;
do{
clrwin();
switch(dropmenu(menu,5,3,20,9,opt)){
case -2:close=0;break;
case -1:close=0;break;
case 0:adddoc();opt=0;break;
case 1: switch(dropmenu(menu1,21,5,39,9,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=1;
break;
case 0: clrwin();deletedocinput(1);opt=1;break;
case 1: clrwin();deletedocinput(2);opt=1;break;
case 2: clrwin();deletedocinput(3);opt=1;break;
}break;
case 2:switch(dropmenu(menu2,21,6,39,10,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=2;
break;
case 0: clrwin();updatedoc(1);opt=2;break;
case 1: clrwin();updatedoc(2);opt=2;break;
case 2: clrwin();updatedoc(3);opt=2;break;
}break;
case 3: switch(dropmenu(menu3,21,7,38,12,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=3;
break;
case 0: clrwin();finddoc(1);opt=3;break;
case 1: clrwin();finddoc(2);opt=3;break;
case 2: clrwin();finddoc(3);opt=3;break;
case 3: clrwin();finddoc(4);opt=3;break;
}break;
case 4:alldoc();opt=4;break;
}
}while(close);
return 1;
}
int patient(){
char menu[5][20]={"Check in","Check out by >","Update >","Search by >","View All"};
char menu1[4][20]={"ID","First Name","Last Name","Room No."};
char menu2[3][20]={"All","Name","Room No."};
char menu3[4][20]={"ID","Name","Room No.","Check in Date"};
int opt=0,close=1;
do{
clrwin();
switch(dropmenu(menu,13,3,31,9,opt)){
case -2:close=0;break;
case -1:close=0;break;
case 0:addpatient(0);opt=0;break;
case 1: switch(dropmenu(menu1,32,5,47,10,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=1;
break;
case 0: clrwin();checkoutinput(1);opt=1;break;
case 1: clrwin();checkoutinput(2);opt=1;break;
case 2: clrwin();checkoutinput(3);opt=1;break;
case 3: clrwin();checkoutinput(4);opt=1;break;
}break;
case 2: switch(dropmenu(menu2,32,6,45,10,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=2;
break;
case 0: clrwin();updatepat(1);opt=2;break;
case 1: clrwin();updatepat(2);opt=2;break;
case 2: clrwin();updatepat(3);opt=2;break;
}break;
case 3: switch(dropmenu(menu3,32,7,50,12,0)){
case -2:close=0;opt=0;break;
case -1:clrwin();
opt=3;
break;
case 0: clrwin();findpat(1);opt=3;break;
case 1: clrwin();findpat(2);opt=3;break;
case 2: clrwin();findpat(3);opt=3;break;
case 3: clrwin();findpat(4);opt=3;break;
}break;
case 4:clrwin();allpat();opt=4;break;
}
}while(close);
return 2;
}
int dropmenu(char menu[7][20],int x1,int y1,int x2,int y2,int opt){
int i,select;
char ch;
select=opt;
if(opt==-1) goto end;
do{
textbackground(7);
textcolor(0);
window(x1,y1,x2,y2);
clrscr();
drawbox(1,1,x2-x1+1,y2-y1+1);
gotoxy(3,2+select);
textbackground(2);
for(i=0; i<x2-x1-3; i++) {
cprintf(" ");
}
for(i=0;i<y2-y1-1;i++){
gotoxy(4,2+i);
if(i==select){
textcolor(15);
cprintf("%s",menu[i]);
}else
printf("%s",menu[i]);
}
ch=getch();
switch(ch){
case 72:select--;
if(select==-1) select=y2-y1-2;
break;
case 80:select++;
if(select==y2-y1-1) select=0;
break;
case 8: ch=13;opt=-1;
break;
case 75:ch=13;opt=-1;
break;
case 13:opt=select;
break;
case 77:if(strstr(menu[select],">")!=0)
opt=select,ch=13;
break;
case 27:ch=13;opt=-2;
break;
}
}while(ch!=13);
end:
return opt;
}
void clrwin(){
textbackground(9);
textcolor(WHITE);
window(2,3,79,24);
clrscr();
}
void sortroom(Room *ro,int n){
int i,j;
Room temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(ro[i].no>ro[j].no){
temp=ro[i];
ro[i]=ro[j];
ro[j]=temp;
}
}
void sortpat(Patient *pat,int n){
int i,j;
Patient temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(pat[i].ro>pat[j].ro){
temp=pat[i];
pat[i]=pat[j];
pat[j]=temp;
}
}
void sortpatname(Patient *pat,int n){
int i,j;
char *fullname[40];
Patient temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++){
strcpy(fullname[i],pat[i].fname);
strcat(fullname[i]," ");
strcat(fullname[i],pat[i].lname);
strcpy(fullname[j],pat[j].fname);
strcat(fullname[j]," ");
strcat(fullname[j],pat[j].lname);
if(stricmp(fullname[i],fullname[j])>1){
temp=pat[i];
pat[i]=pat[j];
pat[j]=temp;
}
}
}
void sortdoc(Doctor *doc,int n){
int i,j;
Doctor temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(stricmp(doc[i].id,doc[j].id)>1){
temp=doc[i];
doc[i]=doc[j];
doc[j]=temp;
}
}
void sorttype(Types *type,int n){
int i,j;
Types temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(type[i].co>type[j].co){
temp=type[i];
type[i]=type[j];
type[j]=temp;
}
}
int getFileElement(const char *name, int size) {
FILE *source = fopen(name,"rb+");
fseek(source,0,SEEK_END);
size = ftell(source)/size;
fclose(source);
return size;
}
void drawbox(int left, int top, int right, int bottom) {
int i;
for(i=0; i<right-left-1; i++) {
if(i==0) {
printf(" \332");
} else if(i==right-left-2) printf("\277");
else printf("\304");
}
for(i=0; i<bottom-top-1; i++) {
gotoxy(2,i+2);
printf("\263");
gotoxy(right-left,i+2);
printf("\263");
}
gotoxy(1,bottom-top+1);
for(i=0; i<right-left-1; i++) {
if(i==0) {
printf(" \300");
} else if(i==right-left-2) printf("\331");
else printf("\304");
}
}
void notice(char text[30],int x1,int y1,int x2,int y2){
textbackground(0);
window(x1+1,y1+1,x2+1,y2+1);
clrscr();
textbackground(3);
textcolor(15);
window(x1,y1,x2,y2);
clrscr();
drawbox(1,1,x2-x1+1,y2-y1+1);
gotoxy((x2-x1+3)/2-strlen(text)/2,2);printf("%s",text);
gotoxy((x2-x1+2)/2,5);textbackground(2);cprintf(" OK ");
}
void notice(char text[2][30],int x1,int y1,int x2,int y2){
textbackground(0);
window(x1+1,y1+1,x2+1,y2+1);
clrscr();
textbackground(3);
textcolor(15);
window(x1,y1,x2,y2);
clrscr();
drawbox(1,1,x2-x1+1,y2-y1+1);
gotoxy((x2-x1+3)/2-strlen(text[0])/2,2);printf("%s",text[0]);
gotoxy((x2-x1+3)/2-strlen(text[1])/2,3);printf("%s",text[1]);
gotoxy((x2-x1+2)/2,5);textbackground(2);cprintf(" OK ");
}
void drawwindow(char head[30],int x1, int y1, int x2, int y2, int c) {
textbackground(7);
textcolor(0);
window(x1-3,y1-2,x2+3,y1-2);
clrscr();
gotoxy(((x2+3)-(x1-3)+3-strlen(head))/2,1);printf("%s",head);
textbackground(c);
textcolor(WHITE);
window(x1-3,y1-1,x2+3,y2+1);
clrscr();
drawbox(x1-3, y1-1, x2+3, y2+1);
window(x1,y1,x2+1,y2);
}
int confirm(char str[15]){
char conf[2][5]={"No","Yes"};
int i,ch,select=0;
textbackground(9);
window(2,24,79,24);
clrscr();
textbackground(0);
window(24,10,57,18);
clrscr();
textbackground(14);
window(23,9,56,17);
clrscr();
drawbox(2,1,35,9);
gotoxy((33-(11+strlen(str)))/2,3);textcolor(15);
cprintf("<Confirm Your %s>",str);
do{
for(i=0;i<=1;i++){
if(i==select)
textbackground(2);
else textbackground(14);
textcolor(15);
gotoxy(8+i*16,7);
cprintf(" %s ",conf[i]);
}
ch=getch();
switch(ch){
case 75:select--;
if(select==-1) select=1;break;
case 77:select++;
if(select==2) select=0; break;
}
}while(ch!=13);
return select;
}
void inputdat(int &day,int &mon,int &year,int c){
char ch,reday[3]="",remon[3]="",reyear[5]="";
int d=0,m=0,y=0,i=0;
_setcursortype(2);
do{
ch=getch();
if(isdigit(ch)&&i<8){
if(i<2){
reday[d++]=ch;
textcolor(c);cprintf("%c",ch);
}else if(i<4){
remon[m++]=ch;
textcolor(c);cprintf("%c",ch);
}else if(i<8){
reyear[y++]=ch;
textcolor(c);cprintf("%c",ch);
}
if(i==1||i==3){textcolor(c);cprintf("/");}
i++;
}
if(ch == 8) {
if(i != 0) {
i--;
if(i<2){
reday[d--]=NULL;
textcolor(c);cprintf("\b \b");
}else if(i<4){
remon[m--]=NULL;
textcolor(c);cprintf("\b \b");
}else if(i<8){
reyear[y--]=NULL;
textcolor(c);cprintf("\b \b");
}
if(i==1||i==3){
printf("\b \b");
}
}
}
}while((ch != 13||i<8)&&ch!=27);
if(ch==13){
day=atoi(reday);
mon=atoi(remon);
year=atoi(reyear);
}
_setcursortype(0);
}
char *input(int type,int limit,int c){
char result[50]="";
char ch;
int index = 0;
_setcursortype(2);
do {
ch=getch();
if((type==3||type==0)&&index<limit){
if(isalpha(ch)||(ch>='!'&&ch<='@')||ch==95) {
result[index++]=ch;
if(type==0){
textcolor(c);cprintf("*");
}else{
textcolor(c);cprintf("%c",ch);
}
}
}
if(type==1&&index<limit){
if(ch>=40&&ch<=57) {
result[index++] = ch;
textcolor(c);cprintf("%c",ch);
}
}
if(type==2&&index<limit)
if(isalpha(ch)||ch==' ') {
result[index++]=ch;
textcolor(c);cprintf("%c",ch);
}
if(ch==8&&index>0) {
result[index--]=NULL;
printf("\b \b");
}
if(ch==94&&type==0&&index>0){
_setcursortype(0);
result[index]=0;
for(int i=0;i<index;i++)
printf("\b");
textcolor(c);cprintf("%s",result);
for(i=0;i<index;i++)
printf("\b");
delay(100);
for(i=0;i<index;i++)
textcolor(c),cprintf("*");
_setcursortype(2);
}
} while((ch != 13||index<1)&&ch!=27);
result[index] =0;
_setcursortype(0);
return ch==27?"00":result;
}
float inputf(int limit,int c){
int i=0,f=-1;
char result[50]="",ch;
_setcursortype(2);
do{
ch=getch();
if((ch>='0'&&ch<='9')||(ch=='.'&&f==-1)&&i<limit){
if(ch=='.')
f=i;
result[i++]=ch;
textcolor(c);cprintf("%c",ch);
}
if(ch==8&&i>0){
result[--i]='\0';
if(i==f)
f=-1;
printf("\b \b");
}
}while((ch!=13||i==0)&&ch!=27);
result[i]='\0';
_setcursortype(0);
return ch==27?0.0:atof(result);
}
void createfile(){
f_doc=fopen(_doct,"rb");
if(f_doc==NULL)
f_doc=fopen(_doct,"wb");
f_pat=fopen(_pati,"rb");
if(f_pat==NULL)
f_pat=fopen(_pati,"wb");
f_ty=fopen(_type,"rb");
if(f_ty==NULL)
f_ty=fopen(_type,"wb");
f_ro=fopen(_room,"rb");
if(f_ro==NULL)
f_ro=fopen(_room,"wb");
fclose(f_doc);
fclose(f_pat);
fclose(f_ty);
fclose(f_ro);
}
void addtype(){
struct Types type;
char ty[10];
int code,i,n;
float pri;
char ch;
char text[2][30]={"<Type added>","<<Enter to add another>>"};
char head[30]="NEW TYPE";
do{
s: clrwin();
help();
drawwindow(head,22,7,57,17,12);
gotoxy(10,3);textcolor(15);cprintf("Code: ");code=atoi(input(1,5,15));
if(code==0) break;
n=getFileElement(_type,sizeof(Types));
f_ty=fopen(_type,"rb");
rewind(f_ty);
for(i=0;i<n;i++){
fread(&type,sizeof(Types),1,f_ty);
if(code==type.co){
notice(">This code of type is exist<",24,10,55,15);
blockey();
fclose(f_ty);
goto s;
}
}
fclose(f_ty);
gotoxy(10,5);textcolor(15);cprintf("Type: ");strcpy(ty,input(2,15,15));
if(strcmp(ty,"00")==0) break;
f_ty=fopen(_type,"rb");
rewind(f_ty);
for(i=0;i<n;i++){
fread(&type,sizeof(Types),1,f_ty);
if(stricmp(type.na,ty)==0){
notice(">This name of type is exist<",24,10,55,15);
blockey();
fclose(f_ty);
goto s;
}
}
fclose(f_ty);
gotoxy(10,7);textcolor(15);cprintf("Price: "); pri=inputf(10,15); //problem with float
if(pri==0.0) break;
type.co=code;
strcpy(type.na,ty);
type.pri=pri;
f_ty=fopen(_type,"ab");
fwrite(&type,sizeof(Types),1,f_ty);
fclose(f_ty);
notice(text,24,10,55,15);
ch=blockey();
if(ch==27) break;
}while(1);
}
int selecttype(){
char ch;
int n,i,index=0,result=-1;
n=getFileElement(_type,sizeof(Types));
f_ty=fopen(_type,"rb");
struct Types *type=(Types*) calloc(n,sizeof(Types));
for(i=0;i<n;i++){
fread(&type[i],sizeof(Types),1,f_ty);
}
do {clrscr();
textcolor(2);
cprintf("%c %s %c",174,type[index].na,175);
do{
ch = getch();
} while(ch!=75 && ch!=77 && ch!=13 && ch!=27);
if(ch==77) {index++;if(index>n-1) index=0;}
else if(ch==75){ index--;if(index<0) index=n-1;}
} while(ch!=13 && ch!=27);
if(ch==13) {
result=type[index].co;
}
fclose(f_ty);
return result;
}
char selectsex(){
char sex[3]="FM";
char ch,result='n';
int n,i=0;
do {clrscr();
textcolor(2);
cprintf("%c %c %c",174,sex[i],175);
do{
ch = getch();
} while(ch!=75&&ch!=77&&ch!=13&&ch!=27);
if(ch==77) {i++;if(i>=2) i=0;}
else if(ch==75){ i--;if(i<=-1) i=1;}
} while(ch!=13&&ch!=27);
if(ch==13) {
result=sex[i];
}
return result;
}
int selectblood(){
char blood[8][4]={"O+","O-","A+","A-","B+","B-","AB+","AB-"};
char ch;
int result;
int n,i=0;
do {clrscr();
textcolor(2);
cprintf("%c %s %c",174,blood[i],175);
do{
ch=getch();
}while(ch!=75&&ch!=77&&ch!=13&&ch!=27);
if(ch==77) {i++;if(i>=8) i=0;}
else if(ch==75){ i--;if(i<=-1) i=7;}
} while(ch!=13&&ch!=27);
if(ch==13) {
result=i+1;
}else{
result=0;
}
return result;
}
int findroom(int no){
struct Room ro;
int i,n,f=0;
n=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0;i<n;i++){
fread(&ro,sizeof(Room),1,f_ro);
if(no==ro.no){
if(ro.sta==STAY){
f=2;
}else{
f=1;
}
}
}fclose(f_ro);
return f;
}
int findpatid(char id[10]){
struct Patient pat;
int i,n,f=0;
n=getFileElement(_pati,sizeof(Patient));
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0;i<n;i++){
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0){
f=1;
break;
}
}fclose(f_pat);
return f;
}
int finddocid(char id[10]){
struct Doctor doc;
int i,n,f=0;
n=getFileElement(_doct,sizeof(Doctor));
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(id,doc.id)==0){
f=1;
break;
}
}fclose(f_doc);
return f;
}
void addroom(){
struct Room ro;
struct Types type;
int no,i,n,nt,ty;
char ch;
char text[2][30]={"<Room added>","<<Enter to add another>>"};
char textt[2][30]={"<Do not have type of room>","<<Enter to add type>>"};
char head[30]="NEW ROOM";
do{
s: clrwin();
help();
drawwindow(head,22,7,57,17,12);
n=getFileElement(_type,sizeof(Types));
if(n==0){
notice(textt,24,10,55,15);
if(getch()!=13) break;
addtype();
clrwin();
drawwindow(head,22,7,57,17,12);
}
gotoxy(12,4);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
if(findroom(no)!=0){
notice(">This room is exist<",24,10,55,15);
blockey();
fclose(f_ro);
goto s;
}
gotoxy(12,6);textcolor(15);cprintf("Type: ");
window(39,12,51,12);
ty=selecttype();
if(ty==-1) break;
else {
nt=getFileElement(_type,sizeof(Types));
f_ty=fopen(_type,"rb+");
rewind(f_ty);
for(i=0;i<nt;i++){
fread(&type,sizeof(Types),1,f_ty);
if(type.co==ty){
ro.type.co=type.co;
stpcpy(ro.type.na,type.na);
ro.type.pri=type.pri;
}
}
fclose(f_ty);
}
ro.no=no;
ro.sta=EMPTY;
f_ro=fopen(_room,"ab");
fwrite(&ro,sizeof(Room),1,f_ro);
fclose(f_ro);
notice(text,24,10,55,15);
ch=blockey();
if(ch==27) break;
}while(1);
}
void checkoutinput(int opt){
struct Patient pat;
char fname[20],lname[20];
char id[10],ch,c;
int i,n,f=0,nf=0,no;
char head[30]="CHECKOUT PATIENT";
do{ n=getFileElement(_pati,sizeof(Patient));
f=0;nf=0;
Patient *source =(Patient*) calloc(n,sizeof(Patient));
clrwin();
help();
drawwindow("SEARCH PATIENT TO CHECKOUT",22,7,57,17,12);
if(n==0){
gotoxy(3,5);textcolor(15);
cprintf("<There are no Patient to Checkout>");
blockey();
break;
}
if(opt==1){
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
}
if(opt==2){
gotoxy(10,5);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strstr(pat.fname,fname)!=0||stricmp(pat.fname,fname)==0){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpatname(source,nf);
}
if(opt==3){
gotoxy(10,5);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(fname);
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strstr(pat.lname,lname)!=0||stricmp(pat.lname,lname)==0){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpatname(source,nf);
}
if(opt==4){
gotoxy(12,5);textcolor(15);cprintf("Room No.: "); no=atoi(input(1,5,15));
if(no==0) break;
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(pat.ro==no){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpat(source,nf);
}
if(f==1){
if(viewpat(head,source,nf,0)==13)
continue;
else break;
}
if(f==0){
notice("<Patient not found>",24,10,55,15);
blockey();
continue;
}
if(ch==27) break;
}while(1);
}
int checkout(char id[10]){
struct Room ro;
struct Patient pat;
struct date da;
int n,i,j,nr;
char ch;
char head[30]="CHECKOUT PATIENT";
char text[2][30]={"<Patient checked out>","<<Enter to checkout another>>"};
float paid=0,pay=0;
//Get period of staying.
double second;
int tperiod;
time(¤t);
struct tm period;
gt = localtime(¤t);
n=getFileElement(_pati,sizeof(Patient));
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0)
break;
}fclose(f_pat);
nr=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(j=0;j<nr;j++){
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==pat.ro)
break;
}fclose(f_ro);
period.tm_hour = pat.regi.hour;
period.tm_min = pat.regi.min;
period.tm_sec = 0;
period.tm_year = pat.regi.year-1900;
period.tm_mon = pat.regi.mon-1;
period.tm_mday = pat.regi.day;
second = difftime(current,mktime(&period));
time(¤t);
gt = localtime(¤t);
if(pat.regi.day==gt->tm_mday || (gt->tm_mday - pat.regi.day==1 && gt->tm_hour <= 12)){
tperiod=1;
} else tperiod = 1+((second/60)/60)/24;
paid=(tperiod*ro.type.pri);
clrwin();
help();
drawwindow(head,12,7,69,20,5);
getdate(&da);
textcolor(14);
gotoxy(1,1);printf("Name : ");cprintf("%s %s",pat.fname,pat.lname);
gotoxy(1,3);printf("Sex : ");cprintf("%c",pat.sex);
gotoxy(1,5);printf("Room No. : ");cprintf("%03d",ro.no);
gotoxy(1,7);printf("Type : ");cprintf("%s",ro.type.na);
gotoxy(1,9);printf("Price : ");cprintf("$%.2f/day",ro.type.pri);
gotoxy(1,11);printf("Date in : ");cprintf("%02d/%02d/%d",pat.regi.day,pat.regi.mon,pat.regi.year);
gotoxy(1,13);printf("Date Out : ");cprintf("%02d/%02d/%d",gt->tm_mday,gt->tm_mon+1,gt->tm_year+1900);
drawwindow("PAYMENT",45,11,64,16,3);
gotoxy(1,2);printf("Other pay = $ "); pay=inputf(10,15); //problem with float
if(pay==0.0){ goto end;}
gotoxy(1,4);printf("Total pay = ");printf("$%.2f",paid+pay);
deletepat(id);
setroomEMPTY(pat.ro);
blockey();
notice(text,20,10,60,15);
ch=blockey();
end: return ch;
}
int addpatient(int no){
struct Room ro;
struct Patient pat;
struct date dai;
int i,n,nav=0,nr,opt,s=0;
int day=0,mon=0,year=0;
char ch;
char id[10],fname[15],lname[15],sex,blo[5],prob[20],nat[20],tel[20],addr[40];
char text[2][30]={"<Patient added>","<<Enter to add another>>"};
char blood[9][4]={"00","O+","O-","A+","A-","B+","B-","AB+","AB-"};
char head[30]="NEW PATIENT";
opt=no;
do{
getdate(&dai);
clrwin();
help();
drawwindow(head,12,7,69,20,12);
nr=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(i=0; i<nr; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.sta==EMPTY){
nav++;
}
}fclose(f_ro);
if(nav==0){
gotoxy(14,7);textcolor(15);cprintf("<There are no available rooms>");
blockey();
s=0;
break;
}
if(no==0){
gotoxy(1,1);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) {s=0;break;}
if(findroom(no)!=1){
notice("<Unavailable Room>",24,10,55,15);
blockey();
no=0;
continue;
}
}else{
gotoxy(1,1);textcolor(15);cprintf("Room No.: %03d",no);
}
gotoxy(1,3);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) {s=0;break;}
if(finddocid(id)==1||findpatid(id)==1){
notice("<This ID is exist>",24,10,55,15);
ch=blockey();
if(ch==27){s=0;break;}
else continue;
}
gotoxy(1,5);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) {s=0;break;}
else strupr(fname);
gotoxy(1,7);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) {s=0;break;}
else strupr(lname);
gotoxy(1,9);textcolor(15);cprintf("Sex: "); window(17,15,23,15);sex=selectsex();
if(sex=='n'){s=0;break;}
window(12,7,69,20);
date: gotoxy(1,11);textcolor(15);cprintf("Date of Birth: "); gotoxy(16,11);inputdat(day,mon,year,15);
if(day==0||mon==0||year==0) {s=0;break;}
else if(day>31||mon>12||year<1900||year>dai.da_year||(mon>dai.da_mon&&year>=dai.da_year)||(day>dai.da_day&&mon>=dai.da_mon&&year>=dai.da_year)){
gotoxy(16,11);printf("DD/MM/YYYY");
day=0;mon=0;year=0;
goto date;
}
gotoxy(1,13);textcolor(15);cprintf("Address: "); strcpy(addr,input(3,39,15));
if(strcmp(addr,"00")==0) {s=0;break;}
gotoxy(30,1);textcolor(15);cprintf("Blood Group: ");window(54,7,61,7); strcpy(blo,blood[selectblood()]);
if(strcmp(blo,"00")==0) {s=0;break;}
window(12,7,69,20);
gotoxy(30,3);textcolor(15);cprintf("Problem: ");strcpy(prob,input(2,19,15));
if(strcmp(prob,"00")==0) {s=0;break;}
gotoxy(30,5);textcolor(15);cprintf("Tel: "); strcpy(tel,input(1,19,15));
if(strcmp(tel,"00")==0) {s=0;break;}
gotoxy(30,7);textcolor(15);cprintf("Nationality: "); strcpy(nat,input(2,19,15));
if(strcmp(nat,"00")==0) {s=0;break;}
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0; i<nr; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==no){
ro.sta=STAY;
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
fwrite(&ro,sizeof(Room),1,f_ro);
}
}fclose(f_ro);
time(¤t);
gt = localtime(¤t);
pat.ro=no;
strcpy(pat.id,id);
strcpy(pat.fname,fname);
strcpy(pat.lname,lname);
pat.sex=sex;
pat.birth.da_day=day;
pat.birth.da_mon=mon;
pat.birth.da_year=year;
strcpy(pat.addr,addr);
strcpy(pat.blo,blo);
strcpy(pat.prob,prob);
strcpy(pat.nat,nat);
strcpy(pat.tel,tel);
pat.regi.sec = gt->tm_sec;
pat.regi.min = gt->tm_min;
pat.regi.hour = gt->tm_hour;
pat.regi.day=gt->tm_mday;
pat.regi.mon=gt->tm_mon+1;
pat.regi.year=gt->tm_year+1900;
f_pat=fopen(_pati,"ab");
fwrite(&pat,sizeof(Patient),1,f_pat);
fclose(f_pat);
s=1;
if(opt!=0){
notice("<Patient added>",24,10,55,15);
blockey();
break;
}
notice(text,24,10,55,15);
ch=blockey();
if(ch==13)no=0;
if(ch==27)break;
}while(1);
return s;
}
void welc(){
textcolor(11);
textbackground(BLUE);
window(1,1,80,25);
clrscr();
gotoxy(23,3);printf("\x20\x5f\x20\x20\x20\x5f\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x5f\x20\x5f\x20\x20\x20\x20\x20\x20\x20\x20\x5f\x20");
gotoxy(23,22);printf("\x20\x20\x20\x20\x20\x20\x20\x7c\x5f\x5f\x5f\x2f");delay(100);
gotoxy(23,4);printf("\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x5f\x5f\x5f\x20\x20\x5f\x5f\x5f\x5f\x20\x5f\x20\x5f\x5f\x20\x7c\x5f\x7c\x20\x7c\x5f\x20\x5f\x5f\x20\x5f\x7c\x20\x7c");
gotoxy(23,21);printf("\x7c\x5f\x5f\x5f\x5f\x2f\x20\x5c\x5f\x5f\x2c\x20\x7c\x5f\x5f\x5f\x5f\x2f\x5c\x5f\x5f\x5c\x5f\x5f\x5f\x5f\x7c\x5f\x7c\x20\x7c\x5f\x7c\x20\x7c\x5f\x7c");delay(100);
gotoxy(23,5);printf("\x7c\x20\x7c\x5f\x7c\x20\x7c\x2f\x20\x5f\x20\x5c\x2f\x20\x5f\x5f\x5f\x7c\x20\x27\x5f\x20\x5c\x7c\x20\x7c\x20\x5f\x5f\x2f\x20\x5f\x60\x20\x7c\x20\x7c");
gotoxy(23,20);printf("\x20\x5f\x5f\x5f\x29\x20\x7c\x20\x7c\x5f\x7c\x20\x5c\x5f\x5f\x5f\x20\x5c\x20\x7c\x7c\x20\x20\x5f\x5f\x5f\x2f\x20\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x7c");delay(100);
gotoxy(23,6);printf("\x7c\x20\x20\x5f\x20\x20\x7c\x20\x28\x5f\x29\x20\x5c\x5f\x5f\x5f\x20\x5c\x20\x7c\x5f\x29\x20\x7c\x20\x7c\x20\x7c\x7c\x20\x28\x5f\x29\x20\x7c\x20\x7c");
gotoxy(23,19);printf("\x5c\x5f\x5f\x5f\x20\x5c\x7c\x20\x7c\x20\x7c\x20\x2f\x20\x5f\x5f\x5f\x7c\x20\x5f\x5f\x2f\x20\x5f\x5f\x20\x5c\x20\x27\x5f\x20\x60\x20\x5f\x20\x5c\x20");delay(100);
gotoxy(23,7);printf("\x7c\x5f\x7c\x20\x7c\x5f\x7c\x5c\x5f\x5f\x5f\x2f\x7c\x5f\x5f\x5f\x5f\x2f\x20\x20\x5f\x5f\x2f\x7c\x5f\x7c\x5c\x5f\x5f\x5c\x5f\x5f\x2c\x5f\x7c\x5f\x7c");
gotoxy(23,18);printf("\x2f\x20\x5f\x5f\x5f\x7c\x20\x5f\x20\x20\x20\x5f\x20\x5f\x5f\x5f\x5f\x7c\x20\x7c\x5f\x20\x5f\x5f\x5f\x5f\x20\x5f\x20\x5f\x5f\x20\x5f\x5f\x5f\x20\x20");delay(100);
gotoxy(23,8);printf("\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x7c\x5f\x7c");
gotoxy(23,17);printf("\x20\x5f\x5f\x5f\x5f\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x5f\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20");delay(100);
gotoxy(9,10);printf("\x20\x5f\x5f\x20\x20\x5f\x5f\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x5f\x20\x20\x20");
gotoxy(9,15);printf("\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x20\x7c\x5f\x5f\x5f\x2f");delay(100);
gotoxy(9,11);printf("\x7c\x20\x20\x5c\x2f\x20\x20\x7c\x20\x5f\x5f\x20\x5f\x20\x5f\x20\x5f\x5f\x20\x20\x20\x5f\x5f\x20\x5f\x20\x20\x5f\x5f\x20\x5f\x20\x20\x5f\x5f\x5f\x5f\x20\x5f\x20\x5f\x5f\x20\x5f\x5f\x5f\x20\x20\x20\x5f\x5f\x5f\x5f\x20\x5f\x20\x5f\x5f\x20\x7c\x20\x7c\x5f\x20");
gotoxy(9,14);printf("\x7c\x5f\x7c\x20\x20\x7c\x5f\x7c\x5c\x5f\x5f\x2c\x5f\x7c\x5f\x7c\x20\x7c\x5f\x7c\x5c\x5f\x5f\x2c\x5f\x7c\x5c\x5f\x5f\x2c\x20\x7c\x5c\x5f\x5f\x5f\x5f\x7c\x5f\x7c\x20\x7c\x5f\x7c\x20\x7c\x5f\x7c\x5c\x5f\x5f\x5f\x5f\x7c\x5f\x7c\x20\x7c\x5f\x7c\x5c\x5f\x5f\x7c");delay(100);
gotoxy(9,12);printf("\x7c\x20\x7c\x5c\x2f\x7c\x20\x7c\x2f\x20\x5f\x60\x20\x7c\x20\x27\x5f\x20\x5c\x20\x2f\x20\x5f\x60\x20\x7c\x2f\x20\x5f\x60\x20\x7c\x2f\x20\x5f\x5f\x20\x5c\x20\x27\x5f\x20\x60\x20\x5f\x20\x5c\x20\x2f\x20\x5f\x5f\x20\x5c\x20\x27\x5f\x20\x5c\x7c\x20\x5f\x5f\x7c");
gotoxy(9,13);printf("\x7c\x20\x7c\x20\x20\x7c\x20\x7c\x20\x28\x5f\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x28\x5f\x7c\x20\x7c\x20\x28\x5f\x7c\x20\x7c\x20\x20\x5f\x5f\x5f\x2f\x20\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x7c\x20\x20\x5f\x5f\x5f\x2f\x20\x7c\x20\x7c\x20\x7c\x20\x7c\x5f\x20");delay(100);
textbackground(15);
window(7,3,10,8);
clrscr();
window(4,5,13,6);
clrscr();
window(71,3,74,8);
clrscr();
window(68,5,77,6);
clrscr();
window(1,1,80,25);
do{
gotoxy(30,24); printf(" < Press any key > ");
delay(500);if(kbhit()){getch();break;}
gotoxy(30,24); printf(" << Press any key >> ");
delay(500);if(kbhit()){getch();break;}
gotoxy(30,24); printf("<<< Press any key >>>");
delay(500);if(kbhit()){getch();break;}
}while(1);
}
void setroomEMPTY(int no){
int n,i;
struct Room ro;
n=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==no){
ro.sta=EMPTY;
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
fwrite(&ro,sizeof(Room),1,f_ro);
}
}fclose(f_ro);
}
void setroomSTAY(int no){
int n,i;
struct Room ro;
n=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==no){
ro.sta=STAY;
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
fwrite(&ro,sizeof(Room),1,f_ro);
}
}fclose(f_ro);
}
void patidetail(char id[10]){
struct Room ro;
struct Patient pat;
struct date da;
int n,i;
char head[30]="PATIENT DETAIL";
clrwin();
help();
drawwindow(head,12,7,69,20,12);
getdate(&da);
n=getFileElement(_pati,sizeof(Patient));
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0){
textcolor(14);
gotoxy(1,1);printf("Room No.: ");cprintf("%03d",pat.ro);
gotoxy(1,3);printf("ID: ");cprintf("%s",pat.id);
gotoxy(1,5);printf("First Name: ");cprintf("%s",pat.fname);
gotoxy(1,7);printf("Last Name: ");cprintf("%s",pat.lname);
gotoxy(1,9);printf("Sex: ");cprintf("%c",pat.sex);
gotoxy(1,11);printf("Date of Birth: ");cprintf("%02d/%02d/%d",pat.birth.da_day,pat.birth.da_mon,pat.birth.da_year);
gotoxy(1,13);printf("Address: ");cprintf("%s",pat.addr);
gotoxy(30,2);printf("Age: ");cprintf("%d",(da.da_mon>=pat.birth.da_mon&&da.da_day>=pat.birth.da_day)?(da.da_year-pat.birth.da_year):(da.da_year-pat.birth.da_year-1));
gotoxy(30,4);printf("Blood Group: ");cprintf("%s",pat.blo);
gotoxy(30,6);printf("Problem: ");cprintf("%s",pat.prob);
gotoxy(30,8);printf("Tel: ");cprintf("%s",pat.tel);
gotoxy(30,10);printf("Nationality: ");cprintf("%s",pat.nat);
gotoxy(30,12);printf("Date register :");cprintf("%02d/%02d/%d",pat.regi.day,pat.regi.mon,pat.regi.year);
break;
}
}fclose(f_pat);
}
void help(){
textcolor(0);
textbackground(7);
window(2,24,79,24);
clrscr();
printf(" ESC TO GO BACK.");
}
int about() {
char ch;
clrwin();
help();
drawwindow("ABOUT PROGRAM",13,7,67,20,RED);
gotoxy(15,1); printf("HOSPITAL MANAGEMENT SYSTEM");
gotoxy(15,2);printf("==========================");
gotoxy(13,4);textcolor(YELLOW); cprintf("Lecturer : Heng Soman");
gotoxy(13,7);textcolor(9); cprintf("Created by : SRUN VITOU");
gotoxy(13,9);textcolor(9); cprintf("Started : Friday,3,April,2015");
gotoxy(13,11);textcolor(9); cprintf("Finished : Monday,13,April,2015");
gotoxy(13,13);textcolor(9); cprintf("Version : 1.0");
while(blockey()==13);
return 4;
}
void docdetail(char id[10]){
struct Doctor doc;
struct date da;
int n,i;
char head[30]="DOCTOR DETAIL";
clrwin();
help();
drawwindow(head,12,7,69,20,12);
getdate(&da);
n=getFileElement(_doct,sizeof(Doctor));
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(id,doc.id)==0){
gotoxy(1,1);textcolor(14);printf("ID: ");cprintf("%s",doc.id);
gotoxy(1,3);textcolor(14);printf("First Name: ");cprintf("%s",doc.fname);
gotoxy(1,5);textcolor(14);printf("Last Name: ");cprintf("%s",doc.lname);
gotoxy(1,7);textcolor(14);printf("Sex: ");cprintf("%c",doc.sex);
gotoxy(1,9);textcolor(14);printf("Date of Birth: ");cprintf("%02d/%02d/%d",doc.birth.da_day,doc.birth.da_mon,doc.birth.da_year);
gotoxy(1,11);textcolor(14);printf("E-mail: ");cprintf("%s",doc.email);
gotoxy(1,13);textcolor(14);printf("Address: ");cprintf("%s",doc.addr);
gotoxy(30,2);textcolor(14);printf("Age: ");cprintf("%d",(da.da_mon>=doc.birth.da_mon&&da.da_day>=doc.birth.da_day)?(da.da_year-doc.birth.da_year):(da.da_year-doc.birth.da_year-1));
gotoxy(30,4);textcolor(14);printf("Blood Group: ");cprintf("%s",doc.blo);
gotoxy(30,6);textcolor(14);printf("Tel: ");cprintf("%s",doc.tel);
gotoxy(30,8);textcolor(14);printf("Specialty: ");cprintf("%s",doc.spec);
gotoxy(30,10);textcolor(14);printf("Nationality: ");cprintf("%s",doc.nat);
gotoxy(30,12);textcolor(14);printf("Date of joining: ");cprintf("%02d/%02d/%d",doc.join.day,doc.join.mon,doc.join.year);
break;
}
}fclose(f_pat);
}
void adddoc(){
struct Doctor doc;
struct date dai;
int day=0,mon=0,year=0;
char ch;
char id[10],fname[15],lname[15],sex,blo[5],spec[20],nat[20],tel[20],email[35],addr[40];
char text[2][30]={"<Doctor added>","<<Enter to add another>>"};
char blood[9][4]={"00","O+","O-","A+","A-","B+","B-","AB+","AB-"};
char head[30]="NEW DOCTOR";
do{
getdate(&dai);
clrwin();
help();
drawwindow(head,12,7,69,20,12);
gotoxy(1,1);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
if(finddocid(id)==1||findpatid(id)==1){
notice("<This ID is exist>",24,10,55,15);
blockey();
continue;
}
gotoxy(1,3);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
gotoxy(1,5);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
gotoxy(1,7);textcolor(15);cprintf("Sex: "); window(17,13,23,13);sex=selectsex();
if(sex=='n')break;
window(12,7,69,20);
date: gotoxy(1,9);textcolor(15);cprintf("Date of Birth: "); gotoxy(16,9);inputdat(day,mon,year,15);
if(day==0||mon==0||year==0) break;
else if(day>31||mon>12||year<1900||year>dai.da_year||(mon>dai.da_mon&&year>=dai.da_year)||(day>dai.da_day&&mon>=dai.da_mon&&year>=dai.da_year)){
gotoxy(16,9);printf("DD/MM/YYYY");
day=0;mon=0;year=0;
goto date;
}
gotoxy(1,11);textcolor(15);cprintf("E-mail: "); strcpy(email,input(3,34,15));
if(strcmp(email,"00")==0) break;
gotoxy(1,13);textcolor(15);cprintf("Address: "); strcpy(addr,input(3,39,15));
if(strcmp(addr,"00")==0) break;
gotoxy(30,1);textcolor(15);cprintf("Blood Group: ");window(54,7,61,7); strcpy(blo,blood[selectblood()]);
if(strcmp(blo,"00")==0) break;
window(12,7,69,20);
gotoxy(30,3);textcolor(15);cprintf("Tel: "); strcpy(tel,input(1,19,15));
if(strcmp(tel,"00")==0) break;
gotoxy(30,5);textcolor(15);cprintf("Specialty: ");strcpy(spec,input(2,17,15));
if(strcmp(spec,"00")==0) break;
else strupr(spec);
gotoxy(30,7);textcolor(15);cprintf("Nationality: "); strcpy(nat,input(2,15,15));
if(strcmp(nat,"00")==0) break;
time(¤t);
gt = localtime(¤t);
strcpy(doc.id,id);
strcpy(doc.fname,fname);
strcpy(doc.lname,lname);
doc.sex=sex;
doc.birth.da_day=day;
doc.birth.da_mon=mon;
doc.birth.da_year=year;
strcpy(doc.blo,blo);
strcpy(doc.addr,addr);
strcpy(doc.nat,nat);
strcpy(doc.tel,tel);
strcpy(doc.email,email);
strcpy(doc.spec,spec);
doc.join.sec = gt->tm_sec;
doc.join.min = gt->tm_min;
doc.join.hour = gt->tm_hour;
doc.join.day=gt->tm_mday;
doc.join.mon=gt->tm_mon+1;
doc.join.year=gt->tm_year+1900;
f_doc=fopen(_doct,"ab");
fwrite(&doc,sizeof(Doctor),1,f_doc);
fclose(f_doc);
notice(text,24,10,55,15);
ch=blockey();
if(ch==27) break;
}while(1);
}
void deletetypeinput(){
struct Types type;
char t[20],ty[10],ch;
int code,i,n,f;
float pri;
char text[2][30]={"<Type Deleted>","<<Enter to Delete another>>"};
char head[30]="DELETE TYPE";
do{
s: clrwin();
help();
drawwindow(head,22,7,57,17,12);
n=getFileElement(_type,sizeof(Types));
if(n==0){
gotoxy(5,5);textcolor(15);
cprintf("<There are no type to delete>");
blockey();
break;
}
gotoxy(10,5);textcolor(15);cprintf("Code: ");code=atoi(input(1,5,15));
if(code==0) break;
f_ty=fopen(_type,"rb+");
rewind(f_ty);
for(i=0;i<n;i++){
fread(&type,sizeof(Types),1,f_ty);
if(code==type.co){
f=1;
break;
}else{
f=0;
}
}fclose(f_ty);
if(f==0){
notice("<Type not found>",24,10,55,15);
blockey();
goto s;
}
if(f==1) {
if(confirm("Delete Type")==0)
continue;
else{
deletetype(code);
notice(text,24,10,55,15);
}
}
ch=blockey();
if(ch==27) break;
}while(1);
}
void deletetype(int code){
int i,n;
struct Types type;
n=getFileElement(_type,sizeof(Types));
f_ty=fopen(_type,"rb+");
rewind(f_ty);
//Temporary file.
FILE *temp = fopen("TEMP","wb+");
for(i=0; i<n; i++) {
fread(&type,sizeof(Types),1,f_ty);
if(type.co!=code) {
fwrite(&type,sizeof(Types),1,temp);
}
}
fclose(temp);
fclose(f_ty);
remove(_type);
rename("TEMP",_type);
}
void deleteroom(){
struct Room ro;
char t[20],ty[10],ch;
int no,i,n,f;
float pri;
char text[2][30]={"<Room Deleted>","<<Enter to Delete another>>"};
char head[30]="DELETE ROOM";
do{
clrwin();
help();
drawwindow(head,22,7,57,17,12);
n=getFileElement(_room,sizeof(Room));
if(n==0){
gotoxy(5,5);textcolor(15);
cprintf("<There are no room to delete>");
blockey();
break;
}
gotoxy(12,5);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
f=findroom(no);
if(f==1) {
f_ro=fopen(_room,"rb+");
rewind(f_ro);
if(confirm("Deleting")==0){ fclose(f_ro);continue;}
else{
FILE *temp = fopen("TEMP","wb+");
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no!=no) {
fwrite(&ro,sizeof(Room),1,temp);
}
}
fclose(temp);
}
fclose(f_ro);
remove(_room);
rename("TEMP",_room);
notice(text,24,10,55,15);
}
if(f==2){
notice("<This room has Patient>",24,10,55,15);
}
if(f==0){
notice("<Room not found>",24,10,55,15);
}
ch=blockey();
if(ch==27) break;
}while(1);
}
int deletedoc(char id[10]){
struct Doctor doc;
int n,i,y;
n=getFileElement(_doct,sizeof(Doctor));
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
FILE *temp = fopen("TEMP","wb+");
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(doc.id,id)!=0) {
fwrite(&doc,sizeof(Doctor),1,temp);
}
}
fclose(temp);
fclose(f_doc);
remove(_doct);
rename("TEMP",_doct);
y=1;
end:
return y;
}
void deletepat(char id[10]){
struct Patient pat;
int n,i;
n=getFileElement(_pati,sizeof(Patient));
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
FILE *temp = fopen("TEMP","wb+");
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(pat.id,id)!=0) {
fwrite(&pat,sizeof(Patient),1,temp);
}
}
fclose(temp);
fclose(f_pat);
remove(_pati);
rename("TEMP",_pati);
}
void deletedocinput(int opt){
struct Doctor doc;
char fname[20],lname[20];
char id[10],ch;
int i,n,f,nf;
char head[30]="DELETE DOCTOR";
do{
f=0;nf=0;
n=getFileElement(_doct,sizeof(Doctor));
Doctor *source =(Doctor*) calloc(n,sizeof(Doctor));
clrwin();
help();
drawwindow("SEARCH DOCTOR TO DELETE",22,7,57,17,12);
if(n==0){
gotoxy(4,5);textcolor(15);
cprintf("<There are no Doctor to delete>");
blockey();
break;
}
if(opt==1){
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
f_doc=fopen(_doct,"rb");
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(doc.id,id)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}
fclose(f_doc);
}
if(opt==2){
gotoxy(10,5);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
f_doc=fopen(_doct,"rb");
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strstr(doc.fname,fname)!=0||strcmp(doc.fname,fname)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}
fclose(f_doc);
}
if(opt==3){
gotoxy(10,5);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
f_doc=fopen(_doct,"rb");
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strstr(doc.lname,lname)!=0||strcmp(doc.lname,lname)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}
fclose(f_doc);
}
if(f==1) {
if(viewdoc(head,source,nf,0)==27)break;
else continue;
}
if(f==0){
notice("<Doctor not found>",24,10,55,15);
}
ch=blockey();
if(ch==27) break;
}while(1);
}
int viewpat(char head[30],Patient *source,int n,int opt){
int i,temp=0,s=0,back=1,j=0;
char ch,c;
do{
clrwin();
help();
drawwindow(head,20,7,60,20,12);
gotoxy(1,1);printf("Room");gotoxy(11,1);printf("Name");
gotoxy(24,1);printf("Sex");gotoxy(31,1);printf("Tel");
if(n>13)temp=13;
else temp =n;
gotoxy(1,back+1);
textbackground(2);
for(j=0;j<41;j++)
cprintf(" ");
for(i=0;i<temp;i++){
gotoxy(1,i+2);printf("%03d",source[i+s].ro);gotoxy(9,i+2);printf("%s %s",source[i+s].fname,source[i+s].lname);
gotoxy(25,i+2);printf("%c",source[i+s].sex);gotoxy(31,i+2);printf("%s",source[i+s].tel);
}
ch: ch=getch();
switch(ch){
case 72:back--;if(back<1){back=1;s--;if(s<0){back=temp;s=n-temp;}}break;
case 80:back++;if(back>=temp+1){back=temp;s++;if(s>n-temp){back=1;s=0;}}break;
case 27:break;
case 13:break;
default:goto ch;
}
if(ch==13){
if(opt==1)patidetail(source[back-1+s].id);
else if(confirm("Checkout")==1){
ch=checkout(source[back-1+s].id);
if(ch==13||ch==27){
break;
}else continue;
}else continue;
blockey();
continue;
}
if(ch==27)break;
}while(1);
return ch;
}
int viewdoc(char head[30],Doctor *source,int n,int opt){
char text[2][30]={"<Doctor Deleted>","<<Enter to Delete another>>"};
int i,temp=0,s=0,back=1,j=0;
char ch,c;
do{
clrwin();
help();
drawwindow(head,20,7,60,20,12);
gotoxy(1,1);printf("ID");gotoxy(12,1);printf("Name");
gotoxy(24,1);printf("Sex");gotoxy(30,1);printf("Specialty");
if(n>13)temp=13;
else temp =n;
gotoxy(1,back+1);
textbackground(2);
for(j=0;j<41;j++)
cprintf(" ");
for(i=0;i<temp;i++){
gotoxy(1,i+2);printf("%s",source[i+s].id);gotoxy(9,i+2);printf("%s %s",source[i+s].fname,source[i+s].lname);
gotoxy(25,i+2);printf("%c",source[i+s].sex);gotoxy(31,i+2);printf("%s",source[i+s].spec);
}
ch: ch=getch();
switch(ch){
case 72:back--;if(back<1){back=1;s--;if(s<0){back=temp;s=n-temp;}}break;
case 80:back++;if(back>=temp+1){back=temp;s++;if(s>n-temp){back=1;s=0;}}break;
case 27:break;
case 13:break;
default:goto ch;
}
if(ch==13){
if(opt==1){
docdetail(source[back-1+s].id);
blockey();
continue;
}else if(confirm("Deleting")==1)
if(deletedoc(source[back-1+s].id)==1){
notice(text,24,10,55,15);
ch=blockey();
if(ch==27||ch==13)break;
}else continue;
}
if(ch==27)break;
}while(1);
return ch;
}
void findpat(int opt){
struct Patient pat;
char fullname1[40],fullname2[40],namef[40];
char id[10],ch,c;
int i,n,f=0,nf=0,no,day=0,mon=0,year=0;
char head[30]="SEARCH PATIENT";
do{
n=getFileElement(_pati,sizeof(Patient));
f=0;nf=0;day=0;mon=0;year=0;
Patient *source =(Patient*) calloc(n,sizeof(Patient));
clrwin();
help();
drawwindow(head,22,7,57,17,12);
if(n==0){
gotoxy(3,5);textcolor(15);
cprintf("<There are no Patient to search>");
blockey();
break;
}
if(opt==1){
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
}
if(opt==2){
gotoxy(10,5);textcolor(15);cprintf("Name: "); strcpy(namef,input(2,35,15));
if(strcmp(namef,"00")==0) break;
else strupr(namef);
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
strcpy(fullname1,pat.fname);
strcat(fullname1," ");
strcat(fullname1,pat.lname);
strcpy(fullname2,pat.lname);
strcat(fullname2," ");
strcat(fullname2,pat.fname);
if(strstr(fullname1,namef)!=0||strstr(fullname2,namef)!=0){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpatname(source,nf);
}
if(opt==4){
gotoxy(5,5);textcolor(15);cprintf("Date of Check in: ");inputdat(day,mon,year,15);
if(day==0||mon==0||year==0) break;
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(pat.regi.day==day&&pat.regi.mon==mon&&pat.regi.year==year){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpat(source,nf);
}
if(opt==3){
gotoxy(12,5);textcolor(15);cprintf("Room No.: "); no=atoi(input(1,5,15));
if(no==0) break;
f_pat=fopen(_pati,"rb");
rewind(f_pat);
for(i=0; i<n; i++) {
fread(&pat,sizeof(Patient),1,f_pat);
if(pat.ro==no){
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fread(&source[nf],sizeof(Patient),1,f_pat);
nf++;
f=1;
}
}fclose(f_pat);
sortpat(source,nf);
}
if(f==1){
viewpat(head,source,nf,1);
continue;
}
if(f==0){
notice("<Patient not found>",24,10,55,15);
ch=blockey();
if(ch==13)
continue;
}
if(ch==27) break;
}while(1);
}
void finddoc(int opt){
struct Doctor doc;
char fname[20],lname[20],spec[20];
char id[10],ch,c;
int i,n,f=0,nf=0;
char head[30]="SEARCH DOCTOR";
do{ n=getFileElement(_doct,sizeof(Doctor));
f=0;nf=0;
Doctor *source =(Doctor*) calloc(n,sizeof(Doctor));
clrwin();
help();
drawwindow(head,22,7,57,17,12);
if(n==0){
gotoxy(4,5);textcolor(15);
cprintf("<There are no Doctor to search>");
blockey();
break;
}
if(opt==1){
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
f_doc=fopen(_doct,"rb");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(id,doc.id)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}fclose(f_doc);
}
if(opt==2){
gotoxy(10,5);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
f_doc=fopen(_doct,"rb");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strstr(doc.fname,fname)!=0||stricmp(doc.fname,fname)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}fclose(f_doc);
}
if(opt==3){
gotoxy(10,5);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
f_doc=fopen(_doct,"rb");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strstr(doc.lname,lname)!=0||stricmp(doc.lname,lname)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}fclose(f_doc);
}
if(opt==4){
gotoxy(11,5);textcolor(15);cprintf("Specialty: "); strcpy(spec,input(2,19,15));
if(strcmp(spec,"00")==0) break;
else strupr(spec);
f_doc=fopen(_doct,"rb");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&doc,sizeof(Doctor),1,f_doc);
if(strstr(doc.spec,spec)!=0||stricmp(doc.spec,spec)==0){
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fread(&source[nf],sizeof(Doctor),1,f_doc);
nf++;
f=1;
}
}fclose(f_doc);
}
if(f==1){
sortdoc(source,nf);
viewdoc(head,source,nf,1);
continue;
}
if(f==0){
notice("<Doctor not found>",24,10,55,15);
blockey();
continue;
}
if(ch==27) break;
}while(1);
}
void updatedoc(int opt){
struct Doctor doc;
struct date dai;
int day=0,mon=0,year=0,i,n,f;
char ch,c;
char id[10],idf[10],fname[15],lname[15],sex,blo[5],spec[20],nat[20],tel[20],email[35],addr[40];
char text[2][30]={"<Doctor updated>","<<Enter to update another>>"};
char blood[9][4]={"00","O+","O-","A+","A-","B+","B-","AB+","AB-"};
char head[30]="UPDATE DOCTOR";
do{
getdate(&dai);
f=0;
clrwin();
drawwindow("SEARCH DOCTOR TO UPDATE",22,7,57,17,12);
n=getFileElement(_doct,sizeof(Doctor));
if(n==0){
gotoxy(4,5);textcolor(15);
cprintf("<There are no Doctor to update>");
blockey();
break;
}
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(idf,input(3,9,15));
if(strcmp(idf,"00")==0) break;
f=finddocid(idf);
if(f==0)
notice("<Doctor not found>",24,10,55,15);
if(f==1){
clrwin();
drawwindow(head,12,7,69,20,12);
if(opt==1){
gotoxy(1,1);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
if((finddocid(id)==1||findpatid(id)==1)&&strcmp(idf,id)!=0){
notice("<This ID is exist>",24,10,55,15);
blockey();
continue;
}
gotoxy(1,3);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
gotoxy(1,5);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
gotoxy(1,7);textcolor(15);cprintf("Sex: "); window(17,13,23,13);sex=selectsex();
if(sex=='n')break;
window(12,7,69,20);
date: gotoxy(1,9);textcolor(15);cprintf("Date of Birth: "); gotoxy(16,9);inputdat(day,mon,year,15);
if(day==0||mon==0||year==0) break;
else if(day>31||mon>12||year<1900||year>dai.da_year||(mon>dai.da_mon&&year>=dai.da_year)||(day>dai.da_day&&mon>=dai.da_mon&&year>=dai.da_year)){
gotoxy(16,9);printf("DD/MM/YYYY");
day=0;mon=0;year=0;
goto date;
}
gotoxy(1,11);textcolor(15);cprintf("E-mail: "); strcpy(email,input(3,34,15));
if(strcmp(email,"00")==0) break;
gotoxy(1,13);textcolor(15);cprintf("Address: "); strcpy(addr,input(3,39,15));
if(strcmp(addr,"00")==0) break;
gotoxy(30,1);textcolor(15);cprintf("Blood Group: ");window(54,7,61,7); strcpy(blo,blood[selectblood()]);
if(strcmp(blo,"00")==0) break;
window(12,7,69,20);
gotoxy(30,3);textcolor(15);cprintf("Tel: "); strcpy(tel,input(1,19,15));
if(strcmp(tel,"00")==0) break;
gotoxy(30,5);textcolor(15);cprintf("Specialty: ");strcpy(spec,input(2,17,15));
if(strcmp(spec,"00")==0) break;
else strupr(spec);
gotoxy(30,7);textcolor(15);cprintf("Nationality: "); strcpy(nat,input(2,15,15));
if(strcmp(nat,"00")==0) break;
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(idf,doc.id)==0){
time(¤t);
gt = localtime(¤t);
strcpy(doc.id,id);
strcpy(doc.fname,fname);
strcpy(doc.lname,lname);
doc.sex=sex;
doc.birth.da_day=day;
doc.birth.da_mon=mon;
doc.birth.da_year=year;
strcpy(doc.blo,blo);
strcpy(doc.addr,addr);
strcpy(doc.nat,nat);
strcpy(doc.tel,tel);
strcpy(doc.email,email);
strcpy(doc.spec,spec);
doc.join.sec = gt->tm_sec;
doc.join.min = gt->tm_min;
doc.join.hour = gt->tm_hour;
doc.join.day=gt->tm_mday;
doc.join.mon=gt->tm_mon+1;
doc.join.year=gt->tm_year+1900;
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fwrite(&doc,sizeof(Doctor),1,f_doc);
}
}fclose(f_doc);
notice(text,24,10,55,15);
}
if(opt==2){
gotoxy(10,6);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
gotoxy(10,8);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(idf,doc.id)==0){
strcpy(doc.fname,fname);
strcpy(doc.lname,lname);
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fwrite(&doc,sizeof(Doctor),1,f_doc);
notice(text,24,10,55,15);
}
}fclose(f_doc);
}
if(opt==3){
gotoxy(11,7);textcolor(15);cprintf("Specialty: ");strcpy(spec,input(2,17,15));
if(strcmp(spec,"00")==0) break;
else strupr(spec);
f_doc=fopen(_doct,"rb+");
rewind(f_doc);
for(i=0;i<n;i++){
fread(&doc,sizeof(Doctor),1,f_doc);
if(strcmp(doc.id,idf)==0){
strcpy(doc.spec,spec);
fseek(f_doc,-(int)sizeof(Doctor),SEEK_CUR);
fwrite(&doc,sizeof(Doctor),1,f_doc);
notice(text,24,10,55,15);
}
}
fclose(f_doc);
}
}
ch=blockey();
if(ch==27) break;
}while(1);
}
void updatepat(int opt){
struct Patient pat;
struct Room ro;
struct date dai;
int day=0,mon=0,year=0,i,n,f,no,nr,nav=0;
char ch;
char idf[10],id[10],fname[15],lname[15],sex,blo[5],prob[20],nat[20],tel[20],addr[40];
char text[2][30]={"<Patient updated>","<<Enter to update another>>"};
char blood[9][4]={"00","O+","O-","A+","A-","B+","B-","AB+","AB-"};
char head[30]="UPDATE PATIENT";
do{
getdate(&dai);
f=0;
clrwin();
drawwindow("SEARCH PATIENT TO UPDATE",22,7,57,17,12);
n=getFileElement(_pati,sizeof(Patient));
if(n==0){
gotoxy(4,5);textcolor(15);
cprintf("<There are no Patient to update>");
blockey();
break;
}
if(opt==3){
nr=getFileElement(_room,sizeof(Room));
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(i=0; i<nr; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.sta==EMPTY){
nav++;
}
}fclose(f_ro);
if(nav==0){
gotoxy(5,5);textcolor(15);
cprintf("<There are no available rooms>");
blockey();
break;
}
}
gotoxy(14,5);textcolor(15);cprintf("ID: "); strcpy(idf,input(3,9,15));
if(strcmp(idf,"00")==0) break;
f=findpatid(idf);
if(f==0)
notice("<Patient not found>",24,10,55,15);
if(f==1){
f1: f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0;i<n;i++){
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(id,pat.id)==0){
break;
}
}fclose(f_pat);
clrwin();
drawwindow(head,12,7,69,20,12);
if(opt==1){
gotoxy(1,1);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
if(findroom(no)!=1&&no!=pat.ro){
notice("<Unavailable Room>",24,10,55,15);
blockey();
continue;
}
gotoxy(1,3);textcolor(15);cprintf("ID: "); strcpy(id,input(3,9,15));
if(strcmp(id,"00")==0) break;
if((finddocid(id)==1||findpatid(id)==1)&&strcmp(id,pat.id)!=0){
notice("<This ID is exist>",24,10,55,15);
ch=blockey();
if(ch==27)break;
else continue;
}
gotoxy(1,5);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
gotoxy(1,7);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
gotoxy(1,9);textcolor(15);cprintf("Sex: "); window(17,15,23,15);sex=selectsex();
if(sex=='n')break;
window(12,7,69,20);
date: gotoxy(1,11);textcolor(15);cprintf("Date of Birth: "); gotoxy(16,11);inputdat(day,mon,year,15);
if(day==0||mon==0||year==0) break;
else if(day>31||mon>12||year<1900||year>dai.da_year||(mon>dai.da_mon&&year>=dai.da_year)||(day>dai.da_day&&mon>=dai.da_mon&&year>=dai.da_year)){
gotoxy(16,11);printf("DD/MM/YYYY");
day=0;mon=0;year=0;
goto date;
}
gotoxy(1,13);textcolor(15);cprintf("Address: "); strcpy(addr,input(3,39,15));
if(strcmp(addr,"00")==0) break;
gotoxy(30,1);textcolor(15);cprintf("Blood Group: ");window(54,7,61,7); strcpy(blo,blood[selectblood()]);
if(strcmp(blo,"00")==0) break;
window(12,7,69,20);
gotoxy(30,3);textcolor(15);cprintf("Problem: ");strcpy(prob,input(2,19,15));
if(strcmp(prob,"00")==0) break;
gotoxy(30,5);textcolor(15);cprintf("Tel: "); strcpy(tel,input(1,19,15));
if(strcmp(tel,"00")==0) break;
gotoxy(30,7);textcolor(15);cprintf("Nationality: "); strcpy(nat,input(2,19,15));
if(strcmp(nat,"00")==0) break;
setroomEMPTY(pat.ro);
setroomSTAY(no);
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0;i<n;i++){
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(idf,pat.id)==0){
pat.ro=no;
strcpy(pat.id,id);
strcpy(pat.fname,fname);
strcpy(pat.lname,lname);
pat.sex=sex;
pat.birth.da_day=day;
pat.birth.da_mon=mon;
pat.birth.da_year=year;
strcpy(pat.addr,addr);
strcpy(pat.blo,blo);
strcpy(pat.prob,prob);
strcpy(pat.nat,nat);
strcpy(pat.tel,tel);
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fwrite(&pat,sizeof(Patient),1,f_pat);
}
}fclose(f_pat);
notice(text,24,10,55,15);
}
if(opt==2){
gotoxy(10,4);textcolor(15);cprintf("First Name: "); strcpy(fname,input(2,14,15));
if(strcmp(fname,"00")==0) break;
else strupr(fname);
gotoxy(10,6);textcolor(15);cprintf("Last Name: "); strcpy(lname,input(2,14,15));
if(strcmp(lname,"00")==0) break;
else strupr(lname);
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0;i<n;i++){
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(idf,pat.id)==0){
strcpy(pat.fname,fname);
strcpy(pat.lname,lname);
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fwrite(&pat,sizeof(Patient),1,f_pat);
notice(text,24,10,55,15);
}
}fclose(f_pat);
}
if(opt==3){
gotoxy(11,7);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
if(findroom(no)!=1){
notice("<Unavailable Room>",24,10,55,15);
blockey();
goto f1;
}
setroomEMPTY(pat.ro);
setroomSTAY(no);
f_pat=fopen(_pati,"rb+");
rewind(f_pat);
for(i=0;i<n;i++){
fread(&pat,sizeof(Patient),1,f_pat);
if(strcmp(pat.id,idf)==0){
pat.ro=no;
fseek(f_pat,-(int)sizeof(Patient),SEEK_CUR);
fwrite(&pat,sizeof(Patient),1,f_pat);
notice(text,24,10,55,15);
}
}
fclose(f_pat);
}
}
ch=blockey();
if(ch==27) break;
}while(1);
}
void updateroom(){
struct Room ro;
struct Types type;
char ch,c;
int no,nof,i,n,f,ty,it,nt;
char text[2][30]={"<Room Updated>","<<Enter to Update another>>"};
char head[30]="UPDATE ROOM";
do{ f=0;
clrwin();
help();
drawwindow("SEARCH ROOM TO UPDATE",22,7,57,17,12);
n=getFileElement(_room,sizeof(Room));
if(n==0){
gotoxy(5,5);textcolor(15);
cprintf("<There are no room to update>");
blockey();
break;
}
gotoxy(12,5);textcolor(15);cprintf("Room No.: ");nof=atoi(input(1,5,15));
if(nof==0) break;
f=findroom(nof);
if(f==0)
notice("<Room not found>",24,10,55,15);
if(f==2)
notice("<This room has Patient>",24,10,55,15);
if(f==1) {
if(confirm("Updating")==0){ fclose(f_ro);continue;}
else{
s: clrwin();
drawwindow(head,22,7,57,17,12);
gotoxy(12,4);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0;i<n;i++){
fread(&ro,sizeof(Room),1,f_ro);
if(no==ro.no&&no!=nof){
notice(">This room is exist<",24,10,55,15);
blockey();
fclose(f_ro);
goto s;
}
}
fclose(f_ro);
gotoxy(12,6);textcolor(15);cprintf("Type: ");
window(39,12,51,12);
ty=selecttype();
if(ty==-1) break;
f_ro=fopen(_room,"rb+");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==nof) {
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
nt=getFileElement(_type,sizeof(Types));
f_ty=fopen(_type,"rb+");
rewind(f_ty);
for(it=0;it<nt;it++){
fread(&type,sizeof(Types),1,f_ty);
if(type.co==ty){
ro.type.co=type.co;
stpcpy(ro.type.na,type.na);
ro.type.pri=type.pri;
}
}
fclose(f_ty);
ro.no=no;
ro.sta=EMPTY;
fwrite(&ro,sizeof(Room),1,f_ro);
}
}
fclose(f_ro);
notice(text,24,10,55,15);
}
}
ch=blockey();
if(ch==27) break;
}while(1);
}
int viewroom(char head[30],Room *source,int n){
struct Patient pat;
int i,temp=0,s=0,back=1,j=0,nl,l,f=0,index=0;
char ch;
do{
clrwin();
help();
drawwindow(head,20,7,60,20,12);
gotoxy(1,1);printf("No.");gotoxy(8,1);printf("Type");
gotoxy(18,1);printf("Price");gotoxy(30,1);printf("Status");
if(n>13)temp=13;
else temp =n;
gotoxy(1,back+1);
textbackground(2);
for(j=0;j<41;j++)
cprintf(" ");
for(i=0;i<temp;i++){
gotoxy(1,i+2);printf("%03d",source[i+s].no);gotoxy(8,i+2);printf("%s",source[i+s].type.na);
gotoxy(18,i+2);printf("%.2f",source[i+s].type.pri);gotoxy(30,i+2);printf("%s",source[i+s].sta=='n'?"Available":"Unavailable");
}
ch: ch=getch();
switch(ch){
case 72:back--;if(back<1){back=1;s--;if(s<0){back=temp;s=n-temp;}}break;
case 80:back++;if(back>=temp+1){back=temp;s++;if(s>n-temp){back=1;s=0;}}break;
case 27:break;
case 13:break;
default:goto ch;
}
if(ch==13){
if(source[back-1+s].sta==EMPTY)
if(confirm("Add Patient")==1){
if(addpatient(source[back-1+s].no)==1){
if(strstr(head,"ALL")!=0)
source[back-1+s].sta=STAY;
else{
index=back-1+s;
n--;
while(index<n){
source[index]=source[index+1];
index++;
}
s=0;back=1;
}
}
}else continue;
else if(confirm("Checkout")==1){
nl=getFileElement(_pati,sizeof(Patient));
f_pat=fopen(_pati,"rb");
for(l=0;l<nl;l++){
fread(&pat,sizeof(Patient),1,f_pat);
if(source[back-1+s].no==pat.ro){
f=1;
break;
}
}fclose(f_pat);
if(f==1){
ch=checkout(pat.id);
if(ch==27||ch==13)
break;
else {f=0;continue;}
}
}else continue;
}
if(ch==27)break;
}while(1);
return ch;
}
void allroom(){
int i,n;
char head[30]="ALL ROOM";
char ch;
start:
n=getFileElement(_room,sizeof(Room));
Room *source =(Room*) calloc(n,sizeof(Room));
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&source[i],sizeof(Room),1,f_ro);
}fclose(f_ro);
clrwin();
help();
drawwindow(head,20,7,60,20,12);
if(n==0){
gotoxy(12,7);textcolor(15);
cprintf("<There are no room>");
blockey();
goto end;
}
sortroom(source,n);
if(viewroom(head,source,n)==13)
goto start;
end:
}
void allpat(){
int i,n;
char head[30]="ALL PATIENT";
char ch;
n=getFileElement(_pati,sizeof(Patient));
Patient *source =(Patient*) calloc(n,sizeof(Patient));
f_pat=fopen(_pati,"rb");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&source[i],sizeof(Patient),1,f_pat);
}fclose(f_pat);
clrwin();
help();
drawwindow(head,20,7,60,20,12);
if(n==0){
gotoxy(12,7);textcolor(15);
cprintf("<There are no Patient>");
blockey();
goto end;
}
sortpat(source,n);
viewpat(head,source,n,1);
end:
}
void alldoc(){
int i,n;
char ch;
char head[30]="ALL DOCTOR";
n=getFileElement(_doct,sizeof(Doctor));
Doctor *source =(Doctor*) calloc(n,sizeof(Doctor));
f_doc=fopen(_doct,"rb");
rewind(f_doc);
for(i=0; i<n; i++) {
fread(&source[i],sizeof(Doctor),1,f_doc);
}fclose(f_doc);
clrwin();
help();
drawwindow(head,20,7,60,20,12);
if(n==0){
gotoxy(12,7);textcolor(15);
cprintf("<There are no Doctor>");
blockey();
goto end;
}
sortdoc(source,n);
viewdoc(head,source,n,1);
end:
}
void findviewroom(){
struct Room ro;
int i,n,nf,no;
char head[30]="SEARCH ROOM";
char ch,c;
do{ n=getFileElement(_room,sizeof(Room));
nf=0;
Room *source =(Room*) calloc(n,sizeof(Room));
clrwin();
help();
drawwindow(head,22,7,57,17,12);
clrscr();
if(n==0){
gotoxy(5,5);textcolor(15);cprintf("<There are no rooms to search>");
blockey();
break;
}
gotoxy(12,5);textcolor(15);cprintf("Room No.: ");no=atoi(input(1,5,15));
if(no==0) break;
if(findroom(no)!=0){
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.no==no){
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
fread(&source[nf],sizeof(Room),1,f_ro);
nf++;
}
}fclose(f_ro);
}
if(nf==0){
notice("<Room not found>",24,10,55,15);
blockey();
continue;
}
sortroom(source,nf);
ch=viewroom(head,source,nf);
if(ch==27) break;
else continue;
}while(1);
}
void availroom(){
struct Room ro;
char ch;
int i,n,nav=0;
char head[30]="AVAILABLE ROOM";
n=getFileElement(_room,sizeof(Room));
Room *source =(Room*) calloc(n,sizeof(Room));
f_ro=fopen(_room,"rb");
rewind(f_ro);
for(i=0; i<n; i++) {
fread(&ro,sizeof(Room),1,f_ro);
if(ro.sta==EMPTY){
fseek(f_ro,-(int)sizeof(Room),SEEK_CUR);
fread(&source[nav],sizeof(Room),1,f_ro);
nav++;
}
}fclose(f_ro);
clrwin();
help();
drawwindow(head,20,7,60,20,12);
if(nav==0){
gotoxy(6,7);textcolor(15);
cprintf("<There are no available rooms>");
blockey();
goto end;
}
sortroom(source,nav);
viewroom(head,source,nav);
end:
}
void alltype(){
struct Types type;
char ch,c;
int i,n,temp,s,back,j;
char head[30]="ALL TYPE";
start:
temp=0;s=0;back=1;j=0;
n=getFileElement(_type,sizeof(Types));
Types *source =(Types*) calloc(n,sizeof(Types));
f_ty=fopen(_type,"rb");
rewind(f_ty);
for(i=0; i<n; i++) {
fread(&source[i],sizeof(Types),1,f_ty);
}fclose(f_ty);
sorttype(source,n);
do{
clrwin();
help();
drawwindow(head,20,7,60,20,12);
if(n==0){
gotoxy(12,7);textcolor(15);
cprintf("<There are no type>");
blockey();
break;
}
gotoxy(1,1);printf("Code");gotoxy(19,1);printf("Type");
gotoxy(33,1);printf("Price");
if(n>13)temp=13;
else temp=n;
gotoxy(1,back+1);
textbackground(2);
for(j=0;j<41;j++)
cprintf(" ");
for(i=0;i<temp;i++){
gotoxy(1,i+2);printf("%03d",source[i+s].co);gotoxy(19,i+2);printf("%s",source[i+s].na);
gotoxy(33,i+2);printf("%.2f",source[i+s].pri);
}
ch: ch=getch();
switch(ch){
case 72:back--;if(back<1){back=1;s--;if(s<0){back=temp;s=n-temp;}}break;
case 80:back++;if(back>=temp+1){back=temp;s++;if(s>n-temp){back=1;s=0;}}break;
case 27:break;
case 13:break;
default:goto ch;
}
if(ch==13){
if(confirm("Delete Type")==1){
deletetype(source[back-1+s].co);
notice("<Type Deleted>",24,10,55,15);
blockey();
goto start;
}else continue;
}
if(ch==27)break;
}while(1);
}
nice.plz add a mouse support in this program only
ReplyDeleteFor this project I just set its interface by function window so it cannot use mouse because mouse use only in graphic. but for this project( http://khcomputerscience.blogspot.com/2015/07/interface-hospital-management-system.html ) is used in graphic and also mouse.
DeleteHope you enjoy it.
thanks you for your comment!!!
Hello, bong Vitou. I'm UY SUY, I'm a student at RUPP(year one). I have something with c programming. I want to make make hide and show text(slide animation) but I when i use for loop it's can't work, may be I'm not clear with how to use loop control. So that I want you help me please if you can.
ReplyDeleteThank in advance.
Sent from Uy Suy
Oh you can contact me in facebook is more better.
DeleteVitou Srun
fabulous project..many Many Thank You for the source code...Thank You...!!Love the project..!
ReplyDeleteYou're welcome
DeleteAwesome Dude
ReplyDeleteThank you!!!
Deletedude this project is showing 25 errors in my turbo c++ compiler version 4.0 i had tried a lot to remove those but not possible
ReplyDeletePlease use with this compiler https://www.youtube.com/watch?v=IQdQeuVUHbQ
Deleteis it in c++ not in c?
ReplyDeleteI have write it in c.
Deletesir can we plz make it run in code block i want it to work with code block plz sir make it work my email- ninatapenz@gmail.com
ReplyDeleteIt seem spend more time to do this job and one more thing is that I never use codeblock sorry!
DeleteAfter installing the DOSBox/compiler :: https://www.youtube.com/watch?v=IQdQeuVUHbQ
ReplyDeleteit also shows 25 errors.... what can i do???? need your help.
Make sure you copy all code correctly!
Deleteyeah!
ReplyDeleteplease send me your mail id if u dont mind.
Hello! Bro,Could I ask you ?
ReplyDeleteI want to ask brother about definition (
fseek(f_doc,-(int)sizeof(Doc),SEEK_CUR);)?What does it mean?
it mean we will seek cursor to curent cursor and turn back one step (1 step = size of Doc(stucture))
DeleteIs this a blog or a website ???
ReplyDeletewhat are the limitation of this program (5 points)....??sir??
ReplyDeleteCan u help me how I can learn about cursor and all stuff i am familiar with program
ReplyDelete25 errors....
ReplyDeletehello brother! Is this assignment for year 1 student?
ReplyDeleteGreat effort dude .your passion impression lot
ReplyDeletethis is my one hospital management software anybody interesting to use this software try this 14 free trail
hospital management system
Hello Vitou Srun.. I liked your program in C.. I wanted to develop few C++ Program I need your professional help...can you please write to me on my email id - jdsoni01@gmail.com.. i want your help to develop few application.. Plz write to me..
ReplyDeleteWHere is whole code
ReplyDeletecan you make this program in c++ by using loops
ReplyDeletearrays and functions
Sir could you please add availablity of doctors and prescription also in this project
ReplyDeleteMujha ya bata dejeya ke aapna title bar ma kuch option add leya hi usema aapna user ka kuch input nh leya bas usa click krna baad open ho jata hi useka subtitle ya kaisa add karo please help
ReplyDelete