TABLE OF ONTENTS

 Introduction
 Main Objectives of the Projects
 Project Category
 Tools and Environment
 System Analysis
o Identification of Need
 Preliminary Investigation
 Feasibility Study
o Technical Feasibility
o Economical Feasibility
o Operational Feasibility
 Software Engineering Paradigm
 Software Requirement Specification
 Design
 Forms and Coding
 Code Efficiency & Optimization
 Validation Checks
 Testing
 Implements
 Evaluation
 Maintenance
 Security Measures Taken
 Cost Estimation of Project
 PERT Chart and Gantt Chart
 Future scope of the project
 Bibliography
 Glossary

ENROLL NO. 1 PREM CHAND MAURYA

Introduction

The Project “Hotel Management System” is dedicated to the requirements of Park

Regency, Gorakhpur who is leading luxury hotel of Gorakhpur city.

“Hotel Management System ” is the system that works on a Hotel providing a no. of

standards to the officers and officials of different employee and customers find across the

city and district. Hotel Management is made to calculate the billing, inventory, time

schedule of services different type of customers by skilled staff. The registration of

customer, their charges calculations keeping track of each billing, etc.

Manually handling the details of each customer, the rooms and the staff of the hotel and its

management is tedious and not always enjoyable. Efforts and energies are hence, focused

at not just speeding up the managements capability, but also on consciously reducing their

load in an effort to provide accurate and dependable information. Computers are able to do

all kinds of tasks at amazing speed than done manually. Therefore, came forth the idea of

developing a Hotel Management System .

For example, there are number of food items, Rooms, tables in the Hotel. If information of

any one Item, Customer is needed for any purpose, identifying the member and then

obtaining related information manually will be time consuming. The greatest gift that an

automated system offers us is that of storage of large amount of information and accurate

retrieval in a couple of seconds.

Storage of data and information on the computer allows reduction of paper filing and other

mundane tasks. This considerably improves administration’s efficiency, facilitating it to

promptly address any kind of information sought for.

ENROLL NO. 2 PREM CHAND MAURYA

No doubt, the calculation of Charges and allotment of rooms to Customer is one of the

most tedious and time-consuming tasks. This process is also very prone to errors, so

automation will lead to flawless calculation of all of these.

ENROLL NO. 3 PREM CHAND MAURYA

About The Hotel

Park Regency, Park Road, Civil Lines, Gorakhpur is the hotel of 4 Star Standard. It is

affiliated to State Govt. Tourism. The Hotel provides rich food service to the residents and

visitors, by their detailed and practical oriented curriculum and activities. The staff puts an

ideal way of serving best. The Hotel is also providing special packaged services to regular

visitors and other Interactive Working people like CA, Lawyer, MR, Bank Officials, PRO,

HRO, etc. and

It gives the quality notch Hotel to facilitate the Metro level of services at city. The Hotel has

several Sheaf to provide best food services standards. The Infrastructure provided by Park

Regency, is outstanding. Each Customer or staff can be allotted to respective standard with

respective equipped rooms and materials, track of each such activity is tried to meantime in

a paper charges manner. In this regard, the Hotel Park Regency required automating the

Hotel activity. The Customer of the hotel does not have to contact to the

manager/administrator regularly. The Hotel Charge standard Charges for providing their

services. These Charges depend upon the standard they have chosen and the strength of

visitors.

Server Related Tasks

 Registration of new Customer.

 Addition of new standard/service.

 Maintain the price value of standard (Per person Charges/ Rates).

 Updating of master tables.

 Report generation.

 Count the installments

 Generate and save the price value of each standard/service.

 Update it’s status on each payment of charges.

ENROLL NO. 4 PREM CHAND MAURYA

Objectives

1. This project is being developed with a view to automate the function of Park Regency,

provides services to Administrator (“Hotel Management System ”).

2. The management of Hotel wants a computerize system that

can manage the list of registered Customer, various standard, schedules, charges

collection details of each Customer and booking schedule in particular date & time.

3. Another objective of this project is to maintain the details of the

registered Customer. Managing the details of the registered Customer manually is not

impossible but no doubt it is a very tedious job. The Job becomes even more

complex i.e. which Customer are registered or unregistered (Friends and relatives).

Thus the objective is to manage the details of registered Customer.

4. The main objective of the project is to improve administrator

efficiency facilitating it to promptly address any kind of information sought for and to

minimize the workload.

5. Details of registered members & different various schemes of

standard.

6. Checks the validity of registered Customer and staff to get put

a feasible schedule.

7. Maintenance of Attendance of each staff with respect to day.

ENROLL NO. 5 PREM CHAND MAURYA

8. Registration of Customer, with addition of new standard &

modification of any database is not possible without the permission of administrator.

9. Hence this software is used to providing good service to the

registered Customer, reducing the paper work to be done and reducing workload of

the administrator.

10. The Enquiry is given more emphasis, since they can be a way

to continue a standard, remove a standard/service from profile, or initiate a new

scheme of standard.

ENROLL NO. 6 PREM CHAND MAURYA

PROGRAM STRUCTURE

RELATIONAL DATA BASE MANAGEMENT SYSTEM.

ENROLL NO. 7 PREM CHAND MAURYA

 Tools/Environment Used

Hardware Requirements :

1. Pentium III or Advanced Processor

2. 64 MB RAM

3. 10 GB Hard disk or onwards

4. CD Drive

Software requirements :

1. Windows 98 /Windows NT (Windows 200/Xp) Server

2. SQL server 2005

3. VB 6.0

4. Data Report Designer

ENROLL NO. 8 PREM CHAND MAURYA

Analysis

Breaking a problem into successively manageable parts for individual study. Every

application development project should begin with an analysis of the requirements and

clear list of goals. The basic aim of analysis is to obtain a clear understanding of user’s

needs & what exactly is desired from the software, and what constraints on the solution

are.

ENROLL NO. 9 PREM CHAND MAURYA

System Analysis

System Analysis is the process of totally understanding the current system by gathering

and interpreting facts, diagnosing problems, and using the facts to improve the current

system.

It is conducted with the following objectives in mind:

1. Identify the user’s need;

2. Evaluate the system concept for feasibility;

3. Perform economic and technical feasibility;

4. Allocate functions to hardware, software, people, database, and other System

elements; and

5. Create a system definition that forms the foundation for all subsequent

Engineering works.

ENROLL NO. 10 PREM CHAND MAURYA

Identification Of The Need

At present the Park Regency, Gorakhpur maintains different registers for different

purposes for example Customer, Sheaf, Standards, Schedule, Attendance, Charges

collection, Food Items Rates, Salary, Appointments, Enquiry, etc.

As and when a new Student comes to the Hotel they have to enter their Customer

Code for regular studies. Besides this the manager keep a track on each entity of the

Hotel to provide rooms at accurate time with no mismatch of customer and staff.

Again there are a number of instances when:

1. Entry of Master records

2. A particular record is searched for tracking.

3. A list of Staff and Schedule is prepared.

4. A list of Standard is prepared.

All this causes a great amount of chaos and confusion. It was finally decided to

computerize the working of Park Regency, Gorakhpur.

ENROLL NO. 11 PREM CHAND MAURYA

Preliminary Investigation

The Preliminary Investigation starts as soon as someone either a user or a member of

a particular department recognizes a problem or initiates a request, to modify the

current computerized system, or to computerize the current manual system. An

important outcome of the preliminary investigation is determining whether the system

requested is feasible or not.

The major purposes of this study are listed below:

(1) Identify the responsible users and develop an initial “scope” of the system.

There are two specific groups of end-users:

a. Those who use the system. In this case the Customer and Staff who

actually participates in studies.

b. Those affected by the inputs and outputs of the system in study. In this

case the management who decides the schemes given to Customer, the

amount taken from the Customer the first time registration charges are

involved.

To develop the initial scope of the system we need to get a broad idea of the

system in study. In this case we can identify the main process as ‘to get the

details of the node and amount’, which gets the input from each standard. The

output of the system is also sent back to the respective node.

ENROLL NO. 12 PREM CHAND MAURYA

 (2) Identify current deficiencies in the user’s environment.

As each node is being monitored, the current status of the standard and

batches is entered in different register, so there is a chance of duplication of

record.

As there are separate registers maintained very often the entries are entered in

the wrong registers, causing duplication of work and confusion.

(3) Determine objectives for the new system.

Here we will briefly list the functions of the new system:

a. Registration of Customer, Details in a central Location.

 Entry of a new Customer, schedule making, standards

and Scheme details.

 Modification or updating of Old Customer and

standard and staff details, Schedule details.

b. Keeping track of Each staff (Specially Skill).

c. Generation of Customer and Schedule List.

d. Generation of charges collection Details on particular day.

ENROLL NO. 13 PREM CHAND MAURYA

Feasibility Study

Feasibility is the determination of whether or not a project is worth doing. The process

followed in making this determination is called a feasibility study. This type of study

determines if a project can and should be taken. Once it has been determine that

project is feasible, the analyst can go ahead and prepare a project specification, which

finalizes project requirements.

In the conduct of the feasibility study, the analysts usually consider seven distinct, but

inter-related types of feasibility. They are:

(1) Technical Feasibility

(2) Economical Feasibility

(3) Operational Feasibility

(4) Social Feasibility

(5) Management Feasibility

(6) Legal Feasibility

(7) Time Feasibility

ENROLL NO. 14 PREM CHAND MAURYA

A) Technical Feasibility

The Technical needs of the system are as follows:

 Facility to communicate data to distant location.

 Response time under certain conditions.

 Ability to process a certain volume of transaction at a particular speed.

In examining the technical feasibility, configuration is given more importance than

actual make of hardware. Here the configuration gives the complete picture about the

system’s requirements:

 How many workstations are required.

 How these workstations are interconnected so that they can operate and

communicate smoothly.

 What speeds of Input and Output should be achieved.

As the above requirements of the system can be fulfilled easily with the technology

available in the market, therefore the proposed system is technically feasible.

ENROLL NO. 15 PREM CHAND MAURYA

B) Economical Feasibility

Economic analysis is the most frequently used technique for evaluating the

effectiveness of a proposed system. More commonly known as Cost / Benefit

analysis: the procedure is to determine the benefits and savings that are expected

from a proposed system and compare them with the costs. If benefits outweigh costs,

a decision is taken to design and implement the system. Otherwise, further

justification or alternative in the proposed system will have to be made if it is to have

a chance of being approved.

Proposed system for Park Regency, Gorakhpur is economically feasible in terms of

time and effort of staff and management. Cost will be incurred at the beginning but

the effort and time saved by the proposed system far outweighs the cost incurred.

Since the Hotel is not already computerized, so initially large amount will be involved

but in due standard with the outcome of the system, the cost will be outweighed by

the result of the automated system.

ENROLL NO. 16 PREM CHAND MAURYA

C) Operational Feasibility

It is mainly related to human Hotel and political aspects. The points to be considered

are:

 What changes will be brought with the system?

 What Hotel structures are distributed?

 What new skills will be required?

Project is not rejected simply because of operational infeasibility but such

consideration is likely to critically affect the nature and scope of the eventual

recommendations.

For Park Regency, Gorakhpur apart from other facts as per operational feasibility is

concerned we need to see to it that the system to be developed should be user-

friendly so that staff personnel’s who are not computer literate find it easy to work

with. As the office staff does most of the work, so they might have to be trained.

ENROLL NO. 17 PREM CHAND MAURYA

Software Engineering Paradigm Applied (Waterfall Model)

It is the simplest model, which shows that the phases are organized in the linear order.

Never a project begins with a feasibility analysis. After a successful completion of the

feasibility analysis, the requirement analysis and project planning begins. The design starts

after the requirement analysis is completed and coding begins after the design is complete.

Once the programming is complete, the code is integrated and the testing is done. On

successful completion of testing the system is installed. After this regular operation the

maintenance of the system takes place.

ENROLL NO. 18 PREM CHAND MAURYA

 Diagrammatic Representation of Water-fall-Model

System

Feasibility Report
Feasibility

Validation

& Project Plan

Requirement Document
Requirement Analysis
& Project
Planning
Validation

System
Document
System Design
Design
Verification

Detailed
Document
Detailed Design

Design
Verification

Coding

Verification
Programs

Reports & Manuals

Test Plan Test

Testing and
Integration

Installation
Report
Installation

Operations and
Maintenance

ENROLL NO. 19 PREM CHAND MAURYA

In the previous model, the requirement analysis phase is mentioned as analysis and

planning. Planning is a critical activity in the software development. In this model, the

sequence of activity is: requirement analysis, project planning, system design, detailed

design, coding and unit testing, system integration and testing. Linear ordering of activities

is to clearly identify the end of phase and beginning of other. This is done by verification

and validation. In each phase, there is some defined output that can be evaluated and

certified. When activity of a phase is completed then there should be output product of that

phase. The outputs of earlier phases are known as intermediate products. For the coding

phase the output is code. The certified output of a phase that is released for next phase is

known as baseline.

ENROLL NO. 20 PREM CHAND MAURYA

 Context Diagram for Information Flow Representation

DATA FLOW DIAGRAMS

1.0

Manager

1.1 1.2

Enquiry Schedule

Entry of
new Total no. of Update status
enquiry staff selected of each staff
standard for a event schedule
wise and according to
date wise their
deployment

Enquiry Details Requirement of event Staff Details

Hotel Manager Activities

ENROLL NO. 21 PREM CHAND MAURYA

Software Requirement Specifications

A) System Reference

The objective of Hotel Management System is to help the organization in automating

the whole manual processing of the existing system.

As the system is based on providing the allotment of standards in between different

skilled staff and commencement of standards, rooms, attendance, charges collection,

Calculation of amount due on the Customer, charging of fine require a high level of

accuracy is maintained throughout the whole processing. Manual maintenance and

calculations are error prone and are sometimes very time & resource consuming.

The main aim is thus to make the results accurate, fast and with a minimum stress on

the designer/end user.

B) Overall Description

This software titled Hotel Manager has been designed for Park Regency to make the

work efficient and problem free & accurate with easiness.

The main part of the system is the providing the coaching rooms for personality

development standard to the registered Customer by best of staff & Keeping track on

time and amounts respectively, which comprises a detailed summary of Customer

detail, standard details, payment due etc.

ENROLL NO. 22 PREM CHAND MAURYA

C) Information content representation

The main objective to develop the system is to make the accurate & efficient decisions

in different tasks at different time at different situations. The existing system is manual

so Customer and staff of the unit generally face a lot of embarrassing situations many

times.

Now they need to automate the whole process so as to make it more easy and

accurate. As they need to expand their work and hence their workload shall increase so

they require a reliable, efficient and supportive system. Different people who are

working under the organization handle their different tasks. Hence, to perform all the

functions under one system is required.

Therefore, a prototyping approach was followed. After the initial study, the complete

picture of the system came into mind and the process started. Initial designing was also

made clear to the users so that they are satisfied with the content or if they require

something more or enhanced.

ENROLL NO. 23 PREM CHAND MAURYA

Functional Description

A) Processing Narrative

Main functions used in the system, which further have sub-function, are defined as:

 Member Registration

 Staff selection (appointment)

 Standard Charges Recording

 Installment Amount Calculation

 Schedule Calculation

 Issue of bill

 Attendance Maintenance (Day – by –Day)

ENROLL NO. 24 PREM CHAND MAURYA

B) Limitation

Along with a lot of benefits, the system has certain restrictions while execution, which

are as follows:

 Immense care has to be taken while entering data because any

mistake in entering data in any of the fields might result in innumerable numbers of

wrong answers in the series of reports generated.

 Because the proposed project is based on a highly calculation of

data, therefore implementation, evaluation and maintenance phases are going to be

very tedious and time consuming also.

 Further enhancement of the system may be required after

implementation.

ENROLL NO. 25 PREM CHAND MAURYA

C) Performance Requirements

The major performance objectives of the exploration and testing system are:

 Reduce the errors generated by the manual system like; a minor

mistake in data entry may result in major variations in the results. So a very high

level of accuracy has to be maintained.

 Reduce the time spent in performing typical math’s calculations

based on the observations.

 Reduce the manpower needed to evaluate the whole lot of

factors after testing. Even a single but reliable. person/user/operators of the existing

system can easily work on the system.

ENROLL NO. 26 PREM CHAND MAURYA

Design

Design is a meaningful engineering representation of something that is to be built. It can be

traced to a customer’s requirements and at the same time assessed for quality against a

set of predefined criteria for “good” design. Design focuses on the following major areas of

concern: data, architecture and interfaces.

A) Data Design

Database structure, any external file structures, internal data structures are all

defined on next page as:

ENROLL NO. 27 PREM CHAND MAURYA

Admin Table

Column Name Data Type Width

User Name Text 25
Password text 20

checkin

Column Name Data Type Width

arrivaldate Date/time
arrivaltime Date/time 20
name text 25
sex text 1
Age number
address text 30
city text 20
Pincode number
phone number
roomno number

ENROLL NO. 28 PREM CHAND MAURYA

checkout

Column Name Data Type Width

Checkindate Date/time
checkoutdate Date/time
Daysstayed number
name text 25
address text 30
phone number
roomno number
amount number

reservation

Column Name Data Type Width

arrivaldate Date/time
name text 25
address text 30
phone number
date Date/time
confirmed Yes/no

ENROLL NO. 29 PREM CHAND MAURYA

Room

Column Name Data Type Width

roomno number
status Yes/no

user

Column Name Data Type Width

name text 25
address text 30
phone number
userid text 25
password text 20

ENROLL NO. 30 PREM CHAND MAURYA

 Database Structure

Program Structure For Hotel Manager

Hotel Manager

Standard 1 Standard II Standard N-1 Standard N

Schedule

Staff

Hotel Manager/Administrator gives access to different standard. All these standard are
provided to Customer.

ENROLL NO. 31 PREM CHAND MAURYA

 Manager has the accessibilty to do the following tasks:

Manager

Customer Registration Standard Initiation Staff Report

Selection s
for event

Registered members have the accessibilty to do the following tasks:

Manager

Change his Password

The management has accessibility to all the forms/tasks mentioned above.

 Management can modify the details of the Customer and Staff.

 Management can modify the details of the Schedule.

ENROLL NO. 32 PREM CHAND MAURYA

C) Interface Design

Design of inputs and outputs are important features of design specifications. The

input design is the link that ties the information system into the world of its users.

Output is the main reason for developing the system and the basis on which they

evaluate the usefulness of the application.

I. Input Design

II. Output Design

ENROLL NO. 33 PREM CHAND MAURYA

Input Design (Input Screens)

The design decisions for handling input specify how data are accepted for computer

processing. Analysts decide whether the data are entered directly, or by using source

documents, such as variable forms where the data are transferred into the computer for

processing. Input design features can ensure the reliability of the system and produce

results from accurate data, or they can result in erroneous information. The input design

also determines whether the user can interact efficiently with the system. Six objectives

guiding the design of the input focus on:

 Effectiveness

 Accuracy

 Ease to use

 Consistency

 Simplicity

 Attractiveness

All the above-mentioned features were kept in mind while designing the input screens for

the automated system of Hotel Manager. As the user will only like to work on the system if

only it makes appeal to them. Additional tools like Internet Explorer are also provided to

the user.

ENROLL NO. 34 PREM CHAND MAURYA

 USER LOGIN FORM

ENROLL NO. 35 PREM CHAND MAURYA

 ADMINISTRATOR LOGIN MANAGER

ENROLL NO. 36 PREM CHAND MAURYA

 MAIN FORM (1)

ENROLL NO. 37 PREM CHAND MAURYA

 ISSUE OF ROOM

ENROLL NO. 38 PREM CHAND MAURYA

 BOOKING

ENROLL NO. 39 PREM CHAND MAURYA

 CHECKOUT DETAILS

ENROLL NO. 40 PREM CHAND MAURYA

 ABOUT AUTHER

ENROLL NO. 41 PREM CHAND MAURYA

Output Design (Reports)

One of the most important features of an automated system for users is the output it

produces. Output is information delivered to users through the information system. Without

quality output, the entire system may appear to be unnecessary and users will avoid using

it. In order to create the most useful output possible there need to be an interaction with the

user, until the result is considered to be satisfactory.

Following objectives were kept in mind while designing acceptable outputs for the

automated system of Hotel Manager:

 Outputs were designed to serve the intended purpose.

 Outputs were designed to fit the users need.

 Appropriate quantity of output is delivered.

 Output is where it is needed.

 Output is provided on time.

 Right output method is chosen (i.e. a report, a document or a message.

All the output are shown in report section.)

ENROLL NO. 42 PREM CHAND MAURYA

 OUT PUT DESIGN : REPORTS

HMS Statistics

ENROLL NO. 43 PREM CHAND MAURYA

 Report

ENROLL NO. 44 PREM CHAND MAURYA

 Room status

ENROLL NO. 45 PREM CHAND MAURYA

 About HMS

ENROLL NO. 46 PREM CHAND MAURYA

Coding

The design must be translated into a machine-readable form. Coding step performs this

task. If design is performed in a detailed manner, coding can be accomplished

mechanistically. Coding may involve unit testing and debugging. In development of the

automated system for Hotel Manager Visual Basic 6.0 and Data Report are used. Oracle

8i is used as a database to store the data.

ENROLL NO. 47 PREM CHAND MAURYA

LOGIN FORM

‘DIM DB AS CONNECTION
Dim db As Database
Dim rs As Recordset

Private Sub Command1_Click()

With Data2
.Recordset.MoveFirst
Do Until .Recordset.EOF
If (.Recordset.Fields(0) = Text1.Text) And (.Recordset.Fields(1) = Text2.Text) Then
'If Text1.Text = Data1.Recordset("userid") Then '& Text2.Text =
Data1.Recordset("password") Then
Unload Me
Form6.Show
Exit Sub
Else
.Recordset.MoveNext
End If
Loop
'Label4.Caption = "Invalid username or ID.Try again.. "
MsgBox "Invalid Username or password.Try again...", vbCritical, "HMS"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End With
End Sub

Private Sub Command2_Click()

With Data1
.Recordset.MoveFirst
Do Until .Recordset.EOF

ENROLL NO. 48 PREM CHAND MAURYA

If (.Recordset.Fields("userid") = Text1.Text) And (.Recordset.Fields("password") =
Text2.Text) Then
'If Text1.Text = Data1.Recordset("userid") Then '& Text2.Text =
Data1.Recordset("password") Then
Unload Me
Form2.Show
Form2.Caption = "Welcome user..."
Exit Sub
Else
.Recordset.MoveNext
End If
Loop
'Label4.Caption = "Invalid username or ID.Try again.. "
MsgBox "Invalid Username or password.Try again...", vbCritical, "HMS"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End With
End Sub

Private Sub Command3_Click()

Close Databases
End
End Sub

Private Sub Form_Load()

'Set db = OpenDatabase("hotel.mdb")
‘Set db = New ADODB.Connection
‘Set rs = New ADODB.Recordset
‘db.Open "Provider=msdasql;dsn=hsm; uid=hoteladmin;pwd=prem"
‘rs.Open "select * from admingrade", db, adOpenStatic, adLockOptimistic
'Set rs = db.OpenRecordset("admin")
Data1.DatabaseName = App.Path & "\db\hotel2.mdb"
Data1.RecordSource = "select * from user"
Data2.DatabaseName = App.Path & "\db\hotel2.mdb"

ENROLL NO. 49 PREM CHAND MAURYA

Data2.RecordSource = "select * from admin"
End Sub

Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)

End Sub

ENROLL NO. 50 PREM CHAND MAURYA

Main form

DIM DB AS DATABASE
DIM RS AS RECORDSET
DIM DB1 AS DATABASE
DIM RS1 AS RECORDSET
DIM DB2 AS DATABASE
DIM RS2 AS RECORDSET
DIM VAL1 AS INTEGER
DIM VAL2 AS INTEGER
DIM VAL3 AS INTEGER
DIM VAL AS INTEGER

PRIVATE SUB ABOUT_CLICK()

FORM7.SHOW 1
END SUB

PRIVATE SUB COMMAND1_CLICK()

IF TEXT2.TEXT = "" THEN
MSGBOX "PLEASE ENTER NAME", VBINFORMATION, "HMS"
TEXT2.SETFOCUS
ELSE
IF TEXT3.TEXT = "" THEN
MSGBOX "PLEASE ENTER AGE", VBINFORMATION, "HMS"
TEXT3.SETFOCUS
ELSE
IF TEXT4.TEXT = "" THEN
MSGBOX "PLEASE ENTER ADDRESS", VBINFORMATION, "HMS"
TEXT4.SETFOCUS
ELSE
IF TEXT5.TEXT = "" THEN
MSGBOX "PLEASE ENTER CITY", VBINFORMATION, "HMS"
TEXT5.SETFOCUS
ELSE

ENROLL NO. 51 PREM CHAND MAURYA

IF TEXT6.TEXT = "" THEN
MSGBOX "PLEASE ENTER PIN", VBINFORMATION, "HMS"
TEXT6.SETFOCUS
ELSE
IF TEXT7.TEXT = "" THEN
MSGBOX "PLEASE ENTER PHONE", VBINFORMATION, "HMS"
TEXT7.SETFOCUS
ELSE
IF COMBO1.TEXT = "" THEN
MSGBOX "PLEASE ENTER SEX", VBINFORMATION, "HMS"
COMBO1.SETFOCUS
ELSE
IF COMBO2.TEXT = "" THEN
MSGBOX "PLEASE ENTER ROOMNO", VBINFORMATION, "HMS"
COMBO2.SETFOCUS
ELSE
RS.ADDNEW
RS.FIELDS(0) = TEXT1.TEXT
RS.FIELDS(1) = TEXT9.TEXT
RS.FIELDS(2) = TEXT2.TEXT
RS.FIELDS(3) = COMBO1.TEXT
RS.FIELDS(4) = TEXT3.TEXT
RS.FIELDS(5) = TEXT4.TEXT
RS.FIELDS(6) = TEXT5.TEXT
RS.FIELDS(7) = TEXT6.TEXT
RS.FIELDS(8) = TEXT7.TEXT
RS.FIELDS(9) = COMBO2.TEXT
RS.UPDATE
DATA1.RECORDSET.MOVEFIRST
DO UNTIL DATA1.RECORDSET.EOF
IF DATA1.RECORDSET.FIELDS(0) = COMBO2.TEXT THEN
DATA1.RECORDSET.EDIT
DATA1.RECORDSET.FIELDS(1) = TRUE
DATA1.RECORDSET.UPDATE
MSGBOX ("DATA ADDED. ROOM ALLOTED FOR VISITOR") + COMBO2.TEXT,
VBINFORMATION, "HMS"
EXIT SUB
ELSE

ENROLL NO. 52 PREM CHAND MAURYA

DATA1.RECORDSET.MOVENEXT
END IF
LOOP
END IF
END IF
END IF
END IF
END IF
END IF
END IF
END IF

END SUB

PRIVATE SUB COMMAND10_CLICK()

RS1.MOVEFIRST
DO UNTIL RS1.EOF
IF RS1.FIELDS(1) = TEXT15.TEXT AND RS1.FIELDS(5) = TRUE THEN
CALL RESCHECK
EXIT SUB
ELSE
IF (RS1.FIELDS(1) = TEXT15.TEXT) AND RS1.FIELDS(5) = FALSE THEN
TEXT11.TEXT = RS1.FIELDS(1)
TEXT12.TEXT = RS1.FIELDS(2)
TEXT13.TEXT = RS1.FIELDS(3)
TEXT14.TEXT = RS1.FIELDS(4)
CHECK1.VALUE = 0
'CHECK1.VALUE = RS1.FIELDS(5)
EXIT SUB
ELSE
RS1.MOVENEXT
END IF
END IF
LOOP
MSGBOX "NO DATA FOUND.TRY AGAIN..", VBINFORMATION, "HMS"
END SUB

PRIVATE SUB COMMAND11_CLICK()

ENROLL NO. 53 PREM CHAND MAURYA

RS2.ADDNEW
RS2.FIELDS(0) = TEXT16.TEXT
RS2.FIELDS(1) = TEXT17.TEXT
RS2.FIELDS(2) = TEXT18.TEXT
RS2.FIELDS(3) = TEXT21.TEXT
RS2.FIELDS(4) = TEXT19.TEXT
RS2.FIELDS(5) = TEXT20.TEXT
RS2.FIELDS(6) = DATEVALUE(FORMAT(NOW, "SHORT DATE")) - RS.FIELDS(0)
RS2.FIELDS(7) = TEXT25.TEXT
RS2.UPDATE
CALL CHKOUTROOM
RS.MOVEFIRST
DO UNTIL RS.EOF
IF RS.FIELDS(2) = TEXT16.TEXT THEN
RS.DELETE
EXIT SUB
ELSE
RS.MOVENEXT
END IF
LOOP
MSGBOX "GUEST CHECKED OUT SUCESSFULY...", VBINFORMATION, "HMS"

END SUB

PRIVATE SUB COMMAND12_CLICK()

FORM2.PRINTFORM

END SUB

PRIVATE SUB COMMAND13_CLICK()

RS.MOVEFIRST
IF OPTION1.VALUE = TRUE THEN
CALL OPTIONSEARCH
ELSE
DO UNTIL RS.EOF
IF RS.FIELDS(2) = TEXT26.TEXT THEN
TEXT16.TEXT = RS.FIELDS(2)
TEXT17.TEXT = RS.FIELDS(5)

ENROLL NO. 54 PREM CHAND MAURYA

TEXT18.TEXT = RS.FIELDS(8)
TEXT21.TEXT = RS.FIELDS(9)
TEXT19.TEXT = RS.FIELDS(0)
VAL = DATEVALUE(FORMAT(NOW, "SHORT DATE")) - RS.FIELDS(0)
TEXT28.TEXT = DATEVALUE(FORMAT(NOW, "SHORT DATE")) - RS.FIELDS(0)
TEXT22.TEXT = VAL + 300
TEXT23.TEXT = (10 / 100) * TEXT22.TEXT
TEXT24.TEXT = (20 / 100) * TEXT23.TEXT
VAL1 = INT(TEXT22.TEXT)
VAL2 = INT(TEXT23.TEXT)
VAL3 = INT(TEXT24.TEXT)

TEXT25.TEXT = VAL1 + VAL2 + VAL3

TEXT16.ENABLED = TRUE
TEXT17.ENABLED = TRUE
TEXT18.ENABLED = TRUE
TEXT19.ENABLED = TRUE
TEXT21.ENABLED = TRUE
TEXT22.ENABLED = TRUE
TEXT23.ENABLED = TRUE
TEXT24.ENABLED = TRUE
TEXT25.ENABLED = TRUE
COMMAND11.ENABLED = TRUE
'COMMAND12.ENABLED = TRUE
COMMAND21.ENABLED = TRUE
EXIT SUB
ELSE
RS.MOVENEXT
END IF
LOOP
MSGBOX "NO DATAS FOUND.", VBINFORMATION, "HMS"
TEXT26.TEXT = ""
TEXT26.SETFOCUS

END IF
END SUB

PRIVATE SUB COMMAND14_CLICK()

ENROLL NO. 55 PREM CHAND MAURYA

IF RS.BOF OR RS.EOF = TRUE THEN
MSGBOX " END OF FILE", VBOKONLY, "HMS"
ELSE
RS.DELETE
END IF
END SUB

PRIVATE SUB COMMAND15_CLICK()

IF RS.BOF = TRUE THEN
MSGBOX "BEGINNING OF RECORD", VBOKONLY, "HMS"
ELSE
RS.MOVEFIRST
TEXT1.TEXT = RS.FIELDS(0)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)
TEXT5.TEXT = RS.FIELDS(6)
TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)
END IF
END SUB

PRIVATE SUB COMMAND16_CLICK()

IF RS.EOF <> TRUE THEN
RS.MOVENEXT
IF RS.EOF = TRUE THEN
RS.MOVELAST
MSGBOX "END OF RECORD", VBINFORMATION, "HMS"
ELSE
'RS.MOVENEXT
TEXT1.TEXT = RS.FIELDS(0)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)
TEXT5.TEXT = RS.FIELDS(6)

ENROLL NO. 56 PREM CHAND MAURYA

TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)
END IF
END IF
END SUB

PRIVATE SUB COMMAND17_CLICK()

IF RS.BOF <> TRUE THEN
RS.MOVEPREVIOUS
IF RS.BOF = TRUE THEN
RS.MOVEFIRST
MSGBOX "BEGINING OF RECORD", VBINFORMATION, "HMS"
ELSE
'RS.MOVEPREVIOUS
TEXT1.TEXT = RS.FIELDS(0)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)
TEXT5.TEXT = RS.FIELDS(6)
TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)
END IF
END IF
END SUB

PRIVATE SUB COMMAND18_CLICK()

IF RS.EOF = TRUE THEN
MSGBOX ("END OF RECORD")
ELSE
RS.MOVELAST
TEXT1.TEXT = RS.FIELDS(0)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)

ENROLL NO. 57 PREM CHAND MAURYA

TEXT5.TEXT = RS.FIELDS(6)
TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)
END IF
END SUB

PRIVATE SUB COMMAND19_CLICK()

RS1.EDIT
RS1.FIELDS(1) = TEXT11.TEXT
RS1.FIELDS(2) = TEXT12.TEXT
RS1.FIELDS(3) = TEXT13.TEXT
RS1.FIELDS(4) = TEXT14.TEXT
RS1.FIELDS(5) = CHECK1.VALUE
RS1.UPDATE
COMMAND5.ENABLED = TRUE
COMMAND6.ENABLED = TRUE
COMMAND7.ENABLED = TRUE

MSGBOX "RESERVATION FOR GUEST IS UPDATED", VBINFORMATION, "HMS"

COMMAND19.ENABLED = FALSE
END SUB

PRIVATE SUB COMMAND2_CLICK()

NAMEQUERY = INPUTBOX("ENTER A NAME TO SEARCH FOR", "NAME QUERY")
RS.MOVEFIRST
DO UNTIL RS.EOF
IF RS.FIELDS("NAME") = NAMEQUERY THEN
TEXT1.TEXT = RS.FIELDS(0)
TEXT9.TEXT = RS.FIELDS(1)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)
TEXT5.TEXT = RS.FIELDS(6)
TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)

ENROLL NO. 58 PREM CHAND MAURYA

MSGBOX "MATCH FOUND.EDIT THE RECORD", VBINFORMATION, "HMS"
COMMAND1.ENABLED = FALSE
COMMAND2.ENABLED = FALSE
COMMAND14.ENABLED = FALSE
COMMAND22.ENABLED = TRUE
COMMAND4.ENABLED = TRUE

EXIT SUB
ELSE
RS.MOVENEXT
END IF
LOOP
MSGBOX ("NO MATCHES FOUND.PLEASE TRY AGAIN.."), VBCRITICAL, "HMS"
END SUB

PRIVATE SUB COMMAND20_CLICK()

LIST4(0).CLEAR
LIST4(1).CLEAR
CALL ROOMSTATUS
END SUB

PRIVATE SUB COMMAND21_CLICK()

TEXT16 = ""
TEXT17 = ""
TEXT18 = ""
TEXT19 = ""
TEXT21 = ""
TEXT22 = ""
TEXT23 = ""
TEXT24 = ""
TEXT25 = ""
TEXT28 = ""
TEXT26 = ""
TEXT26.SETFOCUS
END SUB

PRIVATE SUB COMMAND22_CLICK()

TEXT2.SETFOCUS

ENROLL NO. 59 PREM CHAND MAURYA

TEXT2.TEXT = ""
COMBO1.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT5.TEXT = ""
TEXT6.TEXT = ""
TEXT7.TEXT = ""
TEXT8 = ""
COMBO2.TEXT = ""
COMMAND1.ENABLED = TRUE
COMMAND2.ENABLED = TRUE
COMMAND14.ENABLED = FALSE

END SUB

PRIVATE SUB COMMAND23_CLICK()

CALL EXPIRECONFIRMATION
END SUB

PRIVATE SUB COMMAND3_CLICK()

RS.MOVEFIRST
DO UNTIL RS.EOF
IF RS.FIELDS("NAME") = TEXT8.TEXT THEN
TEXT1.TEXT = RS.FIELDS(0)
TEXT2.TEXT = RS.FIELDS(2)
COMBO1.TEXT = RS.FIELDS(3)
TEXT3.TEXT = RS.FIELDS(4)
TEXT4.TEXT = RS.FIELDS(5)
TEXT5.TEXT = RS.FIELDS(6)
TEXT6.TEXT = RS.FIELDS(7)
TEXT7.TEXT = RS.FIELDS(8)
COMBO2.TEXT = RS.FIELDS(9)
COMMAND1.ENABLED = FALSE
EXIT SUB
ELSE
RS.MOVENEXT
END IF
LOOP

ENROLL NO. 60 PREM CHAND MAURYA

MSGBOX "NO MATCHES FOUND.PLEASE TRY AGAIN..", VBINFORMATION, "HMS"
TEXT8.TEXT = ""

TEXT8.SETFOCUS
END SUB

PRIVATE SUB COMMAND4_CLICK()

RS.EDIT
RS.FIELDS(0) = TEXT1.TEXT
RS.FIELDS(1) = TEXT9.TEXT
RS.FIELDS(2) = TEXT2.TEXT
RS.FIELDS(3) = COMBO1.TEXT
RS.FIELDS(4) = TEXT3.TEXT
RS.FIELDS(5) = TEXT4.TEXT
RS.FIELDS(6) = TEXT5.TEXT
RS.FIELDS(7) = TEXT6.TEXT
RS.FIELDS(8) = TEXT7.TEXT
RS.FIELDS(9) = COMBO2.TEXT
RS.UPDATE
MSGBOX "CURRENT RECORD IS UPDATED", VBINFORMATION, "HMS"
COMMAND1.ENABLED = TRUE
COMMAND22.ENABLED = TRUE
COMMAND2.ENABLED = TRUE
COMMAND4.ENABLED = FALSE
COMMAND22.SETFOCUS
END SUB

PRIVATE SUB COMMAND5_CLICK()

IF TEXT11 = "" THEN
MSGBOX "PLEASE ENTER NAME", VBINFORMATION, "HMS"
TEXT11.SETFOCUS
ELSE
IF TEXT12 = "" THEN
MSGBOX "PLEASE ENTER ADDRESS", VBINFORMATION, "HMS"
TEXT12.SETFOCUS
ELSE
IF TEXT13 = "" THEN
MSGBOX "PLEASE ENTER PHONE", VBINFORMATION, "HMS"

ENROLL NO. 61 PREM CHAND MAURYA

TEXT13.SETFOCUS
ELSE
IF TEXT14 = "" THEN
MSGBOX "PLEASE ENTER ESTIMATED ARRIVAL", VBINFORMATION, "HMS"
TEXT14.SETFOCUS
ELSE
RS1.ADDNEW
RS1.FIELDS(0) = TEXT10.TEXT
RS1.FIELDS(1) = TEXT11.TEXT
RS1.FIELDS(2) = TEXT12.TEXT
RS1.FIELDS(3) = TEXT13.TEXT
RS1.FIELDS(4) = TEXT14.TEXT
RS1.FIELDS(5) = CHECK1.VALUE
RS1.UPDATE
MSGBOX "RESERVATION FOR NEW VISITOR ADDED", VBOKONLY, "HMS"
END IF
END IF
END IF
END IF

END SUB

PRIVATE SUB COMMAND6_CLICK()

RESINPUT = INPUTBOX("ENTER THE NAME TO BE EDITED", "RESINPUT")
RS1.MOVEFIRST
DO UNTIL RS1.EOF
IF RS1.FIELDS(1) = RESINPUT AND RS1.FIELDS(5) = TRUE THEN
CALL RESCHECK1
EXIT SUB
ELSE
IF (RS1.FIELDS(1) = RESINPUT) AND RS1.FIELDS(5) = FALSE THEN
TEXT11.TEXT = RS1.FIELDS(1)
TEXT12.TEXT = RS1.FIELDS(2)
TEXT13.TEXT = RS1.FIELDS(3)
TEXT14.TEXT = RS1.FIELDS(4)
CHECK1.VALUE = 0
COMMAND5.ENABLED = FALSE
COMMAND7.ENABLED = TRUE

ENROLL NO. 62 PREM CHAND MAURYA

COMMAND19.ENABLED = TRUE
COMMAND6.ENABLED = FALSE
EXIT SUB
ELSE
RS1.MOVENEXT
END IF
END IF
LOOP
MSGBOX "NO DATA FOUND.TRY AGAIN..", VBOKONLY, "HMS"
END SUB

PRIVATE SUB COMMAND7_CLICK()

TEXT11.TEXT = ""
TEXT12.TEXT = ""
TEXT13.TEXT = ""
TEXT14.TEXT = ""
TEXT15 = ""
COMMAND5.ENABLED = TRUE
COMMAND6.ENABLED = TRUE
COMMAND19.ENABLED = FALSE
CHECK1.VALUE = 0
END SUB

PRIVATE SUB COMMAND8_CLICK()

LIST1.CLEAR
LIST2.CLEAR
CALL RESLIST
END SUB

PRIVATE SUB COMMAND9_CLICK()

LIST1.CLEAR
LIST2.CLEAR
CALL RESCONFIRMED
END SUB

PRIVATE SUB EXIT_CLICK()

CLOSE DATABASES
END

ENROLL NO. 63 PREM CHAND MAURYA

END SUB

PRIVATE SUB FORM_LOAD()

SET DB = OPENDATABASE(APP.PATH + "/DB/HOTEL2.MDB")

SET RS = DB.OPENRECORDSET("CHECKIN")

SET DB1 = OPENDATABASE(APP.PATH + "/DB/HOTEL2.MDB")

SET RS1 = DB1.OPENRECORDSET("RESERVATION")

SET DB2 = OPENDATABASE(APP.PATH + "/DB/HOTEL2.MDB")

SET RS2 = DB2.OPENRECORDSET("CHECKOUT")

TEXT10.TEXT = DATE
TEXT20.TEXT = DATE
TEXT1.TEXT = DATE
COMMAND4.ENABLED = FALSE
COMMAND14.ENABLED = FALSE
COMMAND19.ENABLED = FALSE

TEXT16.ENABLED = FALSE
TEXT17.ENABLED = FALSE
TEXT18.ENABLED = FALSE
TEXT19.ENABLED = FALSE
TEXT21.ENABLED = FALSE
TEXT22.ENABLED = FALSE
TEXT23.ENABLED = FALSE
TEXT24.ENABLED = FALSE
TEXT25.ENABLED = FALSE
COMMAND11.ENABLED = FALSE

COMMAND21.ENABLED = FALSE
TEXT28.ENABLED = FALSE
LABEL45.CAPTION = FORMAT(DATE, "LONG DATE")
LABEL46.CAPTION = TIME
END SUB

ENROLL NO. 64 PREM CHAND MAURYA

PRIVATE SUB LOGOFF_CLICK()
CLOSE DATABASES
UNLOAD FORM2
UNLOAD FORM3
UNLOAD FORM4
UNLOAD FORM5
FORM1.SHOW
END SUB

PRIVATE SUB REP_CLICK()

FORM4.SHOW 1
END SUB

PRIVATE SUB RMST_CLICK()

FORM5.SHOW VBMODAL
END SUB

PRIVATE SUB STAT_CLICK()

FORM3.SHOW
END SUB

PRIVATE SUB TIMER1_TIMER()

TEXT9.TEXT = TIME()
TEXT27.TEXT = TIME()
LABEL46.CAPTION = TIME()
END SUB

PRIVATE SUB RESLIST()

DIM STRSQL AS STRING

ON ERROR RESUME NEXT

STRSQL = "SELECT * FROM RESERVATION"
LIST1.CLEAR
LIST2.CLEAR

WITH DATA2
.RECORDSOURCE = STRSQL

ENROLL NO. 65 PREM CHAND MAURYA

 .REFRESH
.RECORDSET.MOVEFIRST

DO UNTIL .RECORDSET.EOF
IF .RECORDSET.FIELDS("CONFIRMED") = 0 THEN
LIST1.ADDITEM .RECORDSET("NAME")
LIST2.ADDITEM .RECORDSET("ARRIVALDATE")
END IF
.RECORDSET.MOVENEXT
LOOP

END WITH
END SUB

PRIVATE SUB RESCONFIRMED()

DIM SQL AS STRING

ON ERROR RESUME NEXT

SQL = "SELECT * FROM RESERVATION"
LIST1.CLEAR
LIST2.CLEAR

WITH DATA2
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST

DO UNTIL .RECORDSET.EOF
IF .RECORDSET.FIELDS(5) = TRUE THEN
LIST1.ADDITEM .RECORDSET("NAME")
LIST2.ADDITEM .RECORDSET("ARRIVALDATE")
END IF
.RECORDSET.MOVENEXT
LOOP

END WITH
END SUB

ENROLL NO. 66 PREM CHAND MAURYA

PRIVATE SUB ROOMSTATUS()
DIM SQL AS STRING

SQL = "SELECT * FROM ROOM"

WITH DATA1
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(1) = TRUE THEN
LIST4(1).ADDITEM .RECORDSET("ROOMNO")
'LIST3.ADDITEM.INDEX (1)
ELSE: LIST4(0).ADDITEM .RECORDSET("ROOMNO") 'FILL LISTBOX FOR ROOMS
TAB
END IF

.RECORDSET.MOVENEXT
LOOP
END WITH
END SUB
PRIVATE SUB CHKOUTROOM()

DATA1.RECORDSET.MOVEFIRST
DO UNTIL DATA1.RECORDSET.EOF
IF DATA1.RECORDSET.FIELDS(0) = TEXT21.TEXT THEN
DATA1.RECORDSET.EDIT
DATA1.RECORDSET.FIELDS(1) = FALSE
DATA1.RECORDSET.UPDATE
MSGBOX ("VISITOR SUCESSFULLY CHECKED OUT..") + COMBO2.TEXT, VBOKONLY,
"HMS"
EXIT SUB
ELSE
DATA1.RECORDSET.MOVENEXT
END IF

ENROLL NO. 67 PREM CHAND MAURYA

LOOP
END SUB

PRIVATE SUB CHECKINVALIDATE(CHECKIN_FORM_ERROR)

LET CHECKIN_FORM_ERROR = FALSE

IF TEXT2 = "" THEN

TEXT2.SETFOCUS
MSGBOX "PLEASE ENTER THE NAME", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
EXIT SUB
ELSEIF TEXT3.TEXT = "" THEN
TEXT3.SETFOCUS
MSGBOX "PLEASE ENTER THE AGE", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF TEXT4.TEXT = "" THEN
TEXT4.SETFOCUS
MSGBOX "PLEASE ENTER THE ADDRESS", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF TEXT5.TEXT = "" THEN
TEXT5.SETFOCUS
MSGBOX "PLEASE ENTER THE CITY", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF TEXT6.TEXT = "" THEN
TEXT6.SETFOCUS
MSGBOX "PLEASE ENTER THE PINCODE", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF TEXT7.TEXT = "" THEN
TEXT7.SETFOCUS
MSGBOX "PLEASE ENTER THE PHONE", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF COMBO1.TEXT = "" THEN
COMBO1.SETFOCUS
MSGBOX "PLEASE ENTER THE SEX", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
ELSEIF COMBO2.TEXT = "" THEN
COMBO2.SETFOCUS

ENROLL NO. 68 PREM CHAND MAURYA

MSGBOX "PLEASE ENTER THE ROOM NUMBER", VBEXCLAMATION, ERROR
LET CHECKIN_FORM_ERROR = TRUE
END IF
END SUB
PRIVATE SUB EXPIRECONFIRMATION()
WITH DATA2
.RECORDSOURCE = "SELECT * FROM RESERVATION"
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(4) < DATE THEN
.RECORDSET.DELETE
END IF
.RECORDSET.MOVENEXT
LOOP
END WITH
MSGBOX "EXPIRED RESERVATION DELETED SUCESSFULY...",
VBINFORMATION, "HMS"
LIST1.TEXT = ""
LIST2.TEXT = ""
CALL RESLIST
END SUB
PRIVATE SUB OPTIONSEARCH()
DO UNTIL RS.EOF
IF RS.FIELDS(9) = TEXT26.TEXT THEN
TEXT16.TEXT = RS.FIELDS(2)
TEXT17.TEXT = RS.FIELDS(5)
TEXT18.TEXT = RS.FIELDS(8)
TEXT21.TEXT = RS.FIELDS(9)
TEXT19.TEXT = RS.FIELDS(0)
VAL = DATEVALUE(FORMAT(NOW, "SHORT DATE")) - RS.FIELDS(0)
TEXT28.TEXT = DATEVALUE(FORMAT(NOW, "SHORT DATE")) - RS.FIELDS(0)
TEXT22.TEXT = VAL + 300
TEXT23.TEXT = (10 / 100) * TEXT22.TEXT
TEXT24.TEXT = (20 / 100) * TEXT23.TEXT
VAL1 = INT(TEXT22.TEXT)
VAL2 = INT(TEXT23.TEXT)

ENROLL NO. 69 PREM CHAND MAURYA

VAL3 = INT(TEXT24.TEXT)

TEXT25.TEXT = VAL1 + VAL2 + VAL3

TEXT16.ENABLED = TRUE
TEXT17.ENABLED = TRUE
TEXT18.ENABLED = TRUE
TEXT19.ENABLED = TRUE
TEXT21.ENABLED = TRUE
TEXT22.ENABLED = TRUE
TEXT23.ENABLED = TRUE
TEXT24.ENABLED = TRUE
TEXT25.ENABLED = TRUE
COMMAND11.ENABLED = TRUE
'COMMAND12.ENABLED = TRUE
COMMAND21.ENABLED = TRUE
EXIT SUB
ELSE
RS.MOVENEXT
END IF
LOOP
MSGBOX "NO DATAS FOUND.", VBINFORMATION, "HMS"
TEXT26.TEXT = ""
TEXT26.SETFOCUS
END SUB
PRIVATE SUB RESCHECK()
TEXT11 = ""
TEXT12 = ""
TEXT13 = ""
TEXT14 = ""
CHECK1.VALUE = 0
RS1.MOVEFIRST
DO UNTIL RS1.EOF
IF RS1.FIELDS(1) = TEXT15.TEXT AND RS1.FIELDS(5) = TRUE THEN
TEXT11.TEXT = RS1.FIELDS(1)
TEXT12.TEXT = RS1.FIELDS(2)
TEXT13.TEXT = RS1.FIELDS(3)
TEXT14.TEXT = RS1.FIELDS(4)
CHECK1.VALUE = 1

ENROLL NO. 70 PREM CHAND MAURYA

EXIT SUB
ELSE
RS1.MOVENEXT
END IF
LOOP
MSGBOX "NO DATA FOUND.TRY AGAIN..", VBINFORMATION, "HMS"
END SUB
PRIVATE SUB RESCHECK1()
RS1.MOVEFIRST
DO UNTIL RS1.EOF
'IF (RS1.FIELDS(1) = RESINPUT) AND RS1.FIELDS(5) = TRUE THEN
IF RS1.FIELDS(5) = TRUE THEN
TEXT11.TEXT = RS1.FIELDS(1)
TEXT12.TEXT = RS1.FIELDS(2)
TEXT13.TEXT = RS1.FIELDS(3)
TEXT14.TEXT = RS1.FIELDS(4)
CHECK1.VALUE = 1
COMMAND5.ENABLED = FALSE
COMMAND7.ENABLED = TRUE
COMMAND19.ENABLED = TRUE
COMMAND6.ENABLED = FALSE
EXIT SUB
ELSE
RS1.MOVENEXT
END IF
LOOP
MSGBOX "NO DATA FOUND.TRY AGAIN..", VBOKONLY, "HMS"
END SUB

ENROLL NO. 71 PREM CHAND MAURYA

HMS STATISTICS

DIM DB AS DATABASE
DIM RS AS RECORDSET
DIM CHKIN AS INTEGER
DIM RESERV AS INTEGER
DIM OCCUPIED AS INTEGER
DIM VACANT AS INTEGER
DIM CHKOUT AS INTEGER
DIM RESTODAY AS INTEGER

PRIVATE SUB COMMAND1_CLICK()

LET CHKIN = 0
LET RESERV = 0
LET OCCUPIED = 0
LET VACANT = 0
LET CHKOUT = 0
LET RESTODAY = 0
UNLOAD ME

END SUB

PRIVATE SUB COMMAND2_CLICK()

FORM3.PRINTFORM
END SUB

PRIVATE SUB FORM_LOAD()

LABEL2.CAPTION = FORMAT(NOW, "LONG DATE")
CALL ROOMOCCUPIED
LABEL15.CAPTION = OCCUPIED
LABEL16.CAPTION = VACANT
CALL STATCHKIN
LABEL10.CAPTION = CHKIN
CALL STATRESERV
LABEL11.CAPTION = RESERV
CALL STATCHKOUT
LABEL12.CAPTION = CHKOUT
CALL STATRESTODAY

ENROLL NO. 72 PREM CHAND MAURYA

LABEL14.CAPTION = RESTODAY
END SUB

PRIVATE SUB ROOMOCCUPIED()

DIM SQL AS STRING

SQL = "SELECT * FROM ROOM"

WITH DATA1
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(1) = TRUE THEN
OCCUPIED = OCCUPIED + 1
ELSE: VACANT = VACANT + 1 'LIST4(0).ADDITEM .RECORDSET("ROOMNO")
END IF

.RECORDSET.MOVENEXT
LOOP
END WITH
END SUB

PRIVATE SUB STATCHKIN()

DIM SQL AS STRING

SQL = "SELECT * FROM CHECKIN"

WITH DATA1
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(0) = DATE THEN

ENROLL NO. 73 PREM CHAND MAURYA

 CHKIN = CHKIN + 1
END IF

.RECORDSET.MOVENEXT
LOOP
END WITH
END SUB
PRIVATE SUB STATRESERV()
DIM SQL AS STRING

SQL = "SELECT * FROM RESERVATION"

WITH DATA2
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(0) = DATE THEN
RESERV = RESERV + 1
END IF

.RECORDSET.MOVENEXT
LOOP
END WITH
END SUB
PRIVATE SUB STATCHKOUT()
DIM SQL AS STRING

SQL = "SELECT * FROM CHECKOUT"

WITH DATA3
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
ON ERROR RESUME NEXT
IF .RECORDSET.FIELDS(5) = DATE THEN

ENROLL NO. 74 PREM CHAND MAURYA

 CHKOUT = CHKOUT + 1
END IF

.RECORDSET.MOVENEXT
LOOP
END WITH
END SUB
PRIVATE SUB STATRESTODAY()
DIM SQL AS STRING

SQL = "SELECT * FROM RESERVATION"

WITH DATA2
.RECORDSOURCE = SQL
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF

ON ERROR RESUME NEXT

IF .RECORDSET.FIELDS(5) = TRUE THEN
RESTODAY = RESTODAY + 1
.RECORDSET.MOVENEXT
EXIT SUB
END IF
LOOP
END WITH
END SUB

ENROLL NO. 75 PREM CHAND MAURYA

ROOM STATUS

PRIVATE SUB COMMAND1_CLICK()

UNLOAD ME
END SUB

PRIVATE SUB COMMAND2_CLICK()

UNLOAD ME
END SUB

PRIVATE SUB FORM_LOAD()

DIM DB AS DATABASE
DIM RS AS RECORDSET
SET DB = OPENDATABASE(APP.PATH + "/DB/HOTEL2.MDB")
SET RS = DB.OPENRECORDSET("CHECKIN")
LABEL18.CAPTION = FORMAT(NOW, "LONG DATE")

END SUB

PRIVATE SUB LIST1_CLICK()

WITH DATA1
.RECORDSOURCE = "SELECT * FROM ROOM"
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
IF .RECORDSET.FIELDS(0) = LIST1.TEXT AND .RECORDSET.FIELDS(1) = FALSE
THEN
LABEL10.CAPTION = .RECORDSET.FIELDS(0)
LABEL11.CAPTION = ""
LABEL12.CAPTION = ""
LABEL13.CAPTION = ""
LABEL14.CAPTION = ""
LABEL15.CAPTION = ""
LABEL16.CAPTION = ""
LABEL17.CAPTION = ""
EXIT SUB
ELSE
'CALL ROOMSTATUS

ENROLL NO. 76 PREM CHAND MAURYA

 .RECORDSET.MOVENEXT
END IF
LOOP

CALL ROOMSTATUS

END WITH

END SUB

PRIVATE SUB ROOMSTATUS()

WITH DATA2
.RECORDSOURCE = "SELECT * FROM CHECKIN"
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
LABEL10.CAPTION = ""
LABEL11.CAPTION = ""
LABEL12.CAPTION = ""
LABEL13.CAPTION = ""
LABEL14.CAPTION = ""
LABEL15.CAPTION = ""
LABEL16.CAPTION = ""
LABEL17.CAPTION = ""
IF .RECORDSET.FIELDS(9) = LIST1.TEXT THEN
LABEL10.CAPTION = .RECORDSET.FIELDS(9)
LABEL11.CAPTION = .RECORDSET.FIELDS(2)
LABEL12.CAPTION = .RECORDSET.FIELDS(4)
LABEL13.CAPTION = .RECORDSET.FIELDS(3)
LABEL14.CAPTION = .RECORDSET.FIELDS(5)
LABEL15.CAPTION = .RECORDSET.FIELDS(6)
LABEL16.CAPTION = .RECORDSET.FIELDS(0)
LABEL17.CAPTION = DATEVALUE(FORMAT(NOW, "SHORT DATE")) -
.RECORDSET.FIELDS(0)

EXIT SUB
ELSE
.RECORDSET.MOVENEXT

ENROLL NO. 77 PREM CHAND MAURYA

 END IF

LOOP
END WITH

END SUB

ENROLL NO. 78 PREM CHAND MAURYA

ADMIN LOGIN MANAGER

DIM I AS INTEGER

PRIVATE SUB COMBO1_CLICK()

WITH DATA1
.REFRESH
.RECORDSET.MOVEFIRST
DO UNTIL .RECORDSET.EOF
IF .RECORDSET.FIELDS(0) = COMBO1.TEXT THEN
TEXT1.TEXT = .RECORDSET.FIELDS(3)
TEXT2.TEXT = .RECORDSET.FIELDS(4)
EXIT SUB
ELSE
.RECORDSET.MOVENEXT
END IF
LOOP
END WITH
END SUB

PRIVATE SUB COMMAND1_CLICK()

UNLOAD ME
FORM2.SHOW
FORM2.CAPTION = "WELCOME ADMINISTRATOR..."
END SUB

PRIVATE SUB COMMAND10_CLICK()

FRAME3.VISIBLE = FALSE
FRAME1.VISIBLE = TRUE

END SUB

PRIVATE SUB COMMAND11_CLICK()

DATA2.RECORDSOURCE = "SELECT * FROM ADMIN"
DATA2.RECORDSET.MOVEFIRST
TEXT3.TEXT = DATA2.RECORDSET.FIELDS(0)

ENROLL NO. 79 PREM CHAND MAURYA

TEXT4.TEXT = DATA2.RECORDSET.FIELDS(1)
TEXT4.SETFOCUS
TEXT3.ENABLED = FALSE
MSGBOX "PLEASE EDIT THE PASSWORD", VBINFORMATION, "HMS"
END SUB

PRIVATE SUB COMMAND12_CLICK()

WITH DATA2
.RECORDSOURCE = "SELECT * FROM ADMIN"
.REFRESH
.RECORDSET.EDIT
.RECORDSET.FIELDS(0) = TEXT3.TEXT
.RECORDSET.FIELDS(1) = TEXT4.TEXT
.RECORDSET.UPDATE
END WITH
MSGBOX "ADMINISTRATOR PASSWORD HAS BEEN CHANGED", VBINFORMATION,
"HMS"
COMMAND1.SETFOCUS
END SUB

PRIVATE SUB COMMAND2_CLICK()

FRAME3.VISIBLE = TRUE
FRAME1.VISIBLE = FALSE
TEXT5.SETFOCUS
END SUB

PRIVATE SUB COMMAND3_CLICK()

TEXT1.ENABLED = TRUE
TEXT2.ENABLED = TRUE
COMMAND2.ENABLED = FALSE
COMMAND4.VISIBLE = FALSE
COMMAND6.VISIBLE = TRUE
COMMAND3.ENABLED = FALSE

END SUB

PRIVATE SUB COMMAND4_CLICK()

ENROLL NO. 80 PREM CHAND MAURYA

MSGBOX "ARE U SURE WANT TO DELETE USER", VBYESNOCANCEL, "HMS"
DATA1.RECORDSET.DELETE
END SUB

PRIVATE SUB COMMAND5_CLICK()

TEXT1 = ""
TEXT2 = ""
COMMAND2.ENABLED = TRUE
COMMAND3.ENABLED = TRUE
COMMAND6.VISIBLE = FALSE
COMMAND4.VISIBLE = TRUE
COMMAND4.ENABLED = TRUE
END SUB

PRIVATE SUB COMMAND6_CLICK()

DATA1.RECORDSET.EDIT
DATA1.RECORDSET.FIELDS(3) = TEXT1.TEXT
DATA1.RECORDSET.FIELDS(4) = TEXT2.TEXT
DATA1.RECORDSET.UPDATE
MSGBOX "USER ID OR PASSWORD UPDATED", VBINFORMATION, "HMS"
COMMAND6.VISIBLE = FALSE
COMMAND4.VISIBLE = TRUE
END SUB

PRIVATE SUB COMMAND7_CLICK()

END
END SUB

PRIVATE SUB COMMAND8_CLICK()

DATA1.RECORDSET.ADDNEW
DATA1.RECORDSET.FIELDS(0) = TEXT5.TEXT
DATA1.RECORDSET.FIELDS(1) = TEXT6.TEXT
DATA1.RECORDSET.FIELDS(2) = TEXT7.TEXT
DATA1.RECORDSET.FIELDS(3) = TEXT8.TEXT
DATA1.RECORDSET.FIELDS(4) = TEXT9.TEXT
DATA1.RECORDSET.UPDATE
MSGBOX "NEW USER ADDED", VBINFORMATION, "HMS"
COMMAND8.VISIBLE = FALSE

ENROLL NO. 81 PREM CHAND MAURYA

COMMAND10.SETFOCUS
END SUB

PRIVATE SUB COMMAND9_CLICK()

TEXT5 = ""
TEXT6 = ""
TEXT7 = ""
TEXT8 = ""
TEXT9 = ""
TEXT5.SETFOCUS
END SUB

PRIVATE SUB FORM_LOAD()

DATA1.DATABASENAME = APP.PATH & "\HOTEL2.MDB"
DATA1.RECORDSOURCE = "SELECT * FROM USER"

DATA2.DATABASENAME = APP.PATH & "\HOTEL2.MDB"

DATA2.RECORDSOURCE = "SELECT * FROM ADMIN"
'DATA2.DATABASENAME = APP.PATH & "\HOTEL2.MDB"
'DATA2.RECORDSOURCE = "SELECT * FROM ADMIN"

WITH DATA1
.REFRESH
.RECORDSET.MOVEFIRST
I=0
DO UNTIL .RECORDSET.EOF
'FOR I = 0 TO 3 'LEN(.RECORDSET.BATCHSIZE)
COMBO1.LIST(I) = .RECORDSET.FIELDS(0)
.RECORDSET.MOVENEXT
I=I+1
LOOP
END WITH

TEXT1.ENABLED = FALSE
TEXT2.ENABLED = FALSE
COMMAND6.VISIBLE = FALSE

ENROLL NO. 82 PREM CHAND MAURYA

'COMMAND8.VISIBLE = FALSE
FRAME3.VISIBLE = FALSE
'CALL ADMINDETAILS

END SUB

PRIVATE SUB ADMINDETAILS()

TEXT3.TEXT = DATA2.RECORDSET.FIELDS(0)
TEXT4.TEXT = DATA2.RECORDSET.FIELDS(1)
EXIT SUB
END SUB

ENROLL NO. 83 PREM CHAND MAURYA

ABOUT HMS

PRIVATE DECLARE FUNCTION SHELLEXECUTE LIB "SHELL32.DLL" ALIAS

"SHELLEXECUTEA" (BYVAL HWND AS LONG, BYVAL LPOPERATION AS STRING,
BYVAL LPFILE AS STRING, BYVAL LPPARAMETERS AS STRING, BYVAL
LPDIRECTORY AS STRING, BYVAL NSHOWCMD AS LONG) AS LONG
PRIVATE SUB CMDOK_CLICK()
UNLOAD ME
END SUB

PRIVATE SUB FORM_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X AS

SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBRED
LABEL4.FONTUNDERLINE = FALSE
END SUB

PRIVATE SUB FRAME1_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X

AS SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBRED
LABEL4.FONTUNDERLINE = FALSE
END SUB

PRIVATE SUB LABEL1_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X

AS SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBRED
LABEL4.FONTUNDERLINE = FALSE
END SUB

PRIVATE SUB LABEL3_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X

AS SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBRED
LABEL4.FONTUNDERLINE = FALSE
END SUB

PRIVATE SUB LABEL4_CLICK()

SHELLEXECUTE ME.HWND, "OPEN", "HTTP://WWW.GOOGLE.COM", VBNULLSTRING,
"", 0
END SUB

ENROLL NO. 84 PREM CHAND MAURYA

PRIVATE SUB LABEL4_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X
AS SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBBLUE
LABEL4.FONTUNDERLINE = TRUE
END SUB

PRIVATE SUB LABEL5_MOUSEMOVE(BUTTON AS INTEGER, SHIFT AS INTEGER, X

AS SINGLE, Y AS SINGLE)
LABEL4.FORECOLOR = VBRED
LABEL4.FONTUNDERLINE = FALSE
END SUB

ENROLL NO. 85 PREM CHAND MAURYA

STAFF GRADE

'CODING FOR GENERAL

DIM DB AS CONNECTION
DIM RS AS RECORDSET
DIM CHK AS BOOLEAN, CNT AS INTEGER

PRIVATE SUB CMDADD_CLICK()

'CODING FOR ADD
IF CHK = FALSE THEN

TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT5.TEXT = ""

TEXT2.SETFOCUS

END IF
CHK = TRUE
END SUB

PRIVATE SUB CMDCLEAR_CLICK()

'CODING FOR CLEAR
TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT5.TEXT = ""
TEXT2.SETFOCUS

END SUB

PRIVATE SUB CMDDELETE_CLICK()

'CODING FOR DELETE
SET RS = NEW ADODB.RECORDSET
RS.OPEN " SELECT GRADE,DESCRIPTION,BASIC,DA FROM GRADE", DB,
ADOPENSTATIC, ADLOCKOPTIMISTIC
IF CNT >= 1 THEN

ENROLL NO. 86 PREM CHAND MAURYA

 RS.MOVE CNT
END IF
IF RS.RECORDCOUNT >= 1 THEN
RS.DELETE
CLR
ELSE
IF RS.RECORDCOUNT = 0 THEN
CLR
MSGBOX "NO MORE RECORDS TO DELETE"
ELSE
END IF
END IF
END SUB

PRIVATE SUB CMDEXIT_CLICK()

'CODING FOR EXIT
END
END SUB

PRIVATE SUB CMDFIRST_CLICK()

'CODING FOR MOVE FIRST
RS.MOVEFIRST
DISP
END SUB

PRIVATE SUB CMDLAST_CLICK()

'CODING FOR MOVE LAST
RS.MOVELAST
DISP
END SUB

PRIVATE SUB CMDNEXT_CLICK()

'CODING FOR MOVE NEXT
CNT = CNT + 1
'INCREASE THE RECORDS TO DELETION
ON ERROR RESUME NEXT

IF RS.EOF = TRUE THEN

ENROLL NO. 87 PREM CHAND MAURYA

MSGBOX "I AM IN LAST"
EXIT SUB
END IF
IF RS.RECORDCOUNT >= 1 THEN
RS.MOVENEXT
DISP
ELSE
MSGBOX "NO MORE RECORDS"
END IF

END SUB

PRIVATE SUB CMDPREVIOUS_CLICK()

'CODING FOR MOVE PREVIOUS
CNT = CNT - 1
'DECEASE THE RECORDS TO DELETION
ON ERROR RESUME NEXT

IF RS.BOF = TRUE THEN

EXIT SUB
ELSE
IF RS.RECORDCOUNT >= 1 THEN
RS.MOVEPREVIOUS
DISP
ELSE
MSGBOX "NO MORE RECORDS"
END IF
END IF

END SUB

PRIVATE SUB CMDUPDATE_CLICK()

'CODING FOR UPDATE
IF CHK = TRUE THEN
RS.ADDNEW

RS!GRADE = TEXT2.TEXT
RS!DESCRIPTION = TEXT3.TEXT

ENROLL NO. 88 PREM CHAND MAURYA

 RS!BASIC = TEXT4.TEXT
RS!DA = TEXT5.TEXT

RS.UPDATE

CHK = FALSE
END IF

END SUB

PRIVATE SUB FORM_LOAD()

'CODING FOR FORM LOAD
TEXT1.TEXT = STR(DATE) + " " + WEEKDAYNAME(WEEKDAY(DATE, VBSUNDAY))
SET DB = NEW ADODB.CONNECTION
SET RS = NEW ADODB.RECORDSET
DB.OPEN "PROVIDER=MSDASQL;DSN=S_A;
UID=SCHOOL_AUTOMATION;PWD=SRIGANPATI"
RS.OPEN "SELECT GRADE, DESCRIPTION, BASIC, DA FROM GRADE", DB,
ADOPENSTATIC, ADLOCKOPTIMISTIC
IF RS.RECORDCOUNT >= 1 THEN
DISP
END IF
END SUB
SUB DISP()
'CODING FOR DISP() FUNCTION
IF RS.RECORDCOUNT >= 1 THEN

TEXT2.TEXT = RS!GRADE
TEXT3.TEXT = RS!DESCRIPTION
TEXT4.TEXT = RS!BASIC
TEXT5.TEXT = RS!DA

ELSE
MSGBOX "NO RECORDS"
END IF
END SUB

SUB CLR()

ENROLL NO. 89 PREM CHAND MAURYA

'CODING FOR CLR() FUNCTION
TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT5.TEXT = ""
END SUB

ENROLL NO. 90 PREM CHAND MAURYA

STAFF SELCTION

'CODING FOR GENERAL

DIM DB AS CONNECTION
DIM RS AS RECORDSET
DIM CHK AS BOOLEAN, CNT AS INTEGER
PRIVATE SUB CMDADD_CLICK()
'CODING FOR ADD
DIM SCD AS LONG

IF RS.RECORDCOUNT >= 1 THEN

RS.MOVELAST
SCD = VAL(RS!STF_CD) + 1
COMBO1.TEXT = SCD
ELSE
COMBO1.TEXT = 1000
END IF
IF CHK = FALSE THEN

TEXT1.TEXT = ""
TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT6.TEXT = ""
TEXT10.TEXT = ""
TEXT9.TEXT = ""
TEXT7.TEXT = ""
TEXT8.TEXT = ""

TEXT1.SETFOCUS

END IF
CHK = TRUE
END SUB

PRIVATE SUB CMDCLEAR_CLICK()

'CODING FOR CLEAR

ENROLL NO. 91 PREM CHAND MAURYA

 COMBO1.TEXT = ""
TEXT1.TEXT = ""
TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT6.TEXT = ""
TEXT10.TEXT = ""
TEXT9.TEXT = ""
TEXT7.TEXT = ""
TEXT8.TEXT = ""

COMBO1.SETFOCUS

END SUB

PRIVATE SUB CMDDELETE_CLICK()

'CODING FOR DELETE
SET RS = NEW ADODB.RECORDSET
RS.OPEN " SELECT
STF_CD,STF_NM,F_NM,DESIGNATION,ACMIC_QUALIN,PROFNAL_QUALIN,GRADE,A
PPT_DT,ADR,TELEPHONE_NO FROM STAFF_DETAILS", DB, ADOPENSTATIC,
ADLOCKOPTIMISTIC
CNT = VAL(COMBO1.TEXT)
IF CNT >= 1 THEN
RS.MOVE CNT
RS.DELETE
EXIT SUB
END IF
IF RS.RECORDCOUNT >= 1 THEN
RS.DELETE
CLR
ELSE
IF RS.RECORDCOUNT = 0 THEN
CLR

ENROLL NO. 92 PREM CHAND MAURYA

MSGBOX "NO MORE RECORDS TO DELETE"
ELSE
END IF
END IF
END SUB

PRIVATE SUB CMDEXIT_CLICK()

'CODING FOR EXIT
END
END SUB

PRIVATE SUB CMDFIRST_CLICK()

'CODING FOR MOVE FIRST
RS.MOVEFIRST
DISP
END SUB

PRIVATE SUB CMDLAST_CLICK()

'CODING FOR MOVE LAST
RS.MOVELAST
DISP
END SUB

PRIVATE SUB CMDNEXT_CLICK()

'CODING FOR MOVE NEXT
CNT = CNT + 1
'INCREASE THE RECORDS TO DELETION
ON ERROR RESUME NEXT

IF RS.EOF = TRUE THEN

MSGBOX ">>>>>>>>IT IS THE LAST RECORD<<<<<<<<"
EXIT SUB
END IF
IF RS.RECORDCOUNT >= 1 THEN
RS.MOVENEXT
DISP
ELSE
MSGBOX "NO MORE RECORDS"

ENROLL NO. 93 PREM CHAND MAURYA

END IF
END SUB

PRIVATE SUB CMDPREVIOUS_CLICK()

'CODING FOR MOVE PREVIOUS
CNT = CNT - 1
'DECREASE THE RECORDS TO DELETION
ON ERROR RESUME NEXT

IF RS.BOF = TRUE THEN

MSGBOX ">>>>>>>>NO MORE RECORDS<<<<<<<<"
EXIT SUB
ELSE
IF RS.RECORDCOUNT >= 1 THEN
RS.MOVEPREVIOUS
DISP
ELSE
MSGBOX "NO MORE RECORDS"
END IF
END IF

END SUB

PRIVATE SUB CMDUPDATE_CLICK()

'CODING FOR UPDATE
IF CHK = TRUE THEN

RS.ADDNEW
RS!STF_CD = COMBO1.TEXT
RS!STF_NM = TEXT1.TEXT
RS!F_NM = TEXT2.TEXT
RS!DESIGNATION = TEXT3.TEXT
RS!ACMIC_QUALIN = TEXT4.TEXT
RS!PROFNAL_QUALIN = TEXT6.TEXT
RS!GRADE = TEXT10.TEXT
RS!APPT_DT = TEXT9.TEXT
RS!ADR = TEXT7.TEXT
RS!TELEPHONE_NO = TEXT8.TEXT

ENROLL NO. 94 PREM CHAND MAURYA

RS.UPDATE

CHK = FALSE
END IF
END SUB

PRIVATE SUB COMBO1_CLICK()

'CODING FOR COMBO1
DIM SCD AS LONG
SCD = VAL(COMBO1.TEXT)
RS.MOVEFIRST
DO WHILE RS.EOF <> TRUE
IF RS!STF_CD = SCD THEN
DISP
EXIT DO
END IF
RS.MOVENEXT
LOOP
END SUB

PRIVATE SUB FORM_LOAD()

'CODING FOR FORM LOAD
TEXT5.TEXT = STR(DATE) + " / " + WEEKDAYNAME(WEEKDAY(DATE, VBSUNDAY))
SET DB = NEW ADODB.CONNECTION
SET RS = NEW ADODB.RECORDSET
DB.OPEN "PROVIDER=MSDASQL;DSN=S_A;
UID=SCHOOL_AUTOMATION;PWD=SRIGANPATI"
RS.OPEN "SELECT
STF_CD,STF_NM,F_NM,DESIGNATION,ACMIC_QUALIN,PROFNAL_QUALIN,GRADE,A
PPT_DT,ADR,TELEPHONE_NO FROM STAFF_DETAILS", DB, ADOPENSTATIC,
ADLOCKOPTIMISTIC
DO WHILE RS.EOF <> TRUE

ENROLL NO. 95 PREM CHAND MAURYA

 COMBO1.ADDITEM RS!STF_CD
RS.MOVENEXT
LOOP
RS.MOVEFIRST

IF RS.RECORDCOUNT >= 1 THEN

DISP
END IF
END SUB
SUB DISP()
'CODING FOR DISP() FUNCTION
IF RS.RECORDCOUNT >= 1 THEN

COMBO1.TEXT = RS!STF_CD
TEXT1.TEXT = RS!STF_NM
TEXT2.TEXT = RS!F_NM
TEXT3.TEXT = RS!DESIGNATION
TEXT4.TEXT = RS!ACMIC_QUALIN
TEXT6.TEXT = RS!PROFNAL_QUALIN
TEXT10.TEXT = RS!GRADE
TEXT7.TEXT = RS!APPT_DT
TEXT8.TEXT = RS!ADR
TEXT9.TEXT = RS!TELEPHONE_NO

ELSE
MSGBOX "NO RECORDS"
END IF
END SUB
SUB CLR()
'CODING FOR CLR() FUNCTION
COMBO1.TEXT = ""
TEXT1.TEXT = ""
TEXT2.TEXT = ""
TEXT3.TEXT = ""
TEXT4.TEXT = ""
TEXT6.TEXT = ""
TEXT10.TEXT = ""

ENROLL NO. 96 PREM CHAND MAURYA

TEXT7.TEXT = ""
TEXT8.TEXT = ""
TEXT9.TEXT = ""

END SUB

ENROLL NO. 97 PREM CHAND MAURYA

Code Efficiency

The efficiency of source code is directly tied to the efficiency of algorithm defined.

However, the coding style can have an effect on execution speed and memory

requirements. The following set of guidelines is applied during coding:

1. Before coding all arithmetic and logical expressions are simplified.

2. Where ever possible we have carefully evaluate the nested loops so that

if statements or expressions can be moved outside.

3. We have not used the multi-dimensional arrays.

4. We have used the integer arithmetic and Boolean expression, wherever

required.

ENROLL NO. 98 PREM CHAND MAURYA

Optimization of Code

The basic design model uses the analysis model as the framework for

implementation. The analysis model captures the logical information about the

system, while the design model must add details to support efficient information

access. During design optimization we must:

1. Add redundant association to minimize access cost and maximize

convenience.

2. Rearrange the computation for greater efficiency.

3. Save derived attributes to avoid recompilation of complicated

expression.

4. During report generation we used an optimization technique of

rearranging execution order for greater efficiency.

5. Redundancy of data in the tables has been removed through

Normalization technique. All the tables are designed in normalized form.

6. Explicit & Implicit locks are used where needed.

ENROLL NO. 99 PREM CHAND MAURYA

Validation Checks

Any other cannot access the facility given to the management. Except the

management the other user can access only those facility, which are given to them.

These are all restricted by the password.

Validation checks for Manager. Before accessing the Internet manager ID and

password for the Manager is checked by the computer. If valid, allows the manager

to access the Internet otherwise display a message box.

ENROLL NO. 100 PREM CHAND MAURYA

Testing

The word “test” is derived from the Latin word “testum” meaning pottery vessel

used to measure and access weight. The testing of software is a means of

accessing or measuring the software to determine its quality. Testing is

important because it assesses if the system actually performs, and how well

it performs in its final environment against defined specifications or

requirements. Testing is done with one primary objective- to ensure the

quality of software before live operations. The main purpose of testing, from

the produce’s viewpoint, is to gain confidence. Testing should be in-depth

and not superficial. Testing involves operation of a system or application

under controlled conditions and evaluating the results. The controlled

conditions should include both normal and abnormal conditions. In the

development of automated system for Park Regency, Gorakhpur, we have

applied the following testing techniques and testing Strategies.

1. Testing Techniques

A) White - Box Testing

a. Guarantee that all independent paths within a module have been

exercised at least once.

b. Exercise all logical decisions on their true and false sides.

c. Execute all loops at their boundaries and within their operational

bounds.

d. Exercise internal data structures to ensure their validity.

ENROLL NO. 101 PREM CHAND MAURYA

 B) Black - Box Testing

a. Interface Errors

b. Errors in Data Structures or external database access.

c. Performance

d. Initialization Errors

2. Testing Strategies

A) Unit Testing

Unit Testing, also called module or component testing is testing individual

software units independently of the other units in the same system. The

programmer does this testing. Unit testing is recognized as one of the most

efficient ways to reduce the density and proliferation of errors in a software

application. Unit testing has been done for each screen of the system. We

have followed the following procedure to perform unit testing:

a. Identified the scenarios for each action in all the screens.

b. Tested main method in each screen to invoke that screen.

c. Tested the output for all the possible combination of input values and

user actions.

d. Examine the result of each user action.

ENROLL NO. 102 PREM CHAND MAURYA

 B) Integration Testing

Integration testing is done when unit testing has already been done for each

separate module and all modules have been integrated. This is an integrated

form of testing which focuses on functionality and interfaces between units

and modules. Integration testing was done for the system when different

modules were connected together. Integration testing was performed to

ensure the achievement of functionality as desired by the automated system

of Park Regency when brought together.

C) Verification And Validation Criteria

Some of the important verification and validation criteria as applied to the

automated system are:

ENROLL NO. 103 PREM CHAND MAURYA

Implementation

Implementation is a phase where a number of activities that have been going on

parallel so far have to culminate. To ensure that all these activities indeed converge

at the right time and at the right place without any delays on account of unforeseen

problems, to get the software to be used as it should, is what managing the

implementation phase is all about. Typically the steps involved are:

1. Installation Plan: Much before the software could be actually ready, a detailed

plan has to be prepared in terms of hardware, procurement and installation.

What machines are to be installed at which location and at what point in time,

provision of the necessary infrastructure for installation of the same, site

preparation, arranging any machine specific or commodity software specific

Hotel for different categories of users etc. are details which would need to be

worked out. Likewise a plan has got to be made for installation of the software

to be implemented. Details of which modules are to be enabled/disabled in each

location have to be worked out. Therefore a comprehensive installation plan

needs to be in place, which gives location wise installation details as relevant to

different user groups.

So, for Park Regency, Gorakhpur an implementation plan was prepared at that

right time. Here we will need to install packages at two different machines [may

be Server and clients]. These two workstations are: one for the manager and

second for the nodes located at different places. All these workstations need to

be connected to one server placed with the manager and which contains the

database.

ENROLL NO. 104 PREM CHAND MAURYA

2. Data Preparation And Conversion: Assuming that the system is expected to go

live from a particular date, all backlog of data has to be transcribed to fit into the

new formats and coding schemes, and rigorously errors are checked to ensure

no loss of information.

For Park Regency all the existing data was fed into the system, as the details of

the member is to be maintained old records also apart from the fresh data.

3. Conversion Testing: Where data is converted from existing files or databases,

rigorous conversion testing needs to be done to ensure proper conversion. The

following steps testing were performed as a part of conversion for Park

Regency.

4. Tallying of input and output records.

5. Extraction of sample records from both the old and new set of records. These

are then directly compared with each other.

6. Check value ranges of fields within each record.

7. Check whether the required relationships between records are maintained.

8. User Hotel: The successful implementation of any software is dependent in

good measure on the quality of Hotel imparted. Different user groups need to be

identified. A Hotel need analysis has to be done for each of these groups to find

out what kind of Hotel is required for each. Getting trained on aspects that are

not relevant may sometimes tend to confuse the users.

ENROLL NO. 105 PREM CHAND MAURYA

 For Park Regency, Gorakhpur we need to create two groups i.e. manager,

General users. All two groups need to be trained so that for them the concerned

software has the maximum appeal of user-friendliness in it and they free to work

with it. This is to ensure that they are not hesitated to use the system.

ENROLL NO. 106 PREM CHAND MAURYA

Evaluation

Evaluation is one of the key aspects of the action inquiry approach, being used to inform

further action at each stage of the cycle. The effectiveness of the project will be determined

using the following methods at appropriate stages during the project.

 To evaluate whether the management is satisfied with the software provided to them or

not, take the comment from every member of the management either on the paper or

on the feelings.

 The above method is applied for manager, User and members also.

 To evaluate the usefulness of the process, management will keep a journal, which

records their actions and reflections on that action. Analysis of journals will indicate the

effectiveness of the process.

 Te manager will actually evaluate the system because the software is developed by

keeping in mind the need of the manager now the manager does not have to go to

each node for details.

Summative evaluation of the project will involve interviews with almost all the members

and manager.

ENROLL NO. 107 PREM CHAND MAURYA

Maintenance

A system should be created whose design is comprehensive and farsighted enough to

serve current and projected user needs for several years to come. The better the

system design, the easier it will be to maintain and the maintenance cost will be

low. It is important to detect software design errors early on, as it is less costly than

if errors remain unnoticed until maintenance is necessary. Maintenance is

performed most often to improve the existing software rather than to respond to a

crisis or system failure. Maintenance is also done to update software in response to

the change made in the organization. This work is not as substantial as enhancing

the software, but it must be done. With respect to the maintenance of the

automated system for Park Regency, Gorakhpur. all these points have been taken

into consideration. For example, firstly it has been taken into consideration that:

1) If the Management of the company decided to Launch another scheme in the

near future than the management can do it easily.

2) If the management wants to increase the charges or service duration..

Apart from the above points the system has been developed in such a way that in future if

any changes need to be incorporated, they can be done with minimum effort and

expenditure.

ENROLL NO. 108 PREM CHAND MAURYA

Security Measures Taken

Security and controls are required not only for preventing inadvertent mistakes

made by users, but also to prevent misuse of the system and ensure data integrity.

In an automated system of Hotel Manager the following security measures have

been considered:

1. Access Control

Access Control can be defined as control established to ensure that only people

with the proper authority have access to the data. Different types of access

control, which are used in this software are as follows:

A) Transaction Access

All users of a system need not have access to all transactions in a system.

Users must have access only to transactions, which are required by them

for their day-to-day operations. A Manager in a Hotel needs to submit his

daily report only. Thus he should not have access to the Hotel records.

B) Data Access

Apart from having access to transactions, which are required for daily

operations, users must only be allowed to see specific instances of

transactions. In some applications it may be required that users must only

see data relating to their needs. Thus the head of the department will have

access to the department query transaction, but the user will not be shown

ENROLL NO. 109 PREM CHAND MAURYA

 all data, the user will be shown data belonging’s to the user’s department

only.

In Park Regency, Gorakhpur, a user cannot see the details of the details

entered.

C) Physical Access

The best form of access control is the physical access control. Only

authorized personal should be allowed to do specific tasks like booting of

the machine, mounting disks, distributing reports etc.

In this software the database is centralized means all the data is stored at

one place called as server where as number of clients are attached to it.

Without the server nothing can be done. So, for starting server an

authorized person should be there.

2. Validations

Validations of data entered on various input screens are not a security for the

system but a control to ensure that clean data goes into the system. If data is

not validated on input, you will end up with a lot of inconsistent data.

In computer parlance, this is referred to as ‘Garbage In, Garbage Out’. If proper

validation is not done, user tends to lose confidence in the system and it

eventually boils down to a new project of clearing up the data. Typical

validations done on input screen are as follows:

 Length of data.

ENROLL NO. 110 PREM CHAND MAURYA

  Type of data (numeric, integers, alphabetic, alphanumeric)

 Validation against masters

 Discreet values

 Cross validation of data across various fields

3. Data Integrity

We can have the best of validations in a system but invalid data can always get

into the system due to some recent changes done on the software, which was

not tested comprehensively, or due to corruption. Whatever the cause, it is a

very good control practice to periodically check the integrity of the data o the

system. Data Integrity could be verified by a number of techniques. Some of the

used techniques are listed below :

 Tallying number of records across various tables in the database.

 Tallying critical fields across tables in the database.

Whatever be the technique, periodic validation of data will give us early warning

signals in case something is wrong with database.

ENROLL NO. 111 PREM CHAND MAURYA

Cost Estimation Of The Project

The cost of the project can be calculated by Constructive Cost Model (COCOMO). Barry

Bohem introduced COCOMO Model. Boehm’s hierarchy of models takes the following

form:

Model1 : Basic COCOMO is a static single-valued model that computes software

development effort (and cost) as a function of program size expressed in

estimated lines of code.

Model2 : Intermediate COCOMO computes software development effort as a function

of program size and a set of “cost drivers” that include subjective

assessments of product, hardware, personnel and project attributes.

Model3 : Advanced COCOMO incorporates all characteristics of the intermediate versions

with the assessment of the cost driver’s impact on each step (analysis,

design, etc.) of the software engineering process.

So, for the development of the automated system for On-Line complaint monitoring system,

I will use the Basic COCOMO Model.

COCOMO may be applied to three rooms of software projects as given:

1. Organic Mode: Relatively small, simple software projects in which small teams with

good application experience work to a set of less than rigid requirements.

2. Semi-detached Mode: An intermediate (in size & complexity) software project in which

teams with mix experience levels must meet a rigid and less than rigid requirements.

ENROLL NO. 112 PREM CHAND MAURYA

3. Embedded Mode: a software project that must be developed within a set of tight

hardware, software and operational constraints.

The basic COCOMO equations take the form:

E=Ab*(KLOC) Bb

D=Cb* E Db

Where E is the effort applied in person-months, D is the development time in chronological

months (elapsed time), and KLOC is the estimated number of delivered lines of code for

the project (expressed in thousands). The coefficients Ab and Cb and the exponents Bb

and Db are given the table :

Table: Basic COCOMO Model

Software Project Ab Bb Cb Db
Organic 2.4 1.05 2.5 0.38
Semi-Detached 3.0 1.12 2.5 0.35

Embedded 3.6 1.20 2.5 0.32

Now, for the automated system for On-Line Complaint Monitoring System on applying

Basic COCOMO model, we get…

LOC = 1141

KLOC = 1.141

E = Ab*(KLOC) Bb

Therefore, E = 2.4 * (1.141)1.05

ENROLL NO. 113 PREM CHAND MAURYA

 = 2.76 efforts applied per person month

D = Cb* E Db

Therefore, D = 2.5 * 2.760.38

= 3.7 months.

ENROLL NO. 114 PREM CHAND MAURYA

Pert Chart

PERT Chart is a scheduling technique that also shows graphically which tasks must be

completed before others are begun. PERT controls time and costs during the project and

also facilitates finding the right balance between completing a project on time and

completing it with in the budget. PERT recognizes that projects are complex, that some

tasks must be completed before others can start, and that the appropriate way to manage

a project is to define and control each task.

Designing

3.

18 24

Requirement Integration
Gathering Analysis Coding Testing Implementation

12 24 12 7
1. 2. 4. 6. 7.

12 12
7

5. 8.

Unit Testing Review

60
9. 10.

Documentation Finish

ENROLL NO. 115 PREM CHAND MAURYA

 Gantt chart provides a graphical illustration of a schedule that helps to plan, coordinate,

PREM CHAND MAURYA

Work Tasks 21 26 01 08 1 22 26 05 07 14 18 0 06 12 24
Feb April
5 March 1
May
Start
Requirement
Gathering
Analysis
Design
Coding

116
Unit Testing
and track specific tasks in a project.

Integration
Testing
Implementati
on
Review
Gantt Chart

ENROLL NO.
Documentati
on
Finish
Future Scope Of The Project

END USER SUPPORT: The proposed system is developed with roles like oracle

and Visual Basic it means that if proposed Hotel increases his users it just

has to add more machines and can install client software to new machines

to provide Enquiry on one machine, Registration on other, Charges

collection on other and so on...

SECURITY: Data is secure. Only the administrators can do backup and restoring

of data type of job by giving login name and password. To operate the

program also administrator has to enter password.

LARGE DATABASE SUPPORT: using oracle as DBMS means large number of

records can be managed without facing any problem.

UNLIMITED USERS: The proposed system provides with unlimited number of

users. Besides being highly quantities the project presents a unique

combination of mathematical tools.

ENROLL NO. 117 PREM CHAND MAURYA

Bibliography

The Bibliography contains references to all the documents that were used to

develop the software.

1. Software Engineering ‘A practitioner’s approach’ – Roger S. Pressman,

(McGrawHill International Edition).

2. Visual Basic 6.0 Super Bible – David Jung, Pierre Boutquin, John D. Conley,

Loren Eidahl, Lowell Mauer, Jack Purdum.

3. The Visual Basic 6.0 Database – How To Buy Eric Winemiller, Jason Roff, Bill

Meyman, Ryan Groom.

The Complete Reference Visual Basic 6.0 By Noel Jerke.

4. Oracle8 ‘TheCompleteReference’–Loney Koch(Tata McGraw Hill).

5. Commercial Application Development Using Oracle Developer 2000 By Ivan

Bayross.

6. Database System Concepts – Abraham Silberschatz, Henry F. Korth, S.

7. Study material by IGNOU.

ENROLL NO. 118 PREM CHAND MAURYA

Glossary

Analysis: Analysis means breaking a problem into successively manageable

parts for individual study.

Automated Systems: These are nothing but man-made systems that interact

with or are controlled by one or more computers.

Central Functions: Central Functions are the main work of the system. They

transform the major inputs into the major outputs.

Cohesion: Strength within a modules; degree of relationship between elements

within a module.

Constant Data: This implies to data that are same for every entry.

Coupling: It is the strength of relation between modules. It is a measure of the

strength of interconnection between one module and another. The degree

of dependence of one module on another, specifically, a measure of the

chance that a defect in one module will appear as a defect in the other, or

the chance that a change to one module will necessitate a change to the

other.

Context Diagram: This will be the most general diagram, really a bird’s eye view

of data movement in the system.

ENROLL NO. 119 PREM CHAND MAURYA

Control: In a system, the element or component that governs the pattern of

activities of the system.

Conversion: Conversion is the task of translating the user’s current files, forms

and databases to the format required by the new system.

Database: A store of integrated data capable of being directly addressed for

multiple uses; it is organized so that various files can be accessed through

a single reference based on the relationship among records in a file rather

than the physical location.

Database management system (DBMS): The software that determines how

data must be structured to produce the user’s view; manages, stores, and

retrieves data and enforces procedures.

Data Coupling: A form of coupling in which one module communicates

information to another in the form of elementary parameters.

Data Flow Diagram: Graphic representation of data movement, process, and

files (data stores) used in support of an information system.

Data Integrity: The extent to which the data used for processing is reliable,

accurate, and free from error.

ENROLL NO. 120 PREM CHAND MAURYA

Data Stores: Data stores could be thought of as the ‘memory’ of the system. In a

data flow diagram, a storage area for collecting data input during

processing; the symbol is an open rectangle.

Data structure: A logically related set of data that can be decomposed into lower

level data elements; a group of data elements handled as a unit.

Design: The (iterative) process of taking a logical model of a system, together

with a strongly stated set of objectives for that system, and producing the

specification of a physical system that will meet those objectives.

Database Design: It involves designing the conceptual model of the database.

Documentation: A means of communication; a written record of a phase of a

specific project; it establishes design and performance criteria for phases

of the project.

End-users: End-user is widely used by system analysts to refer to people who

are not professional information system specialists but who use computers

to perform their jobs.

External Entity: They are organizations, other information systems,

departments, or people, which represent a source or destination of

transaction or data.

ENROLL NO. 121 PREM CHAND MAURYA

Feasibility Study: An important outcome of the preliminary investigation is the

determination that the system requested is feasible, which is done through

feasibility study.

Chargesdback: The part of a closed-loop system that automatically brings back

information about the condition being controlled.

Field: A specified area of a record used for a particular category of data.

File: Collection of related records organized for a particular purpose.

Flexibility: A measure of the degree to which a system, as is, can be used in a

variety of ways.

Gantt Chart: A static system model used for scheduling; portrays output

performance against time.

Implementation: In system development-a phase that focuses on user Hotel,

site preparation and file conversion for installing a candidate system.

Information: A meaningful set of data that tells something about the data

relationships.

Initial Investigation: An exploratory activity that determines whether a user

request is valid and feasible before a standard of action is recommended.

Maintenance: Restoring something to its original condition.

ENROLL NO. 122 PREM CHAND MAURYA

Manuals: A form of documentation to guide employees in doing their tasks.

Model: A logical or mathematical representation of a system that encompasses

features of interest to the user.

Module: A module is defined as a set of instructions, which can be invoked by

name. It is a group of instructions, i.e., a paragraph, block, subprogram,

subroutine or the like.

On-Line system: A system that accepts input directly from the area where it is

created and in which the output or results of computation are returned

directly to where they are required.

Output: Data that have been processed; the end result (product) of the system

under study.

Overhead: Allocated costs that includes maintenance expense, heat, light and

power; costs that are neither direct nor indirect; costs that are tagged to

the general administration of the business.

Parallel run: Putting the new system into operation in conjunction with the

continued operation of the old system.

Parameter: A variable that is given a constant value for a specific purpose or

process.

ENROLL NO. 123 PREM CHAND MAURYA

Partitioning: Dividing a problem into smaller, separate elements for easier

understanding or solution.

Password: Identity authenticator; a key that allows access to a program, system,

or procedure.

Physical Design: A design that produces the working system by defining design

specifications that tell programmers exactly what the candidate system

must do.

Planning: Studying a project standard of action and determining what is to done

to meet stated goals.

Process: Process that transforms input into useful output; in data flow diagram –

indicated by a bubble or a circle.

Project Evaluation and Review Technique (PERT): A flow system model used

to manipulate various values as a basis for determining the critical path, to

interpret these relationships and to relate them back to the real world as a

control technique.

Reliability: Dependability or level of confidence; in systems work-the need to

gather dependable information for use in making decisions about the

system being studied.

ENROLL NO. 124 PREM CHAND MAURYA

Security: The protection of data or hardware against accidental or intentional

damage from a defined threat.

System Analysis: It is the process of totally understanding the current system by

gathering and interpreting the facts, diagnosing problems and using the

facts to improve the current system.

System Design: Detailed concentration on the technical and other specifications

that will make the new system.

Unit testing: This involves the test carried out on modules/ programs, which

make up a system.

Validation: Checking the quality of software in both simulated and live

environment.

ENROLL NO. 125 PREM CHAND MAURYA