Bank Management System Vijay.docx

  • Uploaded by: SatendraSingh
  • 0
  • 0
  • November 2019
  • PDF

This document was uploaded by user and they confirmed that they have the permission to share it. If you are author or own the copyright of this book, please report to us by using this DMCA report form. Report DMCA


Overview

Download & View Bank Management System Vijay.docx as PDF for free.

More details

  • Words: 8,444
  • Pages: 67
Chapter 1 Introduction Introduction:In day-to- day work process of an organization, there are lots of things happening, which need to be keep tracked. For our ease in future, we do too. Of course there is lots of way to perform this task. We can either maintain these records manually or by using computerized system. In current scenario, where we always thing to increase productivity utilizing our working hours more and more, it’s always recommended to go for such automated system, which provide me maximum facility to do the same in a less time and minimum manpower. So I think and design a commercial project for Bank Management System. A computer based management system is designed to handle all the primary information required to calculate monthly statements of customer account which include monthly statement of any month. Separate database is maintained to handle all the details required for the correct statement calculation and generation.

1.1 About project:The “Banking System “keeps the day by day tally record as a complete banking. It can keep the information of Account type, account opening form, Deposit, withdrawal, and Searching the transaction, Transaction report, Individual account opening form, Group Account. The exciting part of this project is; it displays Transaction reports, Statistical Summary of Account type and Interest Information. Bank management system project in visual basic is to facilitate the bank employees as well as providing facilities to the customer in this application we have implemented Withdrawal, deposit fired deposit, lone, customer information, account information, Employee information reports account enquiry etc. This project intends to introduce more user friendliness in the various activities such as record updating, maintenance, and searching. The searching of record has been made quite simple as 1

all the details of the customer can be obtained by simply keying in the identification or account number of that customer. Similarly, record maintenance and updation can also be accomplished by using the account number with all the details being automatically generated. These details are also being promptly automatically updated in the master file thus keeping the record absolutely up-to-date. For processing the data we have chosen Access as back end and Visual Basic as front end, which can manage database for a very large class of the possible application. This project is client-server based application system, to computerize at bank work. The modules involved currently in this system are: Open Account, Close or Edit Account, Monthly statement, Bank summary

1.2 Purpose of the Project:The project that we have undertaken aims to develop a banking system that is clean, userfriendly and multi-functional. Development of this application includes a number of fields such that user feels comfortable and the system appears as dynamic to him. The project “Banking System” includes the following functionalities:  Transactions can be done with minimum user events.  All transactional details and accounts are stored in files on stable storage.  Customers can view their own account details and can use them as necessary  Customer can inquire an account and can inquire about interest  All customer’s data are stored in files on a stable storage  Account holders have to pass through a login system to enter their accounts  This system possess password-protected administrative access; thus preventing the whole management system from unauthorized access  To provide flexibility for secure and save transaction.  For better performance. 2

 Reducing man power.  For doing work more accurately.  Faster performance.

1.3 Proposed System:The application will be extremely beneficial for the Customers intending to use and operate their bank account and will get various benefits in the field of management of accounts on a clean and user-friendly platform. “Bank Account System”, is a simple application, which is especially generated and designed for the bank in order to enter the applicant information about his or her bank account and can perform other function like currency change. It is user name and ID protected as well. Following are the major objectives behind the new proposed system:  It creates a user friendly environment, where a normal user can access through all the benefits of the system.  It provides security from unauthorized access, only admin or authorized users are access granted to the system.  It increases efficiency and saves the time.  No any danger and obstacles from external entities.  Easy access of saved data inside the system.  Complex Banking operations and Transaction operations are efficiently handled by the application  It is cost effective  It has ease of use along with complete reference  It is highly secured and less time consuming; hence time wastage can be avoided  Up to date records of the customers are maintained by the authority.

3

1.4 Why Need of Computerization;The Main goal this project to make Documentation More Basilar Task for the Administrator without Any Gigantic Error. The Next Factors For Which This Project Comes Into Existence Is Retrieving Data (As Well As Old Data). Last Factor but Not the Last One Called Time Factor It Saves Precious Time Which Consumes In Documentation Problems with conventional system:1. Lack of immediate retrievals: -The information is very difficult to find particular information 2. Lack of immediate information storage: - The information generated by various transactions takes time and efforts to be stored at right place. 3. Lack of prompt updating: - Various changes to information like details or immunization details of difficult to make as paper work. 4. Error prone manual calculation: - Manual calculations are error take a lot of time this may result in incorrect information. 5. Preparation of accurate and prompt reports: - This becomes a difficult task as information is difficult to collect from various registers.

1.5 Advantage of Computerization:Having a computer at hand a provides vast range of advantage to our day life. Some of them are: Speed – data entry onto the computer with its formatted screens and built-in databases of customers and supplier details and stock records can be carried out far more quickly than any manual processing.  Automatic document production – fast and accurate invoices, credit notes, purchase orders, printing statements and payroll documents are all done automatically. 4

 Accuracy – there is less room for errors as only one entry is needed for each transaction rather than two (or three) for a manual system.  Up-to-date information – the income records are automatically updated and so will always be up-to-date.  Availability of information – the data is instantly available and can be made available to different users in different locations at the same time.  Management information – reports can be produced which will help management monitor and control, for example the aged debtors analysis will show which customer  Legibility – the onscreen and printed data should always be legible and so will avoid errors caused by poor figures.  Efficiency – better use is made of resources and time; cash flow should improve through better debt collection and inventory control.  Staff motivation – the system will require staff to be trained to use new skills, which can make them feel more motivated  Cost savings – computerized programs reduce staff time doing

and reduce audit

expenses as records are neat, up-to-date and accurate.  The ability to deal in multiple currencies easily – many computerized accounting packages now allow an income to trade in multiple currencies with ease.

5

Chapter-2 Objective and Scope of the project 2.1 OBJECTIVE:The BANK has been working for Accounts information, Withdrawal, Deposit amount. In this Software you can keep record for daily Banking transactions. THE OBJECTIVE is to prepare a software or application, which could maintain data & provide a user friendly interface for retrieving customer related details just in few seconds, with 100% accuracy. Software is completely computerized, so it is not time consuming process. No paper work required & can be implemented further. The application should also facilitate the addition of new Customer A/c, deletion of A/c & Modification of existing customer A/C. Any account can be opened with Zero(0) balance also. We are mainly concerned with developing a banking system where a Customer can submit his/her deposit amount to bank if he/she has an account or can create a new account in this bank. Customer can also view the status and change currency of his/her bank account, can view account balance. One can easily maintain the above things if he/she has an account by login through his unique account number.

2.2 SCOPE:In the existing system the transactions are done only manually but in proposed system we have to computerize all the banking transaction using the software Banking System. This module is the main module which performs all the main operations in the system. The major operations in the system are:  Account Opening Form  Deposit  Withdrawal  Account type  Searching Transaction  Transaction report 6

Chapter-3 Project Overview Overview:This system will be used for making quotations of requested amount for the user. The billing system will use current system date and time. However its user can manually set the date and time of purchase and can make changes in the amount which will be special feature available in the control panel of this system. Under generating bill section, its user have to make entry in the field of particular model and its serial number after which it will display the brand name of the products, its cost price and service tax. Then after total amount will be generated for total number of products along with the address details of the seller. This system will also include the name, address and mobile number of the customer. Each bill will have a unique number generated by the system automatically. As this system will also help the vendor to keep track of number of products available, time of purchase. If any products whose total number will be less than 2 will comes under the blue zone indicating it’s time to purchase that product. It will also display other details such as last time when it is purchased, at what price it was purchased, from where it is purchased, total number of products which was purchased last time. Administrator can also make changes in the billing process, such as increase or decrease in service tax value, discount to be given to the customer on particular product. Making changes in billing process as per user requirement or for other business rules.

7

3.1 SDLC Model:-

System development life cycle model is produce height quality s/w loose cost and in reusable time it is essences to perform s/w development in a phase this phase development s/w is reefer to a System development life cycle model .into top to bottom approach. Provides the step by step development

Investigation

6 phases to develop s/w

Analysis

Step by step Process to development

Designing Coding

Testing

Maintenance

System development life cycle model

3.2 Feasibility Study: Depending on the results of the initial investigation the survey is now expanded to a more detailed feasibility study. “FEASIBILITY STUDY” is a test of system proposal according to its workability, impact of the organization, ability to meet needs and effective use of the resources. It focuses on these major questions: 1. What are the user’s demonstrable needs and how does a candidate system meet them? 8

2. What resources are available for given candidate system? 3. What are the likely impacts of the candidate system on the organization? 4. Whether it is worth to solve the problem? During feasibility analysis for this project, following primary areas of interest are to be considered. Investigation and generating ideas about a new system does this.

3.2.1 Technically:A study of resource availability that may affect the ability to achieve an acceptable system. This evaluation determines whether the technology needed for the proposed system is available or not. • Can the work for the project be done with current equipment existing software technology & available personal? • Can the system be upgraded if developed? • If new technology is needed then what can be developed? This is concerned with specifying equipment and software that will successfully satisfy the user requirement. The technical needs of the system may include:

Front-end and back-end selection An important issue for the development of a project is the selection of suitable front-end and back-end. When we decided to develop the project we went through an extensive study to determine the most suitable platform that suits the needs of the organization as well as helps in development of the project. The aspects of our study included the following factors. Front-end selection: 9

1. It must have a graphical user interface that assists employees that are not from IT background. 2. Scalability and extensibility. 3. Flexibility. 4. Robustness. 5. According to the organization requirement and the culture. 6. Must provide excellent reporting features with good printing support. 7. Platform independent. 8. Easy to debug and maintain. 9. Event driven programming facility. 10. Front end must support some popular back end like Ms Access. According to the above stated features we selected VB6.0 as the front-end for developing our project. Back-end Selection:1. Multiple user support. 2. Efficient data handling. 3. Provide inherent features for security. 4. Efficient data retrieval and maintenance. 5. Stored procedures. 6. Popularity. 7. Operating System compatible. 8. Easy to install. 9. Various drivers must be available. 10. Easy to implant with the Front-end. According to above stated features we selected Ms-Access as the backend. The technical feasibility is frequently the most difficult area encountered at this stage. It is essential that the process of analysis and definition be conducted in parallel with an assessment to technical feasibility. It centers on the existing computer system (hardware, software etc.) and to what extent it can support the proposed system.

10

3.2.2 Economically:Economic justification is generally the “Bottom Line” consideration for most systems. Economic justification includes a broad range of concerns that includes cost benefit analysis. In this we weight the cost and the benefits associated with the candidate system and if it suits the basic purpose of the organization i.e. profit making, the project is making to the analysis and design phase. The financial and the economic questions during the preliminary investigation are verified to estimate the following: • The cost to conduct a full system investigation. • The cost of hardware and software for the class of application being considered. • The benefits in the form of reduced cost. • The proposed system will give the minute information, as a result the performance is improved which in turn may be expected to provide increased profits. • This feasibility checks whether the system can be developed with the available funds.

3.2.3 Operational:It is mainly related to human organizations and political aspects. The points to be considered are: • What changes will be brought with the system? • What organization structures are disturbed? • What new skills will be required? Do the existing staff members have these skills? If not, can they be trained in due course of time?

11

The system is operationally feasible as it very easy for the End users to operate it. It only needs basic information about Windows platform.

3.3 Project Scheduling;Time evaluation is the most important consideration in the development of project. The time schedule required for the developed of this project is very important since more development time effect machine time, cost and cause delay in the development of other systems. A reliable self supporting program can be developed in the considerable amount of time.

Time

TASKS

MONTH 1

TASK A

MONTH 2

MONTH 3

MONTH 4

PLANIG

TASK B

ANALYSIS

TASK C

DESIGIN

TIME Gantt chart TASK D

3.4 User characteristic:-

CODING

Every user should be:TASK E

TESTING

i. Comfortable of working with computer. ii. He must have knowledge in field. TASK F iii.

MAINTENANA. He must also have basic knowledge of English too.

12

Chapter-4 System Requirement Analysis and Specification 4.1 SRS:Identifying needs is the first step while designing a system and implementation. This is the way to handle user needs; it must be an outgoing process to know requirements of customer during whole system development life cycle. During this phase the main things to be considered are got by placing meetings and questionnaires with customer. Requirements found during all the stages proposed system development are  How the present system work.  Time take to operate the system.  List of contents associated with the system.  Error/failure rate to be acceptable.  Risk factors involved.  Proprietary aspects, liability risks, potential infringement, and political issues to consider.  Human-machine and machine-machine communication.  Interfacing with external environment

4.1.1 Terms used in project:This project will be a desktop application to be developed in VB 6.0 having Ms Access as backend. • Database Design (Ms Access) • Form Design (VB 6.0) • Coding (VB 6.0) • Testing (VB 6.0) • Reporting Tool (Data Report) 13

4.1.2 System hardware requirements:Processor

: Pentium II, Pentium III, Pentium IV or higher Intel dual core 2.5 GB Hz

RAM

: 64 Mb or Higher, 512 MB

HDD

: 40 GB

Monitor

: Colors Monitor, VGA/XGA

Mouse

: Optical mouse

Printer

: hp LaserJet

4.1.3 Software requirements:Operating System

: Win-98, Win-XP, Linux or any other higher version

Front end

: Visual Basic 6.0

Back end

: Ms Access

4.2 Analysis:SDLC Stages we discussed about Project Planning and Feasibility Study moved on to System Analysis and Requirements which lead to Systems Design. Systems Design will naturally lead to another stage where it becomes closer to the actual deployment of the planned software. Since the design is already there, developers have an idea on how the software actually looks like. All they need is to put them all together to realize the intended software. Analysis can be defined as breaking up of any whole so as to find out their nature, function etc. It defines design as to make preliminary sketches of; to sketch a pattern or outline for plan. To plan

14

and carry out especially by artistic arrangement or in a skillful wall. System analysis and design can be characterized as a set of techniques and processes, a community of interests, a culture and an intellectual orientation. The various tasks in the system analysis include the following. 

Understanding application.



Planning.



Scheduling.



Developing candidate solution.



Performing trade studies.



Performing cost benefit analysis.



Recommending alternative solutions.



Supervising, installing and maintaining the system.

This system manages to the analysis of the report creation and develops manual entry of the student attendance. First design the students entry form, staff allocation and time table allocation forms. This project will helps the attendance system for the department calculate percentage and reports for eligibility criteria of examination .The application attendance entry system will provide flexible report for all students.

15

Chapter-5 System Design 5.1 Flow chart:Main module:Bank Management System

Login module Statement Account open

Summery

Module

Module

Module Edit Or close

Transaction module

Module

i. Login Module: - Login module consists of three forms. Frm-splash: - frmsplash is responsible to load the project for use. Frm-login: - Frmlogin is responsible for accepting the login name and password from the user. This security the system from unauthorized access. A user has change the password has three times only. If or she inter wrong password thrice, then it will automatically exit.

FrmMain: - frmmain is the main form of the whole project. Through which we can access form of project this is a sdi form include other form in these main form like open Account form, Close and edit Account form, transaction form summery form statement form.

16

Login Module

Frmsphlas

FrmMain Frmlogin

Transaction flow chart:-

17

5.2 Data flow diagram:A Date Flow Diagram (DFD) is a diagrammatic representation of the information (data) flow within a system. The data flow diagram is a way of expressing system requirements in a graphical form. This led to the modular design. A DFD is also known as bubble sort has the purpose of clarifying system requirements and identifying system requirements and identifying major transformations that will become program in system design.

New customer

Fills enquiry Form

Enquiry New Account

Request for

Control

New Account

Management

Provide Account Type Send New Account Request.

Provide Account Number / Cheque Number

Account

Proces s Account Details

18

LEVEL 0 DFD

USER / ADMINISTRATOR

Grant access Request for a/c details Queries Request for member details

Reports BANKING

Request for access

PROJECT

Grant Access

USER / ADMINISTRATOR

ADMINISTRATOR

19

LEVEL 1 DFD OF ADMIN MODULE

BANK DATABASE

ADMINISTRATOR

Request a/c no & password

VERIFY A/c NUMBER & PASSWORD

If Yes

ACCEPT CREATE NEW ACCOUNT

CHOICE

EDIT AN ACCOUNT

VIEW TRANASACTION

DEPOSIT/ WITHDRAW

20

CHECK BALANCE

LEVEL 1 DFD OF USER MODULE

BANK DATABASE

Request a/c no & password

USER

VERIFY A/c NUMBER & PASSWORD

If Yes

ACCEPT CHOICE

EDIT AN ACCOUNT

VIEW A/C DETAILS VIEW TRANASACTION

21

CHECK BALANCE

LEVEL 2 DFD OF CREATE A NEW ACCOUNT

ESC ACCEPT CHOICE

ADMINISTRATOR

NEW ACCOUNT QUIT

ACCEPT DETIALS

BANK DATABASE

22

NEW ACCOUNT CREATED

LEVEL 2 DFD FOR EDIT AN ACCOUNT

ESC ACCEPT CHOICE

ADMINISTRATOR/ USER

MODIFY

DELETE

A/C

A/C

MODIFY RECORD

DELETE RECORD

Store the details

BANK DATABASE

23

QUIT

LEVEL2 DFD FOR WITHDRAW OR DEPOSIT AMOUNT

ADMINISTRATOR

ACCEPT CHOICE

ENTER A/C NO & AMOUNT BANK DATABASE

CHECK VALID

DEPOSIT/ WITHDRAW

Balance amount

BANK DATABASE

24

SHOW BALANCE AMOUNT

LEVEL2 DFD FOR CHECKING BALANCE

ADMINISTRATOR/

ENTER A/C NO.

USER BANK DATABASE

CHECK VALID

Returns balance

SHOW BALANCE AMOUNT

LEVEL2 DFD FOR VIEWING ACCOUNT DETAILS

ADMINISTRATOR/ USER

READ A/C NO. BANK DATABASE

CHECK VALID

SHOW ACCOUNT DETAILS

25

LEVEL2 DFD FOR TRANSACTION DETAILS

READ A/C NO.

ADMINISTRATOR/ USER

BANK DATABASE

CHECK VALID

SHOW TRANSACTION DETAILS

Advantages of Data Flow Diagrams 

It is a simplified but powerful graphic technique



It enables representing data with different levels of details.



It helps defining boundaries of the system

26

Chapter 6 Database Design 6.1 ER Diagram:-

27

6.2 Table specification 1. Account: Account Field size

Constraint

Number

Long int

Primary

Name

Text

50

Address

Text

50

Phone

Number

Double

Act type

Text

20

City

Text

50

Date

Date/time

Medium date

Chequebook

Yes/no

Fieldname

Field Type

Actno

This table is used to maintain open account details. Where employee from new account. Which keep all information about employee? Here act no define primary key.

ii. Account Type: -

Account type Fieldname

Field type

Field size

Type code

Text

50

Type name

Text

50

Int rate

Number

Default

Constraint

This table is used for which type of account opens a employee, type of account – saving or current account and also give a account type code.

28

iii. Balance table: -

Balance table Field

Field type

Field size

Actno

Number

Default

Balance

Number

Long

Constraint

name

int

This table the balance of all type of account, saving or current account.

iv. Cheque Table: -

Cheque table Field name

Field type

Field size

Actno

Number

Default

No _from

Number

Default

No _to

Number

Default

Constraint

This table contents all account detail and if you open new account and chose cheque option so give cheque no of your account. v. Pass table: -

Pass table Field name

Field type

Field size

Name

Text

50

Pswd

Text

50

29

Constraint

vi. Tamp Table: -

Tamp table Field name

Field type

Field size

Actno

Number

Long int

Temp type

Text

50

Ckequeno

Number

Long int

Amount

Number

Long int

Date

Date/time

Constraint

This table show the tamp let of all account information and transaction of per day of bank.

Vii. Transaction.1 table: -

Transaction table Field name

Field type

Field size

Constraint

Actno

Number

Long int

Primary

Tran type

Text

50

Amount

Number

Long int

act Type

Text

50

Chequeno

Number

Long int

Date

Date/time

Default

Time

Date/time

Default

This table contains all per day transaction of bank and also summarized all money transaction updating and editing.

30

Chapter-7 System Input and Output Screens

Login-form

31

MDI Form:This is MDI Form designed for selection of the different Menus. Following menu options have been provided in this Home Form:-

Open Account Form:--

32

Edit Or Delete Account Form:--

Amount Transaction Form:--

33

Bank Summary Form:--

Bank Account Statement Form:--

34

Bank Summary Report:--

Bank Account Statement Report:--

35

1. Login Form In this form, existing user/administrator enters the user-name and password and access the main form.. This form contains user name and password as sub module. 2. Main Form If administrator accesses this form using authentic login-name and password then the administrator has administrative power as add the product, create user account, add new branded computer system, add company, change the shop record . Administrator have full power But user have some restricted power only which is provided by administrator. In this main form user can sell computer part/assemble computer system/branded computer system, update customer record, change the password, make quotation. Using this form the user/administrator can see the report of sold computer part, branded computer system in any time duration. In this form, there is option to exit & log-off

3. Open Account: It consists of new bank account form. A consist new enquiry information who come to the bank for enquiry about new account (saving, current). Then he or she fill up the new account form according to their account number generated automatically and also generate cheui no automatically.

4. Close or Edit Account:It consists or provides editing and closing account form and also such particular account information.

5. Monthly Statement: It consists of two sided form monthly statement of bank employee and monthly statement of saving and current account employee.

36

6. Bank Summary: -

It consists of all information detail of bank employee account transaction detail summary, recode of all branches and also record of draft and chewy. 7. Bank Account Statement Report: This report show the sold computer part in any time duration. The administrator/user can see the detail of sold computer part in specified time duration. This report show the name of customer, item-name, company-name, type, range, serial-number, and price of sold product.

Exit:

Exit command used in close the application

37

Chapter-8 Coding and Testing Coding:Component: Flash form Form Name: Frmflase.frm Code: --Private Sub Form_Click() Unload Me LoginForm.Show 1 'Form6.Show End Sub

Private Sub Form_Load() Timer1.Interval = 3000 End Sub

Private Sub Timer1_Timer() Unload Me LoginForm.Show 1 'Form6.Show End Sub

Component : Login form Form Name :FrmLogin Code :-Dim rs As New ADODB.Recordset Private Sub CancelButton_Click() Unload Me End Sub

Private Sub Form_Load() rs.ActiveConnection = cn If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset

38

rs.LockType = adLockOptimistic rs.Open "select * from Pass" rs.MoveFirst While Not rs.EOF = True Combo1.AddItem rs(0) rs.MoveNext Wend Combo1.ListIndex = 0 End Sub

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

End Sub Private Sub OkButton_Click() If rs.State = 1 Then rs.Close rs.Open "select pswd from pass where name = '" & Combo1.Text & "'" If rs!pswd = Text1.Text Then Me.Caption = "Password Success" GoTo 1 Else Me.Caption = "Invalid Password" Text1.Text = " " Text1.SetFocus Exit Sub End If Call ShowForm End Sub

Private Sub ShowForm() If Combo1.Text = "Employee" Then Unload Me Form1.Show Form1.BnkButton.Enabled = False ElseIf Combo1.Text = "Guest" Then Unload Me Form1.Show Form1.AcButton.Enabled = False Form1.BnkButton.Enabled = False

39

Form1.TrButton.Enabled = False Form1.AcClButton.Enabled = False ElseIf Combo1.Text = "Manager" Then Unload Me Permission = 1 'For Account Permission Clos account Form1.Show End If End Sub

Component : Main form Form Name frmMain Coding :--Private Sub AcButton_Click() 'Unload Me Form2.Top = 3000 Form2.Left = 4000 Form2.Show End Sub

Private Sub AcClButton_Click() 'Unload Me Form3.Top = 3000 Form3.Left = 4000 Form3.Show End Sub

Private Sub BackButton_Click() 'Unload Me LoginForm.Top = 3000 LoginForm.Left = 4000 LoginForm.Show End Sub

Private Sub BnkButton_Click() 'Unload Me Form5.Top = 3000 Form5.Left = 4000 Form5.Show End Sub

40

Private Sub ExButton_Click() Unload Me End Sub

Private Sub Picture1_Click()

End Sub

Private Sub StmtButton_Click() 'Unload Me Form6.Top = 3000 Form6.Left = 4000 Form6.Show End Sub

Private Sub TrButton_Click() 'Unload Me Form4.Top = 3000 Form4.Left = 4000 Form4.Show End Sub

Component : Open Account Form Form name Frmopen Coding :______________________________________________________________________________________ Dim rs As New ADODB.Recordset Dim MaxNo As Long Dim a As Integer

Private Sub Check1_Click()

End Sub

Private Sub Command1_Click() Dim sstr, s As String Dim rst As New ADODB.Recordset rst.Open "Select max(actno) from Account", cn, adOpenKeyset, adLockOptimistic, cmdtext

41

a = rst(0) + 1 If CheckField = True Then s = Text1.Text If Check1.Value = 1 Then sstr = "insert into account " sstr = sstr + "values(" & a & ",'" & Text1.Text & "', '" & Text3.Text & "', " sstr = sstr + " " & Text2.Text & " ,'" & Combo1.Text & "' ,'" & Text6.Text & "','" & Date & "',YES)" cn.Execute sstr MsgBox "Account Created " & "Account Number = " & a, vbInformation, a Call UpdateCheque MsgBox "Ur Cheque No is from " & MaxNo & " To " & MaxNo + 10, vbInformation StatusBar1.Panels(2).Text = "Cheque No " & MaxNo & " - " & MaxNo + 10 ElseIf Check1.Value = 0 Then sstr = "insert into account " sstr = sstr + "values(" & a & ",'" & Text1.Text & "', '" & Text3.Text & "', " sstr = sstr + " " & Text2.Text & " ,'" & Combo1.Text & "' ,'" & Text6.Text & "','" & Date & "',NO)" cn.Execute sstr MsgBox "Account Created " & "Account Number = " & a, vbInformation, a StatusBar1.Panels(2).Text = "Cheque Book Not Issued" End If Call AddDeposite StatusBar1.Panels(1).Text = "Hello " & s & " " & a Call ClearField End If rst.Close End Sub

Private Sub AddDeposite() Dim s As String s = "insert into BalanceTable values " s = s + "(" & a & "," & Text5.Text & ")" cn.Execute s End Sub

Private Function CheckField() As Boolean If Text1.Text = "" Then MsgBox " Enter Name Please " Text1.SetFocus

42

CheckField = False ElseIf Text3.Text = "" Then MsgBox " Enter Address please " Text3.SetFocus CheckField = False ElseIf Text5.Text = "" Then MsgBox "Balance Should deposite" Text5.SetFocus CheckField = False ElseIf Check1.Value = 1 Then If Not Val(Text5.Text) >= 1500 Then MsgBox "Minimum Balance Should be 1500" CheckField = False Else CheckField = True End If ElseIf Check1.Value = 0 Then If Not Val(Text5.Text) >= 500 Then MsgBox "Minimum Balance Should be 500" CheckField = False Else CheckField = True End If Else CheckField = True End If End Function

Private Sub Command2_Click() Call ClearField End Sub Sub ClearField() Text1.Text = "" Text2.Text = "" Text3.Text = "" Text5.Text = "" Me.Text6.Text = "" Check1.Value = 0

43

End Sub Private Sub Command3_Click() Unload Me 'Form1.Show 1 End Sub

Private Sub Command4_Click() Unload Me End Sub Private Sub UpdateCheque() Dim rst As New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "select max(NoTo) from cheque", cn, adOpenKeyset, adLockOptimistic If rst.RecordCount > 0 Then If Not rst.EOF Then MaxNo = Val(rst.Fields(0)) + 1 Else MaxNo = 1234 End If Else MaxNo = 1234 End If cn.Execute "insert into cheque(Actno,NoForm,NoTo)values(" & a & "," & MaxNo & "," & MaxNo + 10 & ")" rst.Close End Sub

Private Sub Form_Load() Text4.Caption = Date$ Label6.Caption = Time() If rs.State = 1 Then rs.Close rs.Open "select * from AccountType", cn, adOpenKeyset, adLockOptimistic, cmdtext rs.MoveFirst While Not rs.EOF Combo1.AddItem rs(1) rs.MoveNext Wend Combo1.ListIndex = 0 End Sub

44

Private Sub Text2_KeyPress(KeyAscii As Integer) If Chr(KeyAscii) Like "[0-9]" Or KeyAscii = 8 Then Else KeyAscii = 0 End If End Sub

Private Sub Text5_KeyPress(KeyAscii As Integer) If Chr(KeyAscii) Like "[0-9]" Or KeyAscii = 8 Then Else KeyAscii = 0 End If End Sub Private Sub Timer1_Timer() Label6.Caption = Time() End Sub

Component : Edit and close Account Form Form Name : frmEditAct Coding :Dim rs As New ADODB.Recordset '---------------------------------------'Close account form to close account 'Permission variable is to check the permission to delete the 'Record that manager can delete the record '----------------------------------------

Private Sub CmdCloseAct_Click() Dim rst As New ADODB.Recordset rst.ActiveConnection = cn If Permission = 1 Then Dim stmt, ms As String Dim s As Long ms = MsgBox("Do U really want to Close Account", vbYesNo, "Delete Record ") If ms = vbYes Then If rst.State = 1 Then rst.Close s = Combo1.Text

45

rst.Open "select ChequeBook from account where actno = " & s & "" If rst!ChequeBook = True Then stmt = "delete from cheque where actno = " & s & "" cn.Execute stmt End If rst.Close stmt = "delete from account where actno = " stmt = stmt + " " & s & "" cn.Execute stmt 'Get the balance back before close account If rst.State = 1 Then rs.Close rst.Open "select balance from BalanceTable where actno = " & s & " " StatusBar1.Panels(1).Text = "Ur balance was " & rst(0) & " Get the money" MsgBox "Ur balance was " & rst(0) & " Get the money" rst.Close stmt = "delete from BalanceTable where actno = " & s & " " cn.Execute stmt stmt = "delete from Transaction1 where actno = " & s & " " cn.Execute stmt MsgBox "Account Close " rs.Requery End If Else MsgBox "U dont have Permission to Close Account ", vbInformation, "Close Account" End If End Sub

Private Sub CmdFirst_Click() If rs.RecordCount > 0 Then rs.MoveFirst End If If rs.BOF Then MsgBox "You Are Onto The First Record" Else Call FillRecord(rs) End If End Sub

46

Private Sub CmdLast_Click() If rs.RecordCount > 0 Then rs.MoveLast End If If rs.EOF = True Then MsgBox "You Are Onto The Last Record" Else rs.MoveLast Call FillRecord(rs) Exit Sub End If End Sub

Private Sub CmdMain_Click() Unload Me Form1.Show End Sub

Private Sub CmdNext_Click() If rs.RecordCount > 0 Then rs.MoveNext End If If rs.EOF Then MsgBox "You Are Onto The Last Record" If rs.RecordCount > 0 Then rs.MoveLast End If Else Call FillRecord(rs) End If End Sub

Private Sub CmdPrev_Click() If rs.RecordCount > 0 Then rs.MovePrevious End If If rs.BOF Then MsgBox "You Are Onto The First Record"

47

If rs.RecordCount > 0 Then rs.MoveFirst End If Else Call FillRecord(rs) End If End Sub

Private Sub CmdUpdate_Click() Dim stmt As String stmt = "update Account set nam = '" & Text1.Text & "' , " stmt = stmt + " address = '" & Text4.Text & "' ," stmt = stmt + " phone = " & Text2.Text & " , " stmt = stmt + " Actype = '" & Text3.Text & "' where " stmt = stmt + "actno = " & Combo1.Text & " " cn.Execute stmt MsgBox "Update Succeed ", vbInformation, "Saving Record" rs.Requery End Sub

Private Sub Combo1_Click() ' This is for navigate through combo box Dim rs1 As New ADODB.Recordset If rs1.State = 1 Then rs.Close rs1.Open "select * from Account where actno= " & Combo1.Text & " ", cn, adOpenKeyset, adLockOptimistic, adCmdText If rs1.RecordCount > 0 Then Call FillRecord(rs1) End If rs1.Close End Sub

Private Sub Command1_Click() 'Issue Cheque book Dim stmt As String Dim rst As New ADODB.Recordset If Check1.Value = 0 Then If rst.State = 1 Then rst.Close rst.Open "select max(noto) from Cheque", cn, adOpenKeyset, adLockOptimistic, cmdtext

48

Dim MaxNo As Long If rst.RecordCount > 0 Then MaxNo = rst(0) MaxNo = MaxNo + 1 stmt = "insert into Cheque values (" stmt = stmt + "" & Combo1.Text & ", " & MaxNo & "," & MaxNo + 10 & ")" cn.Execute stmt ' This is to update in the account master table stmt = "update account set ChequeBook = YES where " stmt = stmt + "actno = " & Combo1.Text & "" cn.Execute stmt MsgBox "Cheque book created form " & MaxNo & " To " & MaxNo + 10 StatusBar1.Panels(1).Text = "Cheque book created form " & MaxNo & " To " & MaxNo + 10 rs.Requery 'This is to move record to the first position If rs.RecordCount > 0 Then rs.MoveFirst End If If rs.BOF Then MsgBox "You Are Onto The First Record" Else Call FillRecord(rs) End If End If Else Dim ch As String ch = MsgBox("Cheque Already Issued if cheque last then click yes", vbYesNo) If ch = vbYes Then stmt = "delete from Cheque where actno = " & Combo1.Text & "" cn.Execute stmt If rst.State = 1 Then rst.Close rst.Open "select max(NoTo) from Cheque", cn, adOpenKeyset, adLockOptimistic, cmdtext If rst.RecordCount > 0 Then 'Dim MaxNo As Long MaxNo = rst(0) MaxNo = MaxNo + 1 stmt = "insert into Cheque values (" stmt = stmt + "" & Combo1.Text & ", " & MaxNo & "," & MaxNo + 10 & ")"

49

cn.Execute stmt 'This is to update in the acccount master table stmt = "update account set ChequeBook = YES where " stmt = stmt + "actno = " & Combo1.Text & "" cn.Execute stmt MsgBox "Cheque book created form " & MaxNo & " To " & MaxNo + 10 StatusBar1.Panels(1).Text = "Cheque book created form " & MaxNo & " To " & MaxNo + 10 rs.Requery 'This is to move record to the first position If rs.RecordCount > 0 Then rs.MoveFirst End If If rs.BOF Then MsgBox "You Are Onto The First Record" Else Call FillRecord(rs) End If End If

End If End If End Sub

Private Sub Form_Load() rs.ActiveConnection = cn If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.Open "select * from Account order by actno" If Not rs.BOF Then rs.MoveFirst While Not rs.EOF Combo1.AddItem rs!actno rs.MoveNext Wend If Not rs.BOF Then rs.MoveFirst If rs.RecordCount > 0 Then Call FillRecord(rs)

50

End If End Sub '************************************************ 'Fill Record in the Form Controls

Private Sub FillRecord(rs As ADODB.Recordset) Dim i As Integer Dim a Dim rsB As New ADODB.Recordset If rs.RecordCount > 0 Then For i = 0 To Combo1.ListCount - 1 If Combo1.List(i) = Trim(rs!actno) Then Combo1.ListIndex = i Exit For End If Next End If a = rs!actno Text1.Text = rs!Nam Text2.Text = rs!phone Text3.Text = rs!actype Text4.Text = rs!address Text6.Text = rs!Date 'Fill in the check box If rs!ChequeBook = True Then Check1.Value = 1 Else Check1.Value = 0 End If 'To get the balance from Balance Table If rsB.State = 1 Then rsB.Close rsB.Open "select * from BalanceTable where actno = " & a & "", cn, adOpenKeyset, adLockOptimistic, cmdtext Text5.Text = rsB!balance End Sub

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

End Sub

51

Component :Amount Transaction form Form Name : frmtran Code :-

Dim rs As New ADODB.Recordset Dim a As Boolean 'To check the balance is greater or less

Private Sub Combo2_Click() If Combo2.ListIndex = 0 Then 'withdraw Combo3.Clear Combo3.AddItem "Cheque" Combo3.AddItem "Withdrawl" Combo3.ListIndex = 0 ElseIf Combo2.ListIndex = 1 Then 'Deposit Combo3.Clear Combo3.AddItem "Draft" Combo3.AddItem "Cash" Combo3.AddItem "Cheque" Combo3.ListIndex = 0 End If End Sub

Private Sub Combo3_Click() If Combo3.Text = "Cheque" Or Combo3.Text = "Draft" Then Text2.Enabled = True Else Text2.Enabled = False End If End Sub 'This procedure is to check that the cheque number 'Which is entered is correct or not

Private Function CheqTest() As Boolean If Not Combo2.Text = "Deposite" Then Dim rst As New ADODB.Recordset rst.ActiveConnection = cn

52

If rst.State = 1 Then rst.Close rst.CursorLocation = adUseClient rst.CursorType = adOpenKeyset rst.LockType = adLockOptimistic rst.Open "select * from account where actno = " & Combo1.Text & "" If rst!ChequeBook = True Then If Not Text2.Text = "" Then If rst.State = 1 Then rst.Close rst.Open "select * from Cheque where actno = " & Combo1.Text & " " If rst.RecordCount > 0 Then If Text2.Text >= rst(1) And Text2.Text <= rst(2) Then MsgBox "SS" CheqTest = True Else MsgBox "Please enter the valid cheque no", vbInformation CheqTest = False Exit Function End If End If Else MsgBox "U will have to select Cheque and enter cheque number ", vbInformation CheqTest = False Exit Function End If Else CheqTest = True End If Else CheqTest = True End If End Function 'This is the submit button command button that is 'To submit the transaction in the transaction table 'After checking the appropriate field

Private Sub Command1_Click() Dim sstr As String If Not Text1.Text = "" Or Val(Text1.Text) < 100 Then

53

If Text2.Text = "" Then Text2.Text = 0 End If sstr = "Insert into Transaction1 values(" sstr = sstr + " " & Combo1.Text & ",'" & Combo2.Text & "'," sstr = sstr + "" & Text1.Text & ",'" & Combo3.Text & "'" sstr = sstr + "," & Text2.Text & ",'" & Date & "','" & Time & "')" If CheqTest = True Then Call UpdateMoney If a = True Then cn.Execute sstr StatusBar1.Panels(1).Text = "Money " & Combo2.Text & " Success" MsgBox "Money " & Combo2.Text & " Success" End If a = False End If Call ClearField Else MsgBox "please Enter Lease 100 Transaction Amount ", vbInformation End If End Sub 'This is to Update the balance in database

Private Sub UpdateMoney() Dim rst As New ADODB.Recordset Dim stmt As String Dim d As Long If rst.State = 1 Then rst.Close rst.Open "select * from BalanceTable where actno = " & Combo1.Text & "", cn, adOpenKeyset, adLockOptimistic, cmdtext If Combo2.Text = "Deposite" Then d = rst!balance + Val(Text1.Text) stmt = "update BalanceTable set balance = " & d & "" stmt = stmt + " where actno = " & Combo1.Text & "" cn.Execute stmt a = True ElseIf Combo2.Text = "Withdraw" Then If rst!balance > Val(Text1.Text) Then

54

d = rst!balance - Val(Text1.Text) stmt = "update BalanceTable set balance = " & d & "" stmt = stmt + " where actno = " & Combo1.Text & "" cn.Execute stmt a = True Else MsgBox "U dont have money to Transact U have only " & rst!balance a = False End If End If End Sub

Private Sub Command2_Click() Unload Me 'Form1.Show 1 End Sub Private Sub ClearField() Text1.Text = "" Text2.Text = "" Combo1.ListIndex = 0 Combo2.ListIndex = 0 Combo3.ListIndex = 0 End Sub

Private Sub Command3_Click() Call ClearField End Sub Private Sub Command4_Click() Unload Me End Sub Private Sub Form_Load() Timer1.Interval = 1000 Label3.Caption = Time Label2.Caption = Date rs.ActiveConnection = cn If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset

55

rs.LockType = adLockOptimistic rs.Open "select * from Account order by actno" rs.MoveFirst 'This is to fill the account number combo While Not rs.EOF = True Combo1.AddItem rs!actno rs.MoveNext Wend rs.Close Combo2.AddItem "Withdraw" Combo2.AddItem "Deposite" Combo2.ListIndex = 0 Combo1.ListIndex = 0 Combo3.Clear Combo3.AddItem "Cheque" Combo3.AddItem "Withdrawl" 'rs.Close End Sub Private Sub Timer1_Timer() Label3.Caption = Time End Sub

Component : Summary form Form Name : FrmSumary Code :-

Private Sub Command1_Click() Unload Me End Sub

Private Sub Command2_Click() Unload Me Form1.Show 1 End Sub

Private Sub Command3_Click() SummaryRept.Refresh DataEnvironment1.rsCommand2.Requery SummaryRept.Show

56

End Sub

Private Sub DataGrid1_Click() End Sub

Private Sub Form_Load() Adodc1.Refresh End Sub

Component : Summary report form Form Name FrmSummary Code :Dim rs As New ADODB.Recordset Private Sub DataReport_Activate() 'rs.Open "select Balance from BalanceTable where actno = " & txtActno & "", cn, adOpenKeyset, adLockOptimistic, cmdtext 'Text1 = rs(0) 'rs.Close End Sub

Private Sub DataReport_Error(ByVal JobType As MSDataReportLib.AsyncTypeConstants, ByVal Cookie As Long, ByVal ErrObj As MSDataReportLib.RptError, ShowError As Boolean) On Error Resume Next End Sub

Component : Account statement form Form Name : frmStatement Code :-

Dim stmt As String Dim rs As New ADODB.Recordset Private Sub Combo1_Click() Call DeleteRecord Call FillDBgrid Call FillBalance Adodc1.Refresh DataGrid1.Refresh End Sub

57

Private Sub Command1_Click() Unload Me 'Form1.Show 1 End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Command3_Click() If DataEnvironment1.rsCommand1.State = 1 Then DataEnvironment1.rsCommand1.Close DataEnvironment1.rsCommand1.Open "select * from Temptable", cn, adOpenKeyset, adLockOptimistic, cmdtext DataEnvironment1.rsCommand1.Requery StatmentRept.Refresh StatmentRept.Show End Sub

Private Sub DataGrid1_Click()

End Sub

Private Sub Form_Load() rs.ActiveConnection = cn If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.Open "select actno from account order by actno" If rs.RecordCount > 0 Then rs.MoveFirst While Not rs.EOF = True Combo1.AddItem rs(0) rs.MoveNext Wend End If Combo1.ListIndex = 0 Call DeleteRecord Call FillDBgrid Call FillBalance Adodc1.Refresh

58

DataGrid1.Refresh End Sub Private Sub DeleteRecord() stmt = "delete from TempTable " cn.Execute stmt End Sub Private Sub FillDBgrid() Dim rst As New ADODB.Recordset If rst.State = 1 Then rst.Close If Not Combo1.Text = "" Then rst.Open "select ActNo,TranType,amount,Cheqno,date1 from transaction1 where actno = " & Combo1.Text & "", cn, adOpenKeyset, adLockOptimistic, cmdtext If rst.RecordCount > 0 Then If Not rst.BOF Then rst.MoveFirst While Not rst.EOF = True stmt = "insert into TempTable values ( " & rst(0) & ",'" & rst(1) & "'," & rst(2) & "," & rst(3) & "," & rst(4) & ")" cn.Execute stmt Adodc1.Refresh DoEvents DataGrid1.Refresh rst.MoveNext Wend End If Else StatusBar1.Panels(0).Text = "Not Any Transaction Made" End If Call FillBalance End Sub Private Sub FillBalance() Dim rsq As New ADODB.Recordset If rsq.State = 1 Then rsq.Close rsq.Open "select Balance from BalanceTable where actno = " & Combo1.Text & " ", cn, adOpenKeyset, adLockOptimistic, cmdtext Text1.Text = rsq(0) End Sub

Component : Statement report form 59

Form Name : FrmStetement Code:Private Sub DataReport_Error(ByVal JobType As MSDataReportLib.AsyncTypeConstants, ByVal Cookie As Long, ByVal ErrObj As MSDataReportLib.RptError, ShowError As Boolean) On Error Resume Next If DataEnvironment1.rsCommand1.State = 1 Then DataEnvironment1.rsCommand1.Close 'DataEnvironment1.rsCommand1.Open "select * from Temptable", cn, adOpenKeyset, adLockOptimistic, cmdtext DataEnvironment1.rsCommand1.Requery StatmentRept.Refresh End Sub

Private Sub DataReport_Initialize() On Error Resume Next If DataEnvironment1.rsCommand1.State = 1 Then DataEnvironment1.rsCommand1.Close DataEnvironment1.rsCommand1.Open "select * from Temptable", cn, adOpenKeyset, adLockOptimistic, cmdtext DataEnvironment1.rsCommand1.Requery StatmentRept.Refresh End Sub Module Code:________________________________________________________________________ Dim stmt As String Dim rs As New ADODB.Recordset

Private Sub Combo1_Click() Call DeleteRecord Call FillDBgrid Call FillBalance Adodc1.Refresh DataGrid1.Refresh End Sub

Private Sub Command1_Click() Unload Me 'Form1.Show 1 End Sub

Private Sub Command2_Click()

60

Unload Me End Sub

Private Sub Command3_Click() If DataEnvironment1.rsCommand1.State = 1 Then DataEnvironment1.rsCommand1.Close DataEnvironment1.rsCommand1.Open "select * from Temptable", cn, adOpenKeyset, adLockOptimistic, cmdtext DataEnvironment1.rsCommand1.Requery StatmentRept.Refresh StatmentRept.Show End Sub

Private Sub DataGrid1_Click()

End Sub

Private Sub Form_Load() rs.ActiveConnection = cn If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.Open "select actno from account order by actno" If rs.RecordCount > 0 Then rs.MoveFirst While Not rs.EOF = True Combo1.AddItem rs(0) rs.MoveNext Wend End If Combo1.ListIndex = 0 Call DeleteRecord Call FillDBgrid Call FillBalance Adodc1.Refresh DataGrid1.Refresh End Sub Private Sub DeleteRecord()

61

stmt = "delete from TempTable " cn.Execute stmt End Sub

Private Sub FillDBgrid() Dim rst As New ADODB.Recordset If rst.State = 1 Then rst.Close If Not Combo1.Text = "" Then rst.Open "select ActNo,TranType,amount,Cheqno,date1 from transaction1 where actno = " & Combo1.Text & "", cn, adOpenKeyset, adLockOptimistic, cmdtext If rst.RecordCount > 0 Then If Not rst.BOF Then rst.MoveFirst While Not rst.EOF = True stmt = "insert into TempTable values ( " & rst(0) & ",'" & rst(1) & "'," & rst(2) & "," & rst(3) & "," & rst(4) & ")" cn.Execute stmt Adodc1.Refresh DoEvents DataGrid1.Refresh rst.MoveNext Wend End If Else StatusBar1.Panels(0).Text = "Not Any Transaction Made" End If Call FillBalance End Sub Private Sub FillBalance() Dim rsq As New ADODB.Recordset If rsq.State = 1 Then rsq.Close rsq.Open "select Balance from BalanceTable where actno = " & Combo1.Text & " ", cn, adOpenKeyset, adLockOptimistic, cmdtext Text1.Text = rsq(0) End Sub

***** END OF THE PROGRAM *****

62

Testing:-

Software testing can be stated as the process of validating and verifying that a software program/application/product: 1. meets the requirements that guided its design and development; 2. works as expected; and 3. Can be implemented with the same characteristics. Software testing, depending on the testing method employed, can be implemented at any time in the development process. However, most of the test effort occurs after the requirements have been defined and the coding process has been completed. As such, the methodology of the test is governed by the software development methodology adopted.

63

Chapter-9 System Implementation

Depending on the SDLC model, implementation becomes an important stage in knowing for the first time if the actual plan and system design works in the real environment. Implementation will always suggest that something might be wrong, users and developers have to exploit it extensively. Documentation will be highlighted for the first time since developers will have to refer to documentation not only for troubleshooting but also for future development and the next stages of SDLC. The project can be implemented on intranet in future. Project can be updated in near future as and when requirement for the same arises, as it is very flexible in terms of expansion. With the proposed software of database Space Manager ready and fully functional the client is now able to manage and hence run the entire work in a much better, accurate and error free manner.

64

Chapter-10 Conclusion/Future work/Limitations Conclusion:“Banking System " keeps the day by day tally record as a complete banking. It can keep the information of Account type, account opening form, Deposit, Withdrawal, and Searching the transaction, Transaction report, Individual account opening form, Group Account. The exciting part of this project is; it displays Transaction reports, Statistical Summary of Account type and Interest Information.

Future work/ Limitations:-

This project can be used in the bank after adding some more useful modules in the project for which banks are providing services, like – opening saving or current account, giving loans, providing credit or debit card services, ATM services, services like payment of electricity bills, telephone bills. Utmost care and back-up procedures must be established to ensure 100% successful implementation of the computerized banking system. In case of system failure, the organization should be in a position to process the transaction with another organization or if the worst comes to the worst, it should be in a position to complete it manually. This project has been designed in such a way that, its can further upgraded very easily. The main advantage of this system is it’s modularity. This system helps the management to manage to eternal as well as external work. It can also used to sentinel database of all bank, so that all the transaction will be online and easily manageable. This system can also be integrated with account

65

department. The employee module can also be integrating onto this system, so the bank employee record also is automated. Though the system has been designed according to the requirements of the users it has its own limitation. Thus the limitation of system are-

 No facility to create new users with different roles  Object oriented Approach has been not been fully utilized  Single user  Not online searing

66

References



Www.Support.mircosoft.com



Microsoft Visual Basic 6.0



Mastering Visual Basic



Simply Visual Basic 2008



21 Days learning VB



Www.Google.com.in

67

Related Documents


More Documents from ""