A

PROJECT REPORT

ON
PURCHASE ORDER SYSTEM

Submitted to the

Suresh , Presidency University

In partial fulfilment of the requirement for

The Degree of

Bachelor of Commerce

(Computer Application)

1
 CERTIFICATE

CONTENTS

 Certificate
 Acknowledgement
 Preface

2
 Introduction to Problem area
 Existing System
 Limitation of the existing system
 Proposed System
 Advantages of Proposed System
 System Analysis & Designing
 Input Design
 Output Design
 Coding
 Output
 Limitations of Project
 Further Scope
 References

3
INTRODUCTION
TO
PROBLEM AREA

4
 INTRODUCTION TO PROBLEM AREA

Studying the manual system of Purchase Order System and

various information requirements, it has been proposed to develop

the computerize system for transaction. As computer is capable of

processing large amount of data at a very high speed with high

degree of accuracy. The data can be stored in small space for

years together without any trouble and can be retrieved whenever

required in few seconds. In the proposed system, data will be

entered into the computer online. In the "Purchase Order System"

data is mainly stored in the main menu file. This file is further

divided in the purchases. Daily sale, other expenses and quit. In

purchasing goods a menu is there in which files of add item

monthly record are placed. Then lastly there is quit entry.

Through the quit entry we can come out from the main menu.

5
EXISTING SYSTEM

6
 EXISTING SYSTEM

In the manual systems of the entries regarding the raw

material are passed in different books. On the arrival of the

goods the first entries made at the gate and for this a

separate registered is maintained.

The goods are passed to the store and the entry of the

bills is made in the incoming register. A slip is issued by the

stores to confirm the arrival of the goods from the

responsible authority, after confirmation the entry is made

in stores receipt register. These good are sold out as the

demand of the purchaser. These purchase of raw products

is maintained in registers. The register making takes much

more time and also these are calculation which may be

some time not accurate . also there can not be done any

comparative study.

7
LIMITATION OF EXISTING SYSTEM

8
 LIMITATION OF EXISTING SYSTEM

1) The system is complicated one and involves a lot

of hardworking.

2) It is time consuming one because the calculations

and the operation of reports are manual

3) The system is unreliable and inaccurate

4) The maintenance of minimum stock level is

difficult.

5) System saves the stationary which cost heavily

now a days.

6) Mistakes can be in this system because

calculation are manual.

9
PROPOSED SYSTEM

10
 PROPOSED SYSTEM

The problem of the manual data processing led to the

introduction of computerized method. The system

basically follows the same procedure. The entry is made

at gate in register. The goods being passed on to the

stores and then the bill are recorded in the store incoming

register. The store passes a slip to computer department.

The slip contains ifnormation regarding value of goods,

quality and item code regarding the goods.

The computer department passes the copy daily bill

register to stores to confirm the entry and incoming

goods later. When the goods are issued to the workshop

slip is passed to the computer department and the

respective entries are made onto the computer. The

department passes the copy of daily issue register to

confirm the issue of all items during the day.

11
ADVANTAGES OF PROPOSED SYSTEM

12
 ADVANTAGES OF PROPOSED SYSTEM

1. Large amount of data can be stored with the help of

powerful storage media like floppies, disks etc.
2. Purchasing involves lesser economy
3. This system is useful to enter and store the data
4. Redundancy of information has been controlled.
5. System saves the stationary which costs heavily
nowadays
6. In this system, load is greatly reduced in case of invite
quotation, finalization of quotation and preparing of
transaction orders and reminders etc.

13
SYSTEM ANALYSIS
AND
DESIGNING

14
 SYSTEM ANALYSIS

Purchase is defined as any idle in coming resource of an

enterprise. It is physical work of goods kept for the purpose

of future affairs. It is generally used to indicate raw

material, semi-finished goods and finished goods stocked in

order to meet expected future demand, Inventory is not

meant for immediate use. For enterprises an Inventory of

materials become essential in order.

1 To purchase smooth and efficient running of the

business.

2 To provide adequate of price discounts bulk purchase

3 To take advantage of batching and longer production

runs

4 To serve as a buffer in case of delayed delivers of raw

materials and rejections or against uncertain lead time

5 To provide feasibility to allow changes in production

plan in view of change in demand etc.

6 To make possible economic in transportation etc.

7 To absorb fluctuations in market.

15
 Inventory means lock up of capital of an enterprise.

Maintenance of inventory also cost money by way of

expenses or stores, equipments, personal, insurance etc.

This calls for the inventories in the most profitable manner.

Broadly speaking Purchase Order System refers to the

function of directions goods through the entire

manufacturing cycle from the requisition of raw materials to

the minimum investment and the best possible customer

service.

PURCHASE ORDER SYSTEM:

Basically two types of Purchase Order System can be for

seen.

1 FIXED

2 PROBALISTIC

A) ABC ANALYSIS:

When there may items are classified on the basis of

their value, usage rate and critically.

B) MIN-MAX SYSTEM:

16
 For each type of Inventory minimum level is set that

demands safety to prevent out of stock conditions. The

minimum level also gave the ordering proving. An order of

sufficient size is placed to bring the inventory the max front

when the minimum level is reached.

C) TWO BIN SYSTEM:

In this system, the stock of each items is separated into

two files, in the first a sufficient supply is kept to meet the

current demand during lead time necessary to fill the order.

INVENTORY RISKS:

Can be traced to three basic factors i.e. Price decline,

deterioration and obsolescence.

1 Price Decline:

May result from any increase in the market supply of

product, introduction of a new competitive produce, or price

cutting by competitors. Price may also decline when the

17
supply remains same and there is decrease in the general

market demand.

2 Product Deterioration:

May result due to holding of a product too long or when

stocked under improper physical conditions.

3 Obsolescence:

Changing customer taste, particularly in high style

merchandise may render finished goods and even raw

material absolute. The considering all this we see that

inventories are risky assets to be manage and therefore

calls for a very efficient control.

18
 SYSTEM DESIGNING

Designing a software is most important phase of software phase of software

development. It requires careful planning, logical thinking on the part of
system designer. System design for proposed system comes under following
phases:
1. Input Design
2. Output Design
3. File Design
4. Input Design:
Input designing is a part of overall system designing which requires
careful attention as collection of input data is most expensive part of the
system. Inputs are used to detect errors to some extent in between the
programming procedures. I have included following inputs in my project of
"Trading Co. Transaction" When project is executed following main menu
is printed.

Main Menu
P PRODUCT MASTER
O ORDER PLACEMENT
V VENDOR MASTER
I ISSUE MASTER
Q REPORT MASTER
E EXIT

When first option is selected then Received Material Menu will be displayed
with data entry regarding purchases of new goods.

19
INPUT DESIGN OF SALES MENU
1 Good Code:
It is the number given to product for identification. This number
should be falling within 1,2,3 numbers which are specified.

2 Good Name:
It tells the name of the Good which is sold to the customer. Without
knowing the name of Good one can't sell that Good.

3 Customer Name & Address:

It is required for issuing the bill. It tells whom the Good is sold.

4 Unit Price:
It tells the price of the Good. It tells how much the Good costs and
gives its unit price.

OUTPUT DESIGN:
Outputs are required to produce result of processing to the user. Output will
be in the form of a screen where different options will be displayed. In
output designing there is report menu. IT is fourth option of main menu. It
gives the output design of the system. It has been further divided to three
options given below.

ISSUE MASTER
E ISSUE ENTRY
M ISSUE MODIFY ENTRY
Q ISSUE QUERY ENTRY

20
X EXIT

NEXT MENU IS OF REPORT: It has following options:

REPORT MASTER
I ITEM REPORT
S ISSUE REPORT
X EXIT

FILE DESIGN
struct
{char pcode[5};
char pname[20];
char desc[20];
char type[3];
char unitp[5];
char qty[5];
char max[5];
char min[5];
}product, mproduct;
This structure defines the product details in respect to there data type.
struct
{char pcode[5];
char pname[20];
char desc[20];
char min[3];
char qty[5];
char max[5];

21
char unitp[5];
char type[3];
}item;
This structure defines the issue item details in respect to there data type.
char pcode[5] : It defines the product code.
char pname[20] : It defines the product name.
char desc[20] : It defines the description of goods.
char min[3] : It determines the min qty.
char qty[5] : Current qty.
char max[5] : Maximum qty.
char unitp[5] : Unit Price
char type[3] : Goods type
The basic data types are same so major data variables are defined.

22
CODING

23
/* PURCAHSE ORDER SYSTEM */

#include<stdio.h>
#include<conio.h>
#include<dos.h>
#include<string.h>
#include<process.h>
#include<graphics.h>
#include<ctype.h>
struct
{ char pcode[5];
char pname[20];
char desc[20];
char type[3];
char unitp[5];
char qty[5];
char max[5];
char min[5];
}product,mproduct;

struct
{
char pcode[5];
char pname[20];
char desc[20];
char min[3];
char qty[5];
char max[5];
char unitp[5];
char type[3];
}item;
struct
{ char vcode[5];
char vname[20];
char adde[20];
char city[15];
char contno[10];
char parti[15];
}vender,mvender;
struct
{ char ocode[5];
char qty[8];
char icode[5];
char vcode[5];
char vname[20];
char qtyj[5];
char qtyr[5];
char topaid[5];
char topay[5];
}order,order1,morder;

void main()
{
char ch;
void pmenu(),omenu(),vmenu(),rmenu();
int gd=DETECT,gm=0;
initgraph(&gd,&gm," ");
clrscr();

24
 settextstyle(1,0,4);
outtextxy(190,50,"PROJECT");
outtextxy(250,140,"ON");
outtextxy(150,220,"PURCHASE ORDER");
outtextxy(200,300,"SYSTEM");
settextstyle(1,0,3);
outtextxy(250,400,"press any key to continue");
getch();
closegraph();
clrscr();
initgraph(&gd,&gm," ");
settextstyle(1,0,4);
outtextxy(100,40,"PURCHASE ORDER SYSTEM");
settextstyle(1,0,3);
getch();
while(1)
{
clrscr();
setcolor(15);
setfillstyle(1,RED);
rectangle(50,30,550,350);
floodfill(30,50,15);
settextstyle(1,0,3);
outtextxy(100,50, "**** PURCHASE ORDER SYSTEM ****");
outtextxy(160,140," P: PURCHASE PRODUCT");
outtextxy(160,170," O: ORDER PLACING");
outtextxy(160,200," V: VENDOR DATA");
outtextxy(160,230," R: REPORT ");
outtextxy(160,260," E: EXIT");
outtextxy(185,290," ENTER YOUR CHOICE");
ch=getch();
ch=toupper(ch);
switch(ch)
{case 'P' : pmenu();break;
case 'O' : omenu();break;
case 'V' : vmenu();break;
case 'R' : rmenu();break;
case 'E' : break;
}
if (ch=='E')
break;}
}
void pmenu()
{char ch1;
clrscr();
while(1)
{
int gd=DETECT,gm=0;
initgraph(&gd,&gm," ");
clrscr();
setcolor(4);
setfillstyle(1,RED);
rectangle(50,30,550,350);
setcolor(WHITE);
floodfill(30,50,4);
settextstyle(1,0,3);
outtextxy(140,50,"PURCHASE PRODUCT");
outtextxy(160,140,"E : DATA ENTERY MODULE");
outtextxy(160,170,"M : DATA MODIFICATION MODULE");
outtextxy(160,200," Q : DATA QUERY MODULE");
outtextxy(160,230,"X: QUIT");

25
 outtextxy(180,260,"enter your choice....." );
ch1=getch();
ch1=toupper(ch1);

switch(ch1)
{case 'E': entry();break;
case 'M': modi();break;
case 'Q': query();break;
case 'X' : break;
}
if(ch1=='X')
break;
}
}

void omenu()
{char ch2;
clrscr();
while(1)
{int gd=DETECT,gm=0;
initgraph(&gd,&gm," ");
setcolor(4);
setfillstyle(1,RED);
rectangle(50,30,550,350);
setcolor(WHITE);
floodfill(30,50,4);
settextstyle(1,0,3);
outtextxy(140,50," ORDER PLACE");
outtextxy(80,110,"R : DATA ENTERY MODULE");
outtextxy(80,140,"M : DATA MODIFICATION MODULE");
outtextxy(80,170,"G : GOOD RECEIVE ENTRY MODULE");
outtextxy(80,200,"Q : DATA QUERY MODULE");
outtextxy(80,230,"A : AMOUNT PAYMENT ENTRY MODULE");
outtextxy(80,260,"X : EXIT");
outtextxy(80,290,"enter your choice....." );
ch2=getch();
ch2=toupper(ch2);

switch(ch2)
{case 'R': oentry();break;
case 'M': omodi();break;
case 'Q': oquery();
break;
case 'G': ogood();break;
case 'A': oamount();
break;
case 'X': break;
}
if(ch2=='X')
break;
}
}

void vmenu()
{ char ch3;
clrscr();
while(1)

26
 {int gd=DETECT,gm=0;
initgraph(&gd,&gm," ");
setcolor(4);
setfillstyle(1,RED);
rectangle(50,30,550,350);
setcolor(WHITE);
floodfill(30,50,4);
settextstyle(1,0,3);
outtextxy(140,50," VENDOR DATA");
outtextxy(160,110,"E : DATA ENTERY MODULE");
outtextxy(160,140,"M : DATA MODIFICATION MODULE");
outtextxy(160,170,"Q: DATA QUERY MODULE");

outtextxy(160,200,"X : EXIT");
outtextxy(180,230,"enter your choice....." );
ch3=getch();
ch3=toupper(ch3);

switch(ch3)
{case 'E': ventry();break;
case 'M': vmodi();break;
case 'Q': vquery();break;
case 'X': break;
}
if(ch3=='X')
break;
}
}
void rmenu()
{char ch4;
clrscr();
while(1)

{
int gd=DETECT,gm=0;
initgraph(&gd,&gm," ");
setcolor(4);
setfillstyle(1,RED);
rectangle(50,30,550,350);
setcolor(WHITE);
floodfill(30,50,4);
setcolor(WHITE);
settextstyle(1,0,3);
outtextxy(140,50," REPORT");

outtextxy(160,110,"I : ITEM REPORT");

outtextxy(160,140,"V : VENDOR REPORT");
outtextxy(160,170,"O: ORDER REPORT");
outtextxy(160,200,"G: GOOD RECEVING REPORT");
outtextxy(160,230,"A: AMOUNT PAYMENT REPORT");
outtextxy(160,260,"X : EXIT");
ch4=getch();
ch4=toupper(ch4);

switch(ch4)
{case 'I':irep();break;
case 'V':vrep();break;
case 'O':orep();break;
case 'G':grep();break;
case 'A':prep();break;

27
 case 'X':break;
}
if(ch4=='X')
break;
}
}

scom(char a[], char b[], int n)

{ int i,r=1;
for(i=0;i<n;++i)
if( a[i]!=b[i])
r=0;
return r;
}

entry()
{char ch='Y',res;
int i,n;
FILE * fp;

fp=fopen("[Link]","ar+");
while(toupper(ch)=='Y')
{closegraph();
clrscr();
gotoxy(10,5);printf(" **** DATA ENTRY MODULE ****");
gotoxy(10,7);printf(" CODE OF PRODUCT ");
gotoxy(10,8);printf(" NAME OF PRODUCT ");
gotoxy(10,9);printf(" DESCRIPTION ");
gotoxy(10,10);printf(" TYPE ");
gotoxy(10,11);printf(" PRINCE PER UNIT ");
gotoxy(10,12);printf(" QUANTITY ");
gotoxy(10,13);printf(" MAX. QTY. ");
gotoxy(10,14);printf(" MIN. QTY. ");
gotoxy(38,7);gets([Link]);
gotoxy(38,8);gets([Link]);
gotoxy(38,9);gets([Link]);
gotoxy(38,10);gets([Link]);
gotoxy(38,11);gets([Link]);
gotoxy(38,12);gets([Link]);
gotoxy(38,13);gets([Link]);
gotoxy(38,14);gets([Link]);
gotoxy(20,15);printf("Entries Correct Y/N");
res=getch();
if(toupper(res)=='Y')
{ for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=19;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=19;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=2;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);

28
 for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,20);
n=strlen([Link]);
con([Link],n,20);
n=strlen([Link]);
con([Link],n,3);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,5);
fwrite(&product,sizeof(product),1,fp);
}
gotoxy(1,23);printf("Press Y to continue");
ch=getch();
}
fclose(fp);
return;
}
con(char sa[],int n,int tlen)
{int i;
for(i=0;i<n;++i)
sa[i]=toupper(sa[i]);
for(i=n;i<tlen;++i)
sa[i]=' ';
return;
}

modi()
{
char ch='Y',res;
char mpcode[5];
char mpname[20];
char mdesc[20];
char mtype[3];
char munitp[5];
char mqty[5];
char mmax[5];
char mmin[5];
int i,count=0,recsize=sizeof(product),n,l1;

FILE *fp;
fp=fopen("[Link]","r+");
while(toupper(ch)=='Y')
{ closegraph();
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA MODIFICATION MODULE ***");
gotoxy(10,7);printf(" CODE OF PRODUCT ");

29
gotoxy(10,8);printf(" NAME OF PRODUCT ");
gotoxy(10,9);printf(" DESCRIPTION ");
gotoxy(10,10);printf(" TYPE ");
gotoxy(10,12);printf(" PRINCE PER UNIT ");
gotoxy(10,11);printf(" QUANTITY ");
gotoxy(38,7);gets(mpcode);
for(i=0;i<=4;++i)
mpcode[i]=toupper(mpcode[i]);
while(fread(&product,sizeof(product),1,fp)==1)
{n=strlen(mpcode);
if(scom([Link],mpcode,n)==1)
{++count;
gotoxy(38,8);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(38,9);for(i=0;i<20;++i)

printf("%c",[Link][i]);
gotoxy(38,10);for(i=0;i<3;++i)
printf("%c",[Link][i]);
gotoxy(38,11);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,12);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,8);gets(mpname);
gotoxy(38,9);gets(mdesc);
gotoxy(38,10);gets(mtype);
gotoxy(38,11);gets(mqty);
gotoxy(38,12);gets(munitp);
gotoxy(20,15);printf("Entries Correct Y/N : ");
res=getche();
if(toupper(res)=='Y')
{
n=strlen([Link]);
con([Link],n,20);
n=strlen([Link]);
con([Link],n,20);
n=strlen([Link]);
con([Link],n,3);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,5);

fseek(fp,-recsize,SEEK_CUR);

fwrite(&product,sizeof(product),1,fp);
}
}
}
if(count==0)
{gotoxy(35,20);printf("record not found");}
gotoxy(1,23);printf("Press Y to Continue ");
ch=getch();
}
fclose(fp);
return;
}

query()

30
{ char ch='Y',res;
char mpcode[5];
int i,n,count=0;
FILE *fp;
fp=fopen("[Link]","r");
while(toupper(ch)=='Y')
{closegraph();
count=0;
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA QUERY MODULE ***");
gotoxy(10,7);printf(" CODE OF PRODUCT ");
gotoxy(10,8);printf(" NAME OF PRODUCT ");
gotoxy(10,9);printf(" DESCRIPTION ");
gotoxy(10,10);printf(" TYPE ");
gotoxy(10,12);printf(" PRINCE PER UNIT ");
gotoxy(10,11);printf(" QUANTITY ");
gotoxy(38,7);gets(mpcode);
for(i=0;i<=4;++i)
mpcode[i]=toupper(mpcode[i]);
while(fread(&product,sizeof(product),1,fp)!=0)
n=strlen(mpcode);
if (scom([Link],mpcode,n)==1)
{ ++count;
gotoxy(38,8);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(38,9);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(38,10);for(i=0;i<3;++i)
printf("%c",[Link][i]);
gotoxy(38,11);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,12);for(i=0;i<5;++i)
printf("%c",[Link][i]);
}
if(count==0)

{ gotoxy(30,15);printf("Record not found");}

gotoxy(1,23);printf("Press Y to Continue ");
ch=getch();
}
fclose(fp);
return;
}

oentry()
{
char ch='Y',res;
int i;
FILE *fp;
fp=fopen("[Link]","ar+");
while(toupper(ch)=='Y')
{closegraph();
clrscr();

gotoxy(10,5);printf(" *** DATA ENTRY MODULE *** ");

gotoxy(10,7);printf(" ORDER CODE ");

31
 gotoxy(10,8);printf(" ITEM CODE ");
gotoxy(10,9);printf(" VENDOR CODE ");
gotoxy(10,10);printf(" VENDOR NAME ");
gotoxy(10,11);printf(" QUANTITY ");
gotoxy(38,7);gets([Link]);
gotoxy(38,8);gets([Link]);
gotoxy(38,9);gets([Link]);
gotoxy(38,10);gets([Link]);
gotoxy(38,11);gets([Link]);
gotoxy(20,15);printf("Entries Correct Y/N");
res=getch();
if(toupper(res)=='Y')
{// clrscr();
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=19;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=7;++i)
[Link][i]=toupper([Link][i]);
fwrite(&order,sizeof(order),1,fp);
}
gotoxy(1,23);printf("press Y to continue....");
ch=getch();
}
fclose(fp);
return;
}

omodi()
{ char ch='Y',res;
char mocode[5];
char mqty[8];
char micode[5];
char mvcode[5];
char mvname[20];
int i,count=0,n,recsize=sizeof(order);
FILE *fp;
fp=fopen("[Link]","r+");
while(toupper(ch)=='Y')
{ closegraph();
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA MODIFICATION MODULE *** ");
gotoxy(10,7);printf(" ORDER CODE ");
gotoxy(10,8);printf(" ITEM CODE ");
gotoxy(10,9);printf(" VENDOR CODE ");
gotoxy(10,10);printf(" VENDOR NAME ");
gotoxy(10,11);printf(" QUANTITY ");
gotoxy(38,7);gets(mocode);
for(i=0;i<=4;++i)
mocode[i]=toupper(mocode[i]);
while(fread(&order,sizeof(order),1,fp)==1)
{ n=strlen(mocode);
if(scom([Link],mocode,n)==1)
{++count;

32
 gotoxy(38,8);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,9);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,10);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(38,11);for(i=0;i<8;++i)
printf("%c",[Link][i]);
gotoxy(38,8);gets(micode);
gotoxy(38,9);gets(mvcode);
gotoxy(38,10);gets(mvname);
gotoxy(38,11);gets(mqty);
gotoxy(20,15);printf("Entries Are Correct Y/N....");
res=getche();
if(toupper(res)=='Y')
{ n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,5);
n=strlen([Link]);
con([Link],n,20);
n=strlen([Link]);
con([Link],n,8);
fseek(fp,-recsize,SEEK_CUR);
fwrite(&order,sizeof(order),1,fp);
}
}
}
if(count==0)
{ gotoxy(35,20);printf("RECORD NOT FOUND");}
gotoxy(1,23);printf("Press Y to continue");
ch=getch();
}
fclose(fp);
return;
}

oquery()
{
char ch='Y',res;
char mocode[5];
int i,n,count=0;
FILE * fp;
fp=fopen("[Link]","r");
while(toupper(ch)=='Y')
{closegraph();
count=0;
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA QUERY MODULE ***");
gotoxy(10,7);printf(" ORDER CODE ");
gotoxy(10,8);printf(" ITEM CODE ");
gotoxy(10,9);printf(" VENDOR CODE ");
gotoxy(10,10);printf(" VENDOR NAME ");
gotoxy(10,11);printf(" QUANTITY ");
gotoxy(38,7);gets(mocode);
for(i=0;i<=4;++i)
mocode[i]=toupper(mocode[i]);
while(fread(&order,sizeof(order),1,fp)!=0)

33
 n=strlen(mocode);
if(scom([Link],mocode,n)==1)
{ ++count;
gotoxy(38,8);for(i=0;i<8;++i)
printf("%c",[Link][i]);
gotoxy(38,9);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,10);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(38,11);for(i=0;i<20;++i)
printf("%c",[Link][i]);

}
if(count==0)
{ gotoxy(30,15);printf("Record not found");
}
gotoxy(1,23);printf("Press Y to Continue ");
ch=getch();
}
fclose(fp);
return;
}

ventry()
{ char ch='Y',res;
int i;
FILE *fp;
fp=fopen("[Link]","ar+");
while(toupper(ch)=='Y')
{closegraph();
clrscr();
gotoxy(10,5);printf(" *** DATA ENTRY MODULE *** ");
gotoxy(10,7);printf(" VENDOR CODE ");
gotoxy(10,8);printf(" VENDOR NAME ");
gotoxy(10,9);printf(" VENDOR ADDRESS ");
gotoxy(10,10);printf(" CITY ");
gotoxy(10,11);printf(" CONTACT NO. ");
gotoxy(10,12);printf(" PARTICULARS ");
gotoxy(38,7);gets([Link]);
gotoxy(38,8);gets([Link]);
gotoxy(38,9);gets([Link]);
gotoxy(38,10);gets([Link]);
gotoxy(38,11);gets([Link]);
gotoxy(38,12);gets([Link]);
gotoxy(20,15);printf("Entries Correct Y/N");
res=getch();
if(toupper(res)=='Y')
{for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=19;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=19;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=14;++i)
[Link][i]=toupper([Link][i]);

34
for(i=0;i<=9;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=14;++i)
[Link][i]=toupper([Link][i]);

fwrite(&vender,sizeof(vender),1,fp);
}
gotoxy(1,23);printf("press Y to continue....");
ch=getch();
}
fclose(fp);
return;
}

vmodi()
{
char ch='Y',res;
char mvcode[5];
char mvname[20];
char madde[20];
char mcity[15];
char mcontno[10];
char mparti[15];
int i,n,count=0,recsize=sizeof(vender);
FILE *fp;
fp=fopen("[Link]","r+");
while(toupper(ch)=='Y')
{closegraph();
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA MODIFICATION MODULE *** ");
gotoxy(10,7);printf(" VENDOR CODE ");
gotoxy(10,8);printf(" VENDOR NAME ");
gotoxy(10,9);printf(" VENDOR ADDRESS ");
gotoxy(10,10);printf(" CITY ");
gotoxy(10,11);printf(" CONTACT NO. ");
gotoxy(10,12);printf(" PARTICULARS ");
gotoxy(38,7);gets(mvcode);
for(i=0;i<=4;++i)
mvcode[i]=toupper(mvcode[i]);
while(fread(&vender,sizeof(vender),1,fp)==1)
{n=strlen(mvcode);
if(scom([Link],mvcode,n)==1)
{++count;
gotoxy(38,8);puts([Link]);
gotoxy(38,9);puts([Link]);
gotoxy(38,10);puts([Link]);
gotoxy(38,11);puts([Link]);
gotoxy(38,12);puts([Link]);
gotoxy(38,8);gets(mvname);
gotoxy(38,9);gets(madde);
gotoxy(38,10);gets(mcity);
gotoxy(38,11);gets(mcontno);
gotoxy(38,12);gets(mparti);
gotoxy(20,15);printf("Entries Are Correct Y/N....");
res=getch();
if(toupper(res)=='Y')
{n=strlen(mvcode);
fseek(fp,-recsize,SEEK_CUR);
fwrite(&vender,sizeof(vender),1,fp);

35
 }
}
}
if(count==0)
{ gotoxy(35,20);printf("RECORD NOT FOUND");}
gotoxy(1,23);printf("Press Y to continue");
ch=getche();
}
fclose(fp);
return;
}

vquery()
{char ch='Y',res;
char mvcode[5];
int i,count=0;
FILE *fp;
fp=fopen("[Link]","r");
while(toupper(ch)=='Y')
{closegraph();
count=0;
clrscr();
rewind(fp);
gotoxy(10,5);printf(" *** DATA QUERY MODULE ***");
gotoxy(10,7);printf(" VENDOR CODE ");
gotoxy(10,8);printf(" VENDOR NAME ");
gotoxy(10,9);printf(" VENDOR ADDRESS ");
gotoxy(10,10);printf(" CITY ");
gotoxy(10,11);printf(" CONTACT NO. ");
gotoxy(10,12);printf(" PARTICULARS ");
gotoxy(38,7);gets(mvcode);
for(i=0;i<=4;++i)
mvcode[i]=toupper(mvcode[i]);
while(fread(&vender,sizeof(vender),1,fp)!=0)
if(strcmp([Link],mvcode)==0)
{ ++count;
gotoxy(38,8);puts([Link]);
gotoxy(38,9);puts([Link]);
gotoxy(38,10);puts([Link]);
gotoxy(38,11);puts([Link]);
gotoxy(38,12);puts([Link]);
}
if(count==0)
{
gotoxy(30,15);printf("Record not found");
}
gotoxy(1,23);printf("Press Y to Continue ");
ch=getch();
}
fclose(fp);
return;
}

oamount()
{
char ch='Y',res;
int i;

36
FILE *fp;
fp=fopen("[Link]","ar+");
while(toupper(ch)=='Y')
{ closegraph();
clrscr();
gotoxy(20,5);printf(" *** AMOUNT PAYMENT ENTRY *** ");
gotoxy(10,7);printf(" ORDER CODE ");
gotoxy(10,8);printf(" ITEM CODE ");
gotoxy(10,9);printf(" VENDOR CODE ");
gotoxy(10,10);printf(" QUANTITY ");
gotoxy(10,11);printf(" AMOUNT TO BE PAY ");
gotoxy(10,12);printf(" QUANTITY REJECTED ");
gotoxy(10,13);printf(" QUANTITY RECEIVED ");
gotoxy(10,14);printf(" AMOUNT TO BE PAID ");
gotoxy(40,7);gets([Link]);
gotoxy(40,8);gets([Link]);
gotoxy(40,9);gets([Link]);
gotoxy(40,10);gets([Link]);
gotoxy(40,11);gets([Link]);
gotoxy(40,12);gets([Link]);
gotoxy(40,13);gets([Link]);
gotoxy(40,14);gets([Link]);
gotoxy(20,17);printf("Entries Correct Y/N");
res=getch();
if(toupper(res)=='Y')
{
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
fwrite(&order,sizeof(order),1,fp);
}
gotoxy(1,23);printf("Press Y to continue.......");
ch=getche();
}
fclose(fp);
return;
}

ogood()
{
char ch='Y',res;
int i;
FILE *fp;
fp=fopen("[Link]","ar+");
while(toupper(ch)=='Y')
{ closegraph();
clrscr();

37
 gotoxy(20,5);printf(" *** GOOD RECEVING ENTRY *** ");
gotoxy(10,7);printf(" ORDER CODE ");
gotoxy(10,8);printf(" ITEM CODE ");
gotoxy(10,9);printf(" VENDOR CODE ");
gotoxy(10,10);printf(" QUANTITY ");
gotoxy(10,12);printf(" QUANTITY REJECTED ");
gotoxy(10,13);printf(" QUANTITY RECEIVED ");
gotoxy(10,14);printf(" AMOUNT TO BE PAID ");
gotoxy(38,7);gets([Link]);
gotoxy(38,8);gets([Link]);
gotoxy(38,9);gets([Link]);
gotoxy(38,10);gets([Link]);
gotoxy(38,11);gets([Link]);
gotoxy(40,12);gets([Link]);
gotoxy(40,13);gets([Link]);
gotoxy(20,17);printf("Entries Correct Y/N");
res=getch();
if(toupper(res)=='Y')
{
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);

for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
for(i=0;i<=4;++i)
[Link][i]=toupper([Link][i]);
fwrite(&order,sizeof(order),1,fp);
}
gotoxy(1,23);printf("Press Y to continue.......");
ch=getche();
}
fclose(fp);
return;
}

irep()
{
FILE *fp;
int r,i;
fp=fopen("[Link]","r");
closegraph();
clrscr();
gotoxy(40,3);printf("****STOCK REPORT****");

gotoxy(1,4);printf("---------------------------------------------------
-------------");
gotoxy(1,5);printf("[Link] prodname max qty min
");

gotoxy(1,6);printf("___________________________________________________
_____________");
r=8;

38
 while(fread(&product,sizeof(product),1,fp) !=0)
{
gotoxy(1,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(16,r);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(30,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(39,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(47,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(60,r);
if(atoi([Link])>atoi([Link]))
printf("Above");
else
{ if(atoi([Link])>=atoi([Link]))
printf("Normal");
else
printf("below");}
if(r<=22)
r++;
else
{
gotoxy(2,22);printf("press any key to continue");
getch();
clrscr();
gotoxy(40,3);printf("STOCK REPORT");

gotoxy(1,4);printf("___________________________________________________
__");
gotoxy(1,5);printf("[Link] prod name max qty
min ");

gotoxy(1,6);printf("---------------------------------------------------
--");
r=10;
}
}
++r;

gotoxy(1,r);printf("---------------------------------------------------
------------");
getche();
}

orep()
{
FILE *fp;
int r,i;
fp=fopen("[Link]","r");
closegraph();
clrscr();
gotoxy(40,3);printf("order report");

gotoxy(1,4);printf("---------------------------------------------------
---");
gotoxy(1,5);printf("order code icode vcode vname
qty ");

39
gotoxy(1,6);printf("---------------------------------------------------
---");
r=8;
while(fread(&order,sizeof(order),1,fp) !=0)
{ gotoxy(1,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(15,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(24,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(34,r);for(i=0;i<20;++i)
printf("%c",[Link][i]);
gotoxy(51,r);for(i=0;i<8;++i)
printf("%c",[Link][i]);
if(r<=22)
r++;
else
{
gotoxy(2,22);printf("press any key to continue");
getche();
clrscr();
gotoxy(30,3);printf("ORDER REPORT");

gotoxy(1,4);printf("---------------------------------------------------
------");
gotoxy(1,5);printf("[Link] icode vcode vname
qty ");

gotoxy(1,6);printf("---------------------------------------------------
------");
r=10;
}
} ++r;

gotoxy(1,r);printf("---------------------------------------------------
-------");
getch();
}

vrep()
{
FILE *fp;
int r;
fp=fopen("[Link]","r");
closegraph();
clrscr();
gotoxy(40,3);printf("**** VENDER REPORT ****");

gotoxy(1,4);printf("---------------------------------------------------
-----------------");
gotoxy(1,5);printf("vender code vender name vender add.
city contactno. ");

gotoxy(1,6);printf("---------------------------------------------------
-----------------");
r=8;
while(fread(&vender,sizeof(vender),1,fp) !=0)
{ gotoxy(1,r);puts([Link]);
gotoxy(15,r);puts([Link]);

40
 gotoxy(32,r);puts([Link]);
gotoxy(47,r);puts([Link]);
gotoxy(57,r);puts([Link]);
if(r<=22)
r++;
else

{ gotoxy(2,22);printf("press any key to continue");

getche();
clrscr();
gotoxy(30,3);printf("****VENDER REPORT****");

gotoxy(1,4);printf("---------------------------------------------------
------------");
gotoxy(1,5);printf(" vender code vender name vender
add. city contactno");

gotoxy(1,6);printf("---------------------------------------------------
-------------");
r=8;
}
} ++r;

gotoxy(1,r);printf("---------------------------------------------------
----------------");
getche();
}

grep()
{
FILE *fp;
int r;
fp=fopen("[Link]","r");
closegraph();
clrscr();
gotoxy(20,3);printf("**** GOOD RECEVING REPORT ****");

gotoxy(1,4);printf("---------------------------------------------------
-----------");
gotoxy(1,5);printf("order code icode vcode qty qtyr
qtyj topay");

gotoxy(1,6);printf("---------------------------------------------------
------------");
r=8;
while(fread(&order,sizeof(order),1,fp) !=0)
{

gotoxy(1,r);puts([Link]);
gotoxy(15,r);puts([Link]);
gotoxy(24,r);puts([Link]);
gotoxy(32,r);puts([Link]);
gotoxy(39,r);puts([Link]);
gotoxy(48,r);puts([Link]);
gotoxy(58,r);puts([Link]);
if(r<=22)
r++;
else
{

41
 gotoxy(2,22);printf("press any key to continue");
getche();
clrscr();
gotoxy(30,3);printf("****GOOD RECEVING REPORT");

gotoxy(1,4);printf("---------------------------------------------------
--------");
gotoxy(1,5);printf("order code icode vcode qty
qtyr qtyj topay ");

gotoxy(1,6);printf("---------------------------------------------------
--------");
r=10;
}
} ++r;

gotoxy(1,r);printf("---------------------------------------------------
----------");
getche();
}

prep()
{
FILE *fp;
int r,i;
fp=fopen("[Link]","r");
closegraph();
clrscr();
gotoxy(20,3);printf("**** PAYMENT REPORT ****");

gotoxy(1,4);printf("---------------------------------------------------
-----------------");
gotoxy(1,5);printf("icode vcode qty qtyr qtyj topay
topaid ");

gotoxy(1,6);printf("---------------------------------------------------
------------------");
r=8;
while(fread(&order1,sizeof(order1),1,fp) !=0)
{
gotoxy(1,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(10,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(19,r);for(i=0;i<8;++i)
printf("%c",[Link][i]);
gotoxy(26,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(33,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);

gotoxy(41,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);
gotoxy(51,r);for(i=0;i<5;++i)
printf("%c",[Link][i]);

if(r<=22)
r++;

42
 else

{
gotoxy(2,22);printf("press any key to continue");
getch();
clrscr();
gotoxy(30,3);printf("**** PAYMENT REPORT****");

gotoxy(1,4);printf("---------------------------------------------------
------");
gotoxy(1,5);printf("icode vcode qty qtyr qtyj
topay topaid");

gotoxy(1,6);printf("---------------------------------------------------
-----");
r=10;
}
} ++r;

gotoxy(1,r);printf("---------------------------------------------------
----");
getche();
}

LIMITATIONS OF
THE PROJECT

43
 LIMITATIONS OF THE PROJECT

1. It does not display the code list itself.

2. It does not display the Good menu of purchase with
amount.
3. It does not provide sales menu respect to company
name.
4. It works on GIGO concept.
5. No user security options such as password are given.
6. Unable to share data on multi user plateform.

44
FURTHER SCOPE

45
 FURTHER SCOPE

A development never ever can be fully summarized or

concluded. Still I will try my beset to conclude all the
concepts regarding my project.

1. It can be further connected with tax calculation still it

provides major head of expenses and income to
calculate net income.
2. It can be further connected with detailed stock of
goods.
3. It can be further connected with vb and this can be
converted into vb from C for the better designing.

46
REFERENCES

47
 REFERENCES

For the completion of this project, I have taken help from the
following books:

1. Programming with C by Dennice Ritche

2 Let us C
by Yashwant Kanitkar
3 Business management by Dr. R.S. Gupta
B.D. Sharma
N.S. Bhalla

48