(Affiliated to #uru #obind Sin!h Indraprastha $niversit%"
DECARATION
I
hereb%
declare
that
this
Pro&ect
Report
titled
' FAST-FOOD
submit itte ted d b% me to Delh Delhii Inst Instit itut utee Of Rura Rurall MANAG MANAGEM EMENT ENT SYSTE SYSTEM& M& subm Development, A#I POOA is is a Bonafide )or* underta*en b% me and has not been submitted to an% other $niversit% or Institution for the a)ard of an% de!ree diploma + certificate or published an% time before
_______________ ______________________ ________ _ MOHD SHOUAIB SHOUAIB 1#312$01%10 Date: / / 2012
_______________ _______________________ ________ MISS.NEHA SABHARWA P'!*+ G, Date: / / 2012
Si!nature of the Student
AC/NOWEDGEMENT
First of all I )ill than* to our director sir ' Dr. NARENDER MOHAN & , )ho !ive me the valuable su!!estion for m% minor pro&ect
-he -he succ succes esss of this this fina finall repo report rt is the the outc outcom omee of #uid #uidan ance ce and and .aluab luable le su!!estions provided b% the all concerned )ithout )hich the report could not fide on the ri!ht bac*
I e/pr e/pres esss m% sens sensee of deep deep !rat !ratit itud udee to Facu Facult lt% % 0oor 0oordi dina nato tor r MISS.NEHA SABHARWA 1 for inclusions and timel% su!!estions in the preparation of this
final report
Finall% ,I )ill be failin! in m% dut%, if I do not than* m% parents, brother, friends and )ell )ishers for their enthusiastic support and )ho have directl% or indirectl% helped in some )a% or the other in ma*in! this final report a success
ame2 3O4D S4OAIB BBA (!" 567589:5;5:
CONTENTS S.N!
CONTENTS
5
Declaration
8 7
Ac*no)led!ement Introduction Requirement anal%sis •
Problem Definition
9
Scope and Ob&ectives of the pro&ect S%stem 3ethodolo!% (
=
Anal%sis
•
6
Feasibilit% stud% Data flo) dia!rams (DFDs" •
: evel DFD
•
5 evel DFD
•
8 evel DFD
S%stem Desi!n
;
4ard)are and Soft)are Requirements 3enu Desi!n Database Desi!n 0odin! Input Output Screens
>
-estin!
?
0onclusion
5: 55
imitations Biblio!raph%
OB@0-I. Ob&ective of this soft)are is to computerie an% FastCfood Restaurant, so that all the transactions become fast and there should not be an% error in transactions li*e calculation mista*e It replaces all the paper )or* It *eeps records of all the bills also, !iven to the customers, so that user could update his dail% accounts
I-ROD$0-IO -his pro&ect is entitled PIEEA 4$- )hich is ver% famous spot for people of all a!e !roup Due to increasin! popularit% of Pia 4ut, it needs to !et all the )or* and procedures automated )hich eventuall% decreases the burden alon! )ith )hole lot of improvement in )or*in! manner 4ence, in order to accomplish this tas*, the soft)are is prepared to perform bul* amount data and sortin! procedures As the time ta*en in dealin! )ith the problem is quite lar!e, so, )e need to prepare soft)are to solve these problems
-he soft)are for department of pia hut is developed in .isual Basic because of the fact that it is one of the leadin! pro!rammin! lan!ua!e as )ell as more po)erful, eas% to understand and userCfriendl% .isual Basics helps to desi!n database files as per requirement and specific format It also helps us to enter and mana!e data in database files
-hus, )e use .B and A00SS to prepare our soft)are In this, a perfect report is bein! prepared for those )ho have to pa% bills, for collection of orders for various items, to *eep trac* of customers arrival G departure alon! )ith their orders and to emplo%ees been )or*in! inChouse 0ollectivel%, )e need to maintain the records of sales per da%
As )e *no) maintainin! records is quite tedious )or* and has to be made and updated re!ularl% So to ensure the accurac%, feasibilit%, time consumption and maintenance
5 8 7 9 =
Requirement Anal%sis G Specifications Desi!nin! Implementation G $nit -estin! Inte!ration G S%stem -estin! 3aintenance G Operation
V,4 B* .isual sual Basi Basicc )as )as deri derive ved d from from BASIC, and is an eventC eventCdri driven ven pro!ram pro!rammin min! ! lan!ua!e Pro!rammin! in .isual Basic is done visuall%, )hich means that as )e desi!n, )e )ill *no) ho) our application )ill loo* on e/ecution
Standard Professional nterprise
F+,' !5 V,4 B* .isual sual Basi Basicc 6: 6: has has man% man% po)e po)erf rful ul feat featur ures es that that are are requ requir ired ed in toda toda% %ss pro!rammin! environment, )hich include features from the previous versions Some of them are2 Programming objects and events2 the .isual forms and ob&ects li*e list bo/es and radio buttons that )e use on the forms, help us to interact )ith applications in order to find out the flo) of the pro!ram -he forms and ob&ects perform a specified action )hen an event occurs -his is *no)n as eventdriven !rogramming A common !rogramming !"at#orm across a"" Microso#t O##ice a!!"ications: Almost all 3icrosoft Office applications support .isual Basic b% sharin! and reusin! code code across applications .isual Basic support 78Cbit application $%bit s&!!ort 2 .isual A '&ic( '&ic( and eas) *a) to deve"o! a!!"ications+ -he tools provided b% .isual Basic help us to reduce development time It is faster to create applications usin! the tools available Objects t)!es+ e) ob&ect t%pes enable us to )or* faster and easier )ith files and directories
isual Basic allo)s allo)s us to mi!rat mi!ratee applic applicati ations ons to an Active, #eat&res+ .isual ActiveH document, )hich enables the application to install and run from a )eb bro)ser
V,4 V,4 B* D64!789+ E96'!989+ It consists of the follo)in! items2 M9, '2 -he menu bar is displa%ed directl% belo) the title bar and includes a list of options ach option has a dropCdo)n list that is related to the option chosen from the menu bar form is the main buildin! bloc* in a .isual Basic application $ser F!'82 A form interacts )ith the controls on the home to obtain the desired result In the desi!n mode, )e can see a !rid of dots on the form -he !rid helps to line up the controls at the time of desi!n -he dots disappear at runtime PRO@0
T= 7'!7'+ <9!< <44 74> += 7'!7'+> !5 !94> !9 !*+ + +8. MS ACCESS
3icrosoft access calls an%thin! that can have a name and ob&ect
DATABASE
A database is files in )hich %ou store data include all the ma&or ob&ects related to the stored data includin! ob&ects %ou define to automate the use of %our data In other database s%stems, the term database used to refer to onl% those files in )hich %ou store data
TABE
An ob&ect %ou define and use to store data ach table contains information about a particular sub&ect, such as customers or orders -able contains fields (or columns" that store different *inds of data, such as a name or an address, and, record (or ro)s" that collect all the information about a particular instance of the sub&ect ! All the information about a compan%
?UERY
Juer% in an ob&ect that provides a custom vie) of data from one or more table In Access, %ou can use the !raphical quer% b% e/ample (JB" facilit% or %ou can )rite SJ statements to create %our queries Kou can define queries to select, update, insert, or delete data Kou can also define queries that create ne) tables from data in one or more e/istin! table
FORM
An ob&ect desi!ned primaril% for data input or displa% or for control of application e/ecution Kou use forms to customie the presentation of data that %our application e/tracts for queries or tables Kou can also print forms Kou can desi!n a form to run a macro or a .isual Basic procedure in response to an% of a number of eventsC for e!, to run a procedure )hen the of data chan!es
REPORT
An ob&ect desi!ned for formattin!, calculatin!, printin! and summariin! selected data Kou can vie) a report on %our screen before %ou print it
DATA ACCESS PAGE
An ob&ect that includes an 4-3 file and supportin! files to provide custom access to %our data from 3icrosoft Internet /plorer Kou can publish these files on %our compan% internet to allo) other users on %our net)or* )ho also have office 8::: and internet e/plorer version = or later to vie), search, and edit %our data
MACRO
3acro is an ob&ect that is a structured definition of one or more action that %ou )ant Access to perform in response to a defined event For e!, %ou mi!ht desi!n a macro that opens a second form in response to the selection of an item on a main form Kou mi!ht have another macro that validate the content of a field )henever the value in the field chan!es Kou can include simple conditions in macros to specif% )hen one or more actions in the macro should be performed or s*ipped Kou can use macros to open and e/ecute queries, to open tables, or to print or vie) reports Kou can also run other macros or .isual Basic procedures from )ithin a macro
MODUE it is an ob&ect containin! custom procedures that %ou code usin! .isual Basic 3odules provide a discrete flo) of actions and allo) %ou to trap errors somethin! that %ou cant do )ith macros 3odules can be standCalone ob&ects containin! functions that can be called from an%)here in %our application, or the% can be directl% associated )ith a form or a report to respond to events on the associated form or report -able stores the data that %ou can e/tract )ith queries and displa% in reports and update in forms or data access pa!es otice that forms, reports, and data access pa!es can use data either directl% from tables or a filtered 'vie)1 of the
data created b% usin! queries Access has also builtCin functions that allo) %ou to summarie and format %our data in queries
EVENT
vent is an% chan!e in state of an Access ob&ect For e!, %ou can )rite macros or .isual Basic procedures to respond to
Openin! a form 0losin! a form nterin! a ne) ro) on a form 0han!in! data in the current record
CONTRO 0ontrol is an ob&ect on a form or report that contains data Kou can even use desi!n a macro or a .isual Basic procedure that responds to the user pressin! individual *e%s on the *e%board )hen enterin! data
METHODOOGY
-he methodolo!% used to develop the Pia 4ut or proposed s%stem is )aterfall model
Feasibility study Requiremen t Defnition Design specifcation
Coding
Testing
Implementati on aintenance
SAIENT FEATURES OF THE WATERFA MODE
•
It bou!ht a definite to the process of the soft)are development, )hich )as a ma&or improvement over the previous code and fi/ culture
•
ach phase is district and is mandator% for ever% pro&ect irrespective of pro&ect sie
•
ver% phase has a )ellMdefined entr% and e/it criterion
•
ver% phase has a provision for verification, validation and correction of errors and inconsistencies
STRENGHTS OF WATERFA MODE
-he )aterfall model redeems the soft)are development process of the code and fi/es problems Its ma&or stren!th lies in the fact that it emphasies the fact that the soft)are development process must be planned, disciplined, and )ell mana!ed It also ensures throu!h se!re!ation that implementation of a product happens onl% after all its development requirements have been met )ith Stren!th of )aterfall model is that it allo)s for communication bet)een customer and developer and specifies )hat )ill be delivered, )hen and at )hat cost
RE?UIREMENT ANAYSIS
R@,'89+ 94> in s%stems en!ineerin! and soft)are en!ineerin!,
encompasses those tas*s that !o into determinin! the needs or conditions to meet for a ne) or altered product, ta*in! account of the possibl% conflictin! requirements of the various sta*eholders, such as beneficiaries or users S>+8+* '@,'89+ 94> is also *no)n as requirements engineering.
Requirements must be actionable, measurable, testable, related to identified business needs or opportunities, and defined to a level of detail sufficient for s%stem desi!n
T=' ' +=' +>7 !5 '@,'89+: -
5" U99!<9 '@,'89+: - -his is such *ind of a requirement )hich is for!otten b% user because the% are not needed ri!ht no) or b% some other user )ho accesses it 8" /9!<9 ,': - It is somethin! )hich user believes to be implemented as it is must for the e/istin! s%stem 7" U9'8+ '@,'89+: - $sers ma% not be able to thin* of ne) requirements due to limited domain *no)led!e
PROBEMS OCCURING IN THE MANUA DATABASE OF PIA HUT
3anual s%stem suffers man% problems $sers found themselves in the perple/ed state )hile searchin! an% detail -he follo)in! limitations are encountered are2
It becomes ver% difficult to maintain records related to stoc* Neepin! trac* of all the customers arrivin! and emplo%ees bein! )or*in!
becomes reall% difficult ot of time is )asted )hile surfin! a particular record Addin! or removin! the record of particular emplo%ee becomes tedious It does not ensures securit% and accurac% to !reat e/tent
SYSTEM RE?UIREMENTS
Hard*are Re'&irement
• • • • • •
Pentium Processor or above 0olor 3onitor Ne%board > #B 4ard Dis* or above 78 3B RA3 or above 599 3B Flopp% Dis* Drive
So#t*are Re'&irement
•
•
3icrosoft
ANAYSIS Anal%sis is the first technical step in the process of an% soft)are development A careful anal%sis can help the soft)are desi!ner and pro!rammer to have a better insi!ht of the product to be created A careless anal%sis can result into incomplete or d%sfunctional soft)are -o avoid such a situation it is ver% important to properl% identif% the required soft)ares features and create an effective desi!n for it It is also important to anal%e and find out )hether the application bein! developed suits the current hard)are and soft)are platform available or not -he application should be developed )ell )ithin time and should meet the specified requirements If the application is bein! developed for commercial purposes then a costCbenefit anal%sis becomes must to find out the real value of the soft)are product An Ob&ectCOriented approach )ill be follo)ed to develop the application because the data or information to be displa%ed and the user )ho )ill vie) that information are more important here than the process flo) of the s%stem -his methodolo!% )ill also ma*e the development process more efficient, effective and eas% -he application thus developed )ill be more user friendl% and can be easil% e/tended or modified )henever required
TECHNI?UES USED FOR ANAYSIS
O9-S+ O'6+!9: -his is one of the main tools for !atherin! information It is a process of reco!niin! and noticin! people, ob&ects and occurrences to obtain information -he ma&or ob&ective of this tools is to !et as close as possible to the real s%stem bein! studies For this reason it is e/tensivel% used b% the s%stem anal%st durin! the development of a particular s%stem
G,49 5!' !9+ !'6+!9:-
•
•
•
•
Apart from its formal function, )hat *ind of s%stem is it in comparison )ith other s%stems in the or!aniation Is it primar% or secondar% contributor to the or!aniation
It is to be *ept in the mind that durin! observations the observer has to listen more than tal* and to listen )ith s%mpathetic and !enuine interest )hen information is bein! conve%ed
T>7 !5 !'6+!9 8+=!: •
N+,'4 8+=! 2 A natural observation occurs in a settin! such as the users )or*place
•
•
•
O+',6 8+=!: An obtrusive observation ta*es place )hen the respondent *no)s he+she is bein! observed
D'*+ 8+=!: A direct observation ta*es place )hen the anal%st actuall% observes the sub&ect or the s%stem at )or*
S+',*+,' 9 U9+',*+,' 8+=!: In case of structured method, the observer loo*s for and records a specific action
FEASIBIITY STUDY
Feasibilit% Stud% is a step to)ards identification of the candidate s%stem as a feasible product First the studies often preCsuppose that )hen the feasibilit% document is bein! prepared, the anal%st is in a position to evaluate solutions Second, most studies tend to overloo* the confusion inherent in s%stem development L the constraints and the assumed attitudes If the feasibilit% stud% is to serve as a decision document, it must ans)er three questions2 •
Is there a ne) and better )a% to do a &ob that )ill benefit the user
•
•
F4+> C!9'+!9: -here are three *e% considerations to the feasibilit% stud%2 5" conomic 8" -echnical 7" Behavioral
E*!9!8* F4+>: conomic anal%sis is the most frequentl% used method for evaluatin! the effectiveness of the candidate s%stem -he pro&ect )as considered to be economicall% feasible becauseC
•
•
-he cost involved in developin! the candidate s%stem )ell under the bud!et of the or!aniation -he 0ostCBenefit Anal%sis tells us that the value of the benefits offered b% the proposed s%stem is much hi!her than the cost
T*=9*4 F4+>: -echnical feasibilit% centers around the e/istin! computer s%stem (4ard)are and Soft)are etc" and to )hat e/tend it support the proposed addition For e/ample, if the current computer is operatin! at >: percent capacit% C an arbitrar% ceilin! C then runnin! another application could overload the s%stem or require additional 4ard)are -his involves financial considerations to accommodate technical enhancements So this proposed s%stem is technicall% feasible because all the necessar% hard)are and soft)are required for developin! and installin! the s%stem is available )ith the or!aniation
O7'+!94 F4+>: -his Application is ver% eas% to operate as it is made user friendl% )ith the help of ver% effective #$I tools 3ain consideration is users eas% access to all the functionalit% of the Application Another main consideration is here is that )hether user or!aniation is trained enou!h to use the ne)er application
B=6!'4 F4+>: People are inherentl% resistant to chan!e, and computers have been *no)n to facilitate chan!e An estimate should be made of ho) stron! a reaction the user staff is li*el% to have to)ard the development of a computeried s%stem -herefore it is understandable that the introduction of a candidate s%stem requires special efforts to educate and train the staff -he soft)are that is bein! developed is user friendl% and eas% to learn In this )a%, the developed soft)are is trul% efficient and can )or* on an% circumstances, tradition, locales Behavioral stud% strives on ensurin! that the equilibrium of the or!aniation and status quo in the or!aniation neither are nor disturbed and chan!es are readil% accepted b% the users
E-R '8 "mp!co de
Cust!id
"mp!na me
Cust!na me Cust!ad d
designat ion
Custom er
Cust!no
ord ers
salary
"mploy ee
"mp!do # "mp!ad d
pa ys
bu ys
se lls
$ill!no
$ill
Item
Item!na me
date Item!pri ce
time &dd!ta '
a'!a mt %ay!mo de
quantit y
D+ F4!< D'8
1+ 64 DFD
e t s e e s l t l eITEM i MANAGER a l l d b u ) c y l r * i a e d c m o ) o t m s s R ) m u e e c d t c d i e i, & e b il ls re p o rt s
%urc(ase items) Request *or Item menu
PIZZA HUT MANAGEM
Custome r
ENT Recei,e item Details
e a r o t a t a D
g SYSTEM
Data Base
D a ta & c c e s s
%rint bills details) customer bills) item details) item menu) etc+
Report s
29 64 DFD
3
&dd Item
1
%urc(as e Item
r e m o t s u C
Delete Item
2
Reque st item menu
%rint
Recei, e $ill
It
e m a n a
PIZZA HUT
odi*y Item
AUTOMATI ON
r
SYSTEM
e a g D t a a r a o t D t - a & c c e s s
Request .
%rint
Report s
Dat a Bas e
Calculate bill
g e
3' 64 DFD
3
&dd Item
$illtrans
1
1 $ill 2 Item
%urc(as e Item
r e m o t s u C
Delete Item
2 Item
2
Reque st item menu %rint
It
e m a n a g e
odi*y Item 2 Item
%rint
r
Request . %rint
Recei, e $ill
1 $ill %rint
$illtrans
1 $ill
Report s
Calculate bill
$illtrans
DATA STRUCTURE Four tables have been used in this pro&ect2
1. ITEM: /7 '*!' !5 5!! +8.
•
Item0ode
2 -his is unique field and !enerated automaticall% b% the pro!ram
•
ame
2 -his is name of the item
•
Price
2 -his is price of the item
2. BI: /7 '*!' !5 44.
•
Item0ode
2 0ode no of the item
•
Billo
2 Bill no of the bill, automaticall% !enerated b% the pro!ram
•
DateofBill
2 Date of the Bill
•
Price
2 Price per unit
•
Juantit%
2 Juantit% purchased
•
0ustame (0haracter"
2 ame of the 0ustomer
•
Amount
2 -otal Bill amount
3. BITRANS: /7 '*!' !5 96,4 +8 9 44.
•
Item0ode
2 0ode no of the item
•
Billo
2 Bill no of the bill, automaticall% !enerated b% the pro!ram
•
Price
2 Price per unit
•
Juantit%
2 Juantit% purchased
•
Amount
2 -otal amount
$. PASS: /7 '*!' !5 7
•
Pass)ord
2 Pass)ord to open the pro&ect
WOR/ING OF THE PROJECT
•
$ser can add ne) food items, modif% or delete and e/istin! food items from the tableC I-3, b% selectin! forms ADDI-3 and DI-I-3
•
$ser can vie) list of food items b% selectin! option -ODAKS 3$ from the 3AI form
•
$ser can purchase items b% selectin! form SAS from the 3AI form, bill is calculated and printed automaticall% after selectin! items to purchase and stored in the tableC BI
$ser can vie) list of bills at the end of the da% b% selectin! IS- OF BIS report the RPOR-S form
STRUCTURE OF THE PROGRAM
FORMS IN THE PROJECT:
•
frme)Item
2
Adds ne) food item in the item table
•
frm3odif%Item
2
3odif% the item records
•
frmDelete
2
Delete the item records
•
frmSales
2
Sale food items and add calculate bill
•
frm-oda%
2
Displa% list of food items
•
frmPrintBill
2
Prints the customers bill
•
frm3ain
2
As* user to input pass)ord
•
frm3enu
2
Displa% main menu
•
frmFile3aintenance
2
Displa% edit menu (add, modif%, delete items"
•
frmReports
2
Displa% reports menu
•
frmDate
2
Displa% date )ise list of bills
•
frm0han!ePass)ord
2
-o chan!e the pass)ord
REPORTS IN THE PROJECT:
•
Date
2 Date )ise list of bills
•
repItemist
2 ist of Items
•
istofBills
2 ist of all bills
•
repPrintBill
2 Prints the customers bill
OUTPUT REPORT GENERATION
1+
2+
$sin! information in table C bill, )e can e/tract the list of bills
VAIDATION CHEC/S
5
Item code is chec*ed )hether e/ist in the file or not )henever user input, )hile purchase, delete or modif%
8
.alidation for quantit% is chec*ed, customer should not purchase above the available quantit%
SCREENS AYOUT CODING
M!,41
Public con As e) ADODB0onnection
1) F!'8 N8- 5'8M9
C!9:Private Sub cmdO*0lic*(" Dim rsPass As e) ADODBRecordset rsPassOpen Qselect Pass)ord from PassQ, con, adOpenD%namic If ot rsPassOF -hen If (t/t (t/tPa Pass ss)o )ord rd-ee/t QQ And (rsPass(QPass)ordQ" t/tPass)ord-e/t" t/tPass)ord-e/t" -hen $nload 3e frm3enuSho) vb3odal lse 3s!Bo/ QInvalid Pass)ordQ nd If lse $nload 3e frm3enuSho) vb3odal nd If rsPass0lose Set rsPass othin! nd Sub Private Sub cmd/it0lic*(" $nload 3e
Isu Isull ll(r (rsP sPas ass( s(QP QPas ass) s)or ordQ dQ"" """"
Or
nd Sub
Private Sub Formoad(" con0onne con0onnection ctionStrin! Strin! QProvider3 QProvider3icroso icrosoft@et ft@etOD ODB7= B7=5Pers 5Persist ist Securit% Securit% InfoFalseData SourceQ AppPath QTfastfoodmdbQ conOpen nd Sub
2) F!'8 N8- 5'8M9,
C!9:-
Private Sub 0ommand50lic*(" nd Sub Private Sub cmdFile0lic*(" frmFile3aintainanceSho) vb3odal nd Sub Private Sub cmd4elp0lic*(" 0all Shell(Qotepade/e Q G AppPath G QTreadmet/tQ, 5" nd Sub Private Sub cmdJuit0lic*(" $nload 3e nd Sub Private Sub cmdReports0lic*(" frmReportsSho) vb3odal nd Sub Private Sub cmdSales0lic*(" frmSalesSho) vb3odal nd Sub Private Sub cmd-oda%0lic*(" frm-oda%Sho) vb3odal nd Sub
Private Sub Form3ouse3ove(Button As Inte!er, Shift As Inte!er, H As Sin!le, K As Sin!le" 3eIma!e8Picture oadPicture(AppPath G QTmc5bmpQ" nd Sub Private Sub Ima!e83ouse3ove(Button As Inte!er, Shift As Inte!er, H As Sin!le, K As Sin!le" 3eIma!e8Picture oadPicture(AppPath G QTmc8bmpQ" nd Sub
3) F!'8 N8- 5'8C=9P
C!9:-
Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmdO*0lic*(" Dim rsPass As e) ADODBRecordset rsPassOpen Qselect Pass)ord from PassQ, con, adOpenD%namic If rsPass(QPass)ordQ" UV 3et/tOld-e/t -hen 3s!Bo/ QInvalid Pass)ordQ 3et/tOldSetFocus /it Sub lseIf 3et/te)-e/t UV 3et/t0onfirm-e/t -hen 3s!Bo/ QInvalid Pass)ordQ 3et/t0onfirmSetFocus /it Sub lse con/ecute Qupdate Pass set Pass)ord WQ G 3et/te)-e/t G QWQ 3s!Bo/ QPass)ord 0han!edQ $nload 3e nd If nd Sub
$) F!'8 N8- 5'8D+W
C!9:-
Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmdPrevie)0lic*(" If 3et/tFrom-e/t QQ -hen 3s!Bo/ QInput DateQ 3et/tFromSetFocus /it Sub nd If If ot IsDate(3et/tFrom" -hen 3s!Bo/ QInvalid DateQ 3et/tFromSetFocus /it Sub nd If If 3et/t-o-e/t QQ -hen 3s!Bo/ QInput DateQ 3et/t-oSetFocus /it Sub nd If If ot IsDate(3et/t-o" -hen 3s!Bo/ QInvalid DateQ
3et/t-oSetFocus /it Sub nd If WDim rsist As e) ADODBRecordset WrsistOpen Qselect X from istofBills )here DoB V cdate(WQ G 3et/tFrom-e/t G QW" and DoB U cdate(WQ G 3et/t-o-e/t G QW" order b% DoB,BilloQ, con, adOpenD%namic WSet repDate)iseBillistDataSource rsist WrepDate)iseBillistSho) vb3odal Wrsist0lose WSet rsist othin! Dim acApp As AccessApplication Set acApp e) AccessApplication acAppOpen0urrentDatabase AppPath G QTfastfoodmdbQ acAppDo0mdOpenReport QrepPrintBillQ, ac.ie)Previe), Qselect X from PrintBill )here DoB V cdate(WQ G 3et/tFrom-e/t G QW" and DoB U cdate(WQ G 3et/t-o-e/t G QW"Q acAppDo0md3a/imie acApp.isible -rue nd Sub Private Sub Formoad(" 3et/tFrom-e/t Date 3et/t-o-e/t Date nd Sub
) F!'8 N8- 5'8D4+
C!9:-
Private Sub cmbItem0ode0lic*(" Dim rsFill As e) ADODBRecordset rsFillOpen Qselect X from Item )here Item0ode Q G 3ecmbItem0ode-e/t, con, adOpenD%namic If ot rsFillOF -hen 3et/tame-e/t rsFill(QameQ".alue 3et/tPrice-e/t rsFill(QPriceQ".alue nd If rsFill0lose Set rsFill othin! nd Sub Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmdDelete0lic*(" con/ecute Qdelete from Item )here Item0ode Q G 3ecmbItem0ode-e/t 3s!Bo/ QRecord DeletedQ 3et/tame-e/t QQ 3et/tPrice-e/t QQ 3ecmbItem0odeRemoveItem (3ecmbItem0odeistInde/" If 3ecmbItem0odeist0ount UV : -hen
3ecmbItem0odeistInde/ : nd If 3ecmbItem0odeSetFocus nd Sub Private Sub Formoad(" 3et/tamenabled False 3et/tPricenabled False Dim rsItem0ode As e) ADODBRecordset rsItem0odeOpen Qselect Item0ode,ame from Item order b% ItemcodeQ, con, adOpenD%namic Do
#) F!'8 N8- 5'8F4M9+99*
C!9:-
Private Sub cmd0han!ePass)ord0lic*(" frm0han!ePass)ordSho) vb3odal nd Sub Private Sub cmdDelete0lic*(" frmDeleteSho) vb3odal nd Sub Private Sub cmd3odif%0lic*(" frm3odif%ItemSho) vb3odal nd Sub Private Sub cmde)0lic*(" frme)ItemSho) vb3odal nd Sub Private Sub cmdReturn0lic*(" $nload 3e nd Sub Private Sub Ima!e83ouse3ove(Button As Inte!er, Shift As Inte!er, H As Sin!le, K As Sin!le" 3eIma!e8Picture oadPicture(AppPath G QTmc8bmpQ" nd Sub
%) F!'8 N8- 5'8M!5>I+8
C!9:-
Private Sub cmbItem0ode0lic*(" Dim rsFill As e) ADODBRecordset rsFillOpen Qselect X from Item )here Item0ode Q G 3ecmbItem0ode-e/t, con, adOpenD%namic If ot rsFillOF -hen 3et/tame-e/t rsFill(QameQ".alue 3et/tPrice-e/t rsFill(QPriceQ".alue nd If rsFill0lose Set rsFill othin! nd Sub Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmd$pdate0lic*(" If 3et/tame-e/t QQ -hen 3s!Bo/ QPlease input Item ameQ
3et/tameSetFocus /it Sub nd If If 3et/tPrice-e/t QQ -hen
3s!Bo/ QPlease input Item PriceQ
3et/tPriceSetFocus /it Sub nd If If ot Isumeric(3et/tPrice" -hen 3s!Bo/ QPlease input umeric .alueQ
3et/tPriceSetFocus /it Sub nd If
con/ecute Qupdate Item set ameWQ G 3et/tame-e/t G QW, PriceQ G 3et/tPrice-e/t G Q )here Item0ode Q G 3ecmbItem0ode-e/t 3s!Bo/ QRecord $pdatedQ 3ecmbItem0ode-e/t QQ 3et/tame-e/t QQ 3et/tPrice-e/t QQ 3ecmbItem0odeSetFocus nd Sub Private Sub Formoad(" Dim rsItem0ode As e) ADODBRecordset rsItem0odeOpen Qselect Item0ode,ame from Item order b% ItemcodeQ, con, adOpenD%namic Do
rsItem0ode3ovee/t oop If 3ecmbItem0odeist0ount UV : -hen 3ecmbItem0odeistInde/ : nd If rsItem0ode0lose Set rsItem0ode othin! nd Sub
) F!'8 N8- 5'8N
C!9:-
Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmde)0lic*(" If 3ecmde)0aption QGe) ItemQ -hen 3ecmde)0aption QG$pdateQ 3et/tamenabled -rue 3et/tPricenabled -rue Dim rsItem0ode As e) ADODBRecordset rsItem0odeOpen Qselect Item0ode from Item order b% Item0ode descQ, con, adOpenD%namic If ot rsItem0odeOF -hen 3et/tItem0ode-e/t rsItem0ode(QItem0odeQ".alue 5 lse 3et/tItem0ode-e/t 5 nd If rsItem0ode0lose Set rsItem0ode othin! 3et/tameSetFocus lse If 3et/tame-e/t QQ -hen
3s!Bo/ QPlease input Item ameQ
3et/tameSetFocus /it Sub nd If If 3et/tPrice-e/t QQ -hen 3s!Bo/ QPlease input Item PriceQ
3et/tPriceSetFocus /it Sub nd If If ot Isumeric(3et/tPrice" -hen 3s!Bo/ QPlease input umeric .alueQ
3et/tPriceSetFocus /it Sub nd If
con/ecute QInsert into Item(Item0ode,ame,Price" values(Q G 3et/tItem0ode-e/t G Q,WQ G 3et/tame-e/t G QW,Q G 3et/tPrice-e/t G Q"Q 3s!Bo/ QRecord SavedQ 3et/tItem0ode-e/t QQ 3et/tame-e/t QQ 3et/tPrice-e/t QQ 3et/tamenabled False 3et/tPricenabled False 3ecmde)0aption QGe) ItemQ
nd If nd Sub Private Sub Formoad(" 3et/tItem0odenabled False 3et/tamenabled False 3et/tPricenabled False nd Sub
) F!'8 N8- 5'8P'9+B44
P'9+ P'6<:-
C!9:-
Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmdPrevie)0lic*(" WDim rsBill As e) ADODBRecordset WrsBillOpen Qselect distinct X from istofBills )here 3ecmbBillo-e/t G Q order b% billnoQ, con, adOpenD%namic
BilloQ
G
WSet repPrintBillDataSource rsBill WrepPrintBillSho) vb3odal WrsBill0lose WSet rsBill othin! Dim acApp As AccessApplication Set acApp e) AccessApplication acAppOpen0urrentDatabase AppPath G QTfastfoodmdbQ acAppDo0mdOpenReport QrepPrintBillQ, ac.ie)Previe), PrintBill )here BilloQ G 3ecmbBillo-e/t acAppDo0md3a/imie acApp.isible -rue nd Sub Private Sub Formoad(" Dim rsBill0ode As e) ADODBRecordset
Qselect
X
from
rsBill0odeOpen Qselect Billo from istofBills order b% BilloQ, con, adOpenD%namic Do
10) F!'8 N8- 5'8R7!'+
C!9:-
Private Sub cmdFile0lic*(" WDim rsist As e) ADODBRecordset WrsistOpen Qselect X from istofBillsQ, con, adOpenD%namic WSet repAllBillsDataSource rsist WrepAllBillsSho) vb3odal Wrsist0lose WSet rsist othin! Dim acApp As AccessApplication Set acApp e) AccessApplication acAppOpen0urrentDatabase AppPath G QTfastfoodmdbQ acAppDo0mdOpenReport QrepPrintBillQ, ac.ie)Previe) acAppDo0md3a/imie acApp.isible -rue nd Sub Private Sub cmdJuit0lic*(" $nload 3e nd Sub Private Sub cmdReports0lic*(" frmDate)iseSho) vb3odal nd Sub
Private Sub cmdSales0lic*(" Dim rsist As e) ADODBRecordset rsistOpen Qselect X from Item order b% Item0odeQ, con, adOpenD%namic Set repItemistDataSource rsist repItemistSho) vb3odal rsist0lose Set rsist othin! nd Sub Private Sub cmd-oda%0lic*(" frmPrintBillSho) vb3odal nd Sub
11) F!'8 N8- 5'8S4
C!9:-
Dim tmpPrice As Inte!er Private Sub cmbItem0ode0lic*(" Dim rsFill As e) ADODBRecordset rsFillOpen Qselect X from Item )here Item0ode Q G 3ecmbItem0ode-e/t, con, adOpenD%namic If ot rsFillOF -hen 3et/tame-e/t rsFill(QameQ".alue 3et/tPrice-e/t rsFill(QPriceQ".alue tmpPrice rsFill(QPriceQ".alue nd If rsFill0lose Set rsFill othin! nd Sub Private Sub cmdAdd0lic*(" If 3et/tJuantit%-e/t QQ -hen 3s!Bo/ QPlease input quantit%Q 3et/tJuantit%SetFocus /it Sub nd If If ot Isumeric(3et/tJuantit%-e/t" -hen 3s!Bo/ QPlease input numeric dataQ
3et/tJuantit%SetFocus /it Sub nd If 3elstItem0odeAddItem 3ecmbItem0ode-e/t 3elstJuantit%AddItem 3et/tJuantit%-e/t 3elstPriceAddItem 3et/tPrice X 3et/tJuantit%-e/t t: For i : -o 3elstPriceist0ount C 5 3elstPriceistInde/ i t t .al(3elstPrice-e/t" e/t 3et/tAmount-e/t t 3elstPriceistInde/ C5 nd Sub Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub cmdPrintBill0lic*(" WDim rsBill As e) ADODBRecordset WrsBillOpen Qselect X from istofBills )here BilloQ G 3et/tBillo-e/t, con, adOpenD%namic WSet repPrintBillDataSource rsBill WrepPrintBillSho) vb3odal
WrsBill0lose WSet rsBill othin! Dim acApp As AccessApplication Set acApp e) AccessApplication acAppOpen0urrentDatabase AppPath G QTfastfoodmdbQ acAppDo0mdOpenReport QrepPrintBillQ, ac.ie)Previe), PrintBill )here BilloQ G 3et/tBillo-e/t acAppDo0md3a/imie acApp.isible -rue nd Sub Private Sub cmdRemove0lic*(" If 3elstItem0odeistInde/ UV C5 -hen t 3elstItem0odeistInde/ 3elstItem0odeRemoveItem (t" 3elstJuantit%RemoveItem (t" 3elstPriceRemoveItem (t" t: For i : -o 3elstPriceist0ount C 5 3elstPriceistInde/ i t t .al(3elstPrice-e/t" e/t 3et/tAmount-e/t t 3elstPriceistInde/ C5
Qselect
X
from
nd If nd Sub Private Sub cmdSaleItem0lic*(" If 3ecmdSaleItem0aption QGe) SaleQ -hen 3ecmdSaleItem0aption QGSale ItemQ 3ecmdAddnabled -rue 3ecmdPrintBillnabled False 3ecmbItem0odenabled -rue 3et/tDoBnabled -rue 3et/t0ustamenabled -rue 3et/tJuantit%nabled -rue 3et/t0ustame-e/t QQ 3et/tJuantit%-e/t QQ 3et/tDoB-e/t Date 3et/tAmount-e/t Q:Q 3elstItem0ode0lear 3elstPrice0lear 3elstJuantit%0lear Dim rsBillo As e) ADODBRecordset rsBilloOpen Qselect Billo from Bill order b% Billo descQ, con, adOpenD%namic If ot rsBilloOF -hen
3et/tBillo-e/t rsBillo(QBilloQ".alue 5 lse 3et/tBillo-e/t 5 nd If rsBillo0lose Set rsBillo othin! If 3ecmbItem0odeist0ount UV : -hen 3ecmbItem0odeistInde/ : nd If 3ecmbItem0odeSetFocus lse If 3et/tDoB-e/t QQ -hen 3s!Bo/ QPlease input DateQ
3et/tDoBSetFocus /it Sub nd If If ot IsDate(3et/tDoB" -hen 3s!Bo/ QPlease input valid dateQ
3et/tDoBSetFocus /it Sub nd If If 3et/t0ustame-e/t QQ -hen 3s!Bo/ QPlease input ame of the 0ustomerQ
3et/t0ustameSetFocus /it Sub nd If If 3et/tJuantit%-e/t QQ -hen 3s!Bo/ QPlease input Item Juantit%Q
3et/tJuantit%SetFocus /it Sub nd If If ot Isumeric(3et/tJuantit%" -hen 3s!Bo/ QPlease input umericQ
3et/tJuantit%SetFocus /it Sub nd If
con/ecute Qinsert into Bill(Billo,Item0ode,DoB,Juantit%,Price,Amount,0ustame" values(Q G 3et/tBillo-e/t G Q,Q G 3ecmbItem0ode-e/t G Q,WQ G 3et/tDoB-e/t G QW,Q G 3et/tJuantit%-e/t G Q,Q G tmpPrice G Q,Q G 3et/tAmount-e/t G Q,WQ G 3et/t0ustame-e/t G QW"Q For i : -o 3elstItem0odeist0ount C 5 3elstItem0odeistInde/ i 3elstPriceistInde/ i 3elstJuantit%istInde/ i con/ecute Qinsert into Bill-rans(Billo,Item0ode,Juantit%,Amount,Price" values(Q G 3et/tBillo-e/t G Q,Q G 3elstItem0ode-e/t G Q,Q G
3elstJuantit%-e/t G Q,Q G 3elstPrice-e/t G Q,Q G 3elstPrice-e/t + 3elstJuantit%-e/t G Q"Q e/t 3s!Bo/ QRecord InsertedQ 3ecmdSaleItem0aption QGe) SaleQ 3ecmdPrintBillnabled -rue 3ecmdAddnabled False 3ecmbItem0odenabled False 3et/tDoBnabled False 3et/t0ustamenabled False 3et/tJuantit%nabled False 3ecmdSaleItemSetFocus nd If nd Sub Private Sub cmd-oda%0lic*(" frm-oda%Sho) vb3odal nd Sub Private Sub Formoad(" 3et/tAmount-e/t Q:Q 3et/tamenabled False 3et/tPricenabled False 3et/tBillonabled False 3et/tAmountnabled False
3ecmbItem0odenabled False 3et/tDoBnabled False 3et/t0ustamenabled False 3et/tJuantit%nabled False 3ecmdPrintBillnabled False 3ecmdAddnabled False Dim rsItem0ode As e) ADODBRecordset rsItem0odeOpen Qselect Item0ode,ame from Item order b% ItemcodeQ, con, adOpenD%namic Do
3ecmbItem0odeistInde/ :
Wnd If rsItem0ode0lose Set rsItem0ode othin! nd Sub
12) F!'8 N8- 5'8T!>
C!9:-
Private Sub cmbItem0ode0lic*(" Dim rsFill As e) ADODBRecordset rsFillOpen Qselect X from Item )here Item0ode Q G 3ecmbItem0ode-e/t, con, adOpenD%namic If ot rsFillOF -hen 3elblame0aption rsFill(QameQ".alue 3elblPrice0aption rsFill(QPriceQ".alue nd If rsFill0lose Set rsFill othin! nd Sub Private Sub cmd/it0lic*(" $nload 3e nd Sub Private Sub Formoad(" 3elblamenabled False 3elblPricenabled False Dim rsItem0ode As e) ADODBRecordset rsItem0odeOpen Qselect Item0ode,ame from Item order b% ItemcodeQ, con, adOpenD%namic Do
3ecmbItem0odeAddItem rsItem0ode(QItem0odeQ".alue rsItem0ode3ovee/t oop If 3ecmbItem0odeist0ount UV : -hen 3ecmbItem0odeistInde/ : nd If rsItem0ode0lose Set rsItem0ode othin! nd Sub
TESTING
-estin! is a ver% critical activit% that ensures the liabilit% of a particular soft)are product Durin! this activit% the soft)are to be tested is e/ecuted )ith a set of tests, and the output and functionin! of the pro!ram are evaluated It is done to ensure )hether the s%stem meets the specified requirements or not
-estin! can brin! forth some aspects that have not been considered or covered b% the developers -estin! a lar!e pro!ram is a comple/ process that can be bro*en do)n into t)o parts2
•
$nit testin!
•
Inte!ration testin!
•
S%stem testin!
In the first case the different modules of the application are tested individuall% In case of s%stem testin! the soft)are is tested as a )hole -he s%stem under!oes several tests li*e2
•
-ime tests
•
Performance tests
•
3emor% tests
•
Input and output tests, etc
-estin! can be done in the follo)in! three phases2
•
P'!'88+* T+9 - -his is done to determine )hether the application
)or*s accordin! to the specifications 4ere it is chec*ed )hether the application is providin! all the required functionalities and features or not All the validations are chec*ed thorou!hl% All the lin*s are tested and the database functionalities are also chec*ed
•
U' T+9 - In this phase it is ascertained )hether the tar!et audience of
the application can use the application easil% and effectivel% Is the soft)are s%stem is servin! their purpose and fits their requirements or not It is chec*ed )hether the% are satisfied )ith the information provided -he% are as*ed about the clarit%, attractiveness and the overall presentation of the screens and reports
•
G!4 T+9 - Finall% this test is performed to test )hether the application
meets the !oals, )hich )ere set before developin! the application 4ere it must be ensured that the or!aniation is satisfied )ith the )or*in! and presentation of the application
SUGGESTIONS
PIEEA 4$- is lar!e !ro)in! fast food centre in India and other countries also, it becomes ver% difficult to *eep records for lar!e no of items and customers and calculatin! bills -his pro&ect is ver% useful in the fastCfood mana!ement
$tmost care and bac*Cup procedures must be established to ensure 5::Y successful implementation of the computeried fastCfood s%stem In case of s%stem failure, the or!aniation should be in a position to process the transaction )ith another or!aniation or if the )orst comes to the )orst, it should be in a position to complete it manuall%
M!' 69+ !5 += 7'!*+:
•
• • •
Accurac% )ill be hi!hl% enhanced due to ne!li!ible chance of error in computer Data stora!e )ill become much easier and compact A lot of computational )ill be reduced -he s%stem bein! menuCdriven )ill be eas% to use as )e &ust need to clic* on the options )ith minute efforts
8++!9: 5 8
It does not ensure securit% of data to e/treme e/tent Onl% a sin!le user can access the data at a time
CONCUSION
-his pro&ect is desi!ned to meet the requirements of a Pia 4ut Automation S%stem It has been developed in .isual Basic and the database has been built in 3SCSJSR.R onl%, *eepin! in mind the specifications of the s%stem Apart from 3SCSJSR.R )e could have also implemented other database soft)are li*e Oracle or 3sCAccess
For desi!nin! the s%stem )e have used simple data flo) dia!rams and +R dia!rams
Overall the pro&ect teaches us the essential s*ills li*e2
5
$sin! s%stem anal%sis and desi!n techniques li*e data flo) dia!ram and +R dia!ram in desi!nin! the s%stem
8
$nderstandin! pro!rammin! lo!ic and lan!ua!e alon! )ith utilities li*e reports, forms, queries etc in .isual Basic and 3SCSJ SR.R
