Thiết kế phàn mềm quản lý tiền gửi ngân hàng

Tài liệu tham khảo tài chính ngân hàng Thiết kế phàn mềm quản lý tiền gửi ngân hàng

Phần 1:

Phần mở đầu.

Hiện nay cả thế giới đang dần chuyển sang nền kinh tế tri thức và ngànhcông nghệ thông tin cũng dần dần đợc ứng dụng vào hầu hết các hoạt động trongnền kinh tế của các quốc gia trên toàn thế giới Việt Nam cũng đang trên con đờnghội nhập và phát triển cùng với khu vực và thế giới, chính vì vậy việc ứng dụng tinhọc trong các lĩnh vực của cuộc sống rất đợc quan tâm Một trong những ứng dụng

đó là sử dụng tin học để quản lý tiền gửi trong một ngân hàng Đất nớc càng pháttriển, nhận thức của ngời dân càng mở rộng thì công việc của ngành ngân hàngcàng trở nên quan trọng, chính vì vậy việc sử dụng những thành tựu của tin học đểquản lý tiền gửi trong ngân hàng là không thể thiếu

Trong đề án này em xin đợc sử dụng những kiến thức của mình để thiết kếphần mềm quản lý tiền gửi trong một ngân hàng Bởi lý do thời gian và khả năngcủa bản thân còn hạn chế vì thế chắc chắn chơng trình không thể đợc hoàn thiện,

em rất mong nhận đợc sự đóng góp ý kiến và sự chỉ bảo tận tình của thầy giáo ớng dẫn và của tất cả các thầy cô giáo trong khoa Tin học kinh tế

I Mô tả hoạt động của tổ chức ngân hàng.

1 Sơ đồ tổ chức ngân hàng.

Giám đốcChi nhánh 2

Hội đồng quản trị

Ban tổng giám đốc

Phó tổng giám đốc Phó tổng giám đốc

Giám đốcChi nhánh 1

2 Hoạt động chung của ngân hàng.

2.1.Thay đổi tiền dự trữ.

Nói chung các ngân hàng thu lợi luận bằng cách bán các tài sản nợ có một

đặc tính (một kết hợp riêng về tính lỏng, rủi ro và lợi tức ) và dùng tiền mua đợc

để mua những tài sản có một số đặc tính khác Nh thế, các ngân hàng cung cấpmột số dịch vụ chuyển một loại tài sản thành một loại tài sản khác cho công chúng

Quá trình chuyển các tài sản và cung cấp một loại dịch vụ (thanh toán séc,ghi chép sổ sách, phân tích tín dụng…)cũng giống nh)cũng giống nh bất cứ quá trình sản xuất nàokhác trong hãng kinh doanh Nếu một ngân hàng tạo ra những dịch vụ hữu ích vớichi phí thấp và có đợc doanh thu cao nhờ tài sản của mình, thì ngân hàng đó thu đ-

ợc lợi nhuận

Khi một ngân hàng thơng mại nhận thêm tiền gửi, thì tiền dự trữ tăng thêm

đúng bằng số tiền gửi đó; khi tiền gửi rút ra, nó bị mất một số lợng tiền dự trữ đúngbằng với số tiền gửi rút ra

2.2.Tạo lợi nhuận từ việc cho vay

Nh phần trên ta thấy, các ngân hàng thơng mại tăng thêm hay mất bớt tiền

dự trữ nh thế nào Bên cạnh việc thay đổi tiền dự trữ một hoạt động nữa của ngânhàng đó là bố trí lại bảng cân đối tài sản để tạo ra lợi nhuận khi ngân hàng tạo rathay đổi về số tiền gủi của nó

Các ngân hàng thơng mại thu lợi nhuận chủ yếu bằng cách cho vay Tiềnvay là khoản nợ đối với ngời vay, nhng là một tài sản đối với ngân hàng thơng mại

và nó mang lại thu nhập cho ngân hàng Nói chung tiền cho vay là kém lỏng so với

các tài sản khác bởi vì chúng không thể chuyển thành tiền mặt trớc khi các khoảncho vay đó mãn hạn Các khoản tiền cho vay cũng có xác suất vỡ nợ cao hơn so vớicác tài sản khác Do thiếu tính lỏng và có rủi ro vỡ nợ cao nên ngân hàng th ơngmại thờng thu đợc nhiều lợi nhuận nhờ vào các món tiền cho vay.

3 Thực trạng ứng dụng tin học trong ngân hàng

Hiện nay do sự phát triển của khoa học công nghệ và ngời dân có nhữngnhận thức tiến bộ về việc gửi tiền trong ngân hàng cho nên trong khoảng vài nămtrở lại đây ngành ngân hàng đã có những bớc phát triển đáng kể, đặc biệt là việc ápdụng công nghệ thông tin vào xử lý tài chính Trong một số ngân hàng lớn hiệnnay nh các ngân hàng ở Hà Nội hay thành phố Hồ Chí Minh thì việc áp dụng tinhọc vào xử tài chính là một việc đang rất đợc quan tâm Mặc dù đã có những bớcphát triển nh vậy nhng hiện nay việc áp dụng tin học trong hoạt động của hầu hếtcác ngân hàng ở Việt Nam vẫn cha đạt hiệu quả cao, máy tính chỉ đợc sử dụng đểthực hiện những công việc đơn giản, cha khai thác hết những khả năng và giá trị

Đề tài giúp cho em có thể hiểu rõ hơn về hoạt động của ngành ngân hàng

đồng thời qua đó cũng giúp em hiểu biết hơn tình hình ứng dụng tin học trongngành ngân hàng ở nớc ta hiện nay Qua việc thực hiện đề tài này em cũng nắmchắc hơn những kiến thức về cấu trúc dữ liệu danh sách liên kết của PASCAL vàcách ứng dụng tin học để xử lý các công việc của ngành ngân hàng

3 Mục đích của đề tài

Mục đích của đề tài nhằm giúp cho sinh viên hiểu rõ hoạt động của ngànhngân hàng, bên cạnh đó giúp cho sinh viên nắm vững hơn những kiến thức cơ bảntrong lập trình nh kiến thức về cấu trúc dữ liệu danh sách liên kết Đề tài cũng giúpcho sinh viên làm quen cách viết chơng trình phần mềm để có thể ứng dụng tin họcvào việc xử lý các hoạt động của ngân hàng

4 Khả năng áp dụng.

Chơng trình đợc sử dụng để quản lý tiền gửi trong một ngân hàng với cáchoạt động thờng xảy ra trong ngân hàng nh: Mở tài khoản mới cho khách hàng,thực hiện các công việc gửi tiền vào tài khoản hoặc rút tiền ra khỏi tài khoản, sửachữa những thông tin đã lu trữ về khách hàng, hiện các báo cáo về khách hàng, tàikhoản của khách hàng hoặc tổng tiền gửi trong ngân hàng…)cũng giống nh

Ch ơng 2:

Thiết kế cấu trúc của chơng trình

1 Các tính năng chính của chơng trình.

Chơng trình có năm chức năng chính : Nạp , Thêm, Bớt , Sửa, In

Nạp : Nạp dữ liệu đã đợc lu trữ trên đĩa để sử dụng

Thêm : - Thêm tài khoản mới cho khách hàng

- Thªm tiÒn göi vµo tµi kho¶n cña kh¸ch hµng Bít: - Rót tiÒn l·i tõ tµi kho¶n

- Rót tiÒn tõ tµi kho¶n

- Rót c¶ gèc lÉn l·i (Huû bá tµi kho¶n)

Söa: Söa c¸c th«ng tin vÒ kh¸c hµng

In : - In toµn bé danh s¸ch kh¸ch hµng

- In th«ng tin vÒ mét kh¸ch hµng

- In th«ng tin vÒ mét tµi kho¶n

- Tæng tiÒn göi trong Ng©n hµng

Chơng trình đợc thiết kế nhằm mục đích quản lý tiền gửi trong một ngânhàng vì thế khi lựa chọn phơng pháp thiết kế trên ta có thể bao quát đợc toàn bộcông việc Với phơng pháp thiết kế này ta có thể nắm bắt đợc những yêu cầuchính của công việc từ đó chia ra các module chính Sau khi thiết kế đợc cácmodule chính ta có thể đi vào giải quyết từng yêu cầu trong mỗi module mộtcách riêng rẽ qua việc thiết kế các module con Nh vậy việc lựa chọn phơngpháp trên sẽ giúp cho việc thiết kế phần mềm đạt hiệu quả cao.

5 Ngôn ngữ lập trình và cấu trúc dữ liệu sử dụng.

 Ngôn ngữ lập trình sử dụng:

Sử dụng ngôn ngữ lập trình PASCAL, đây là ngôn ngữ có cấu trúctiền định đủ mạnh sẽ cho phép chúng ta biểu diễn các giải thuật một cáchngắn gọn, dễ dàng hình dung ra các công đoạn thiết kế giải thuật.PASCAL có các cấu trúc dữ liệu đầy đủ, có thể biểu diễn các loại cấu trúcdữ liệu từ đơn giản đến phức tạp, từ cấu trúc tuyến tính đến cấu trúc phituyến tính

 Cấu trúc dữ liệu sử dụng:

Sử dụng cấu trúc dữ liệu danh sách liên kết Danh sách liên kết làdanh sách trong đó các phần tử đợc kết nối với nhau bởi vùng liên kết củachúng Đây là loại cấu trúc dữ liệu thích hợp cho phép thêm vào, loại bỏhoặc ghép nối các phần tử của danh sách

Nguyên tắc tổ chức danh sách liên kết nh sau: Vùng liên kết củaphần tử thứ i chứa địa chỉ của phần tử thứ i+1 (i=1 n-1), vùng liên kết củaphần tử cuối cùng n mang giá trị rỗng (nil) Mỗi phần tử của danh sáchliên kết gồm hai phần chính:

- Vùng chứa dữ liệu (data)

- Vùng địa chỉ của các phần tử khác (gọi là vùng liên kết Link)

Ngoài ra, ngời ta còn sử dụng các chỉ điểm Fisrt, Last (kiểu Pointer) đểchứa địa chỉ của phần tử đầu, cuối

Sau đây là toàn bộ chơng trình:

{ chuong trinh tu dong tao ra trong thu muc C:\DEANPAS cac tep KH.dat, TK.dat, GDgui.dat, GDrut.dat va THDL.dat neu trong thu muc khong co cac tep do hoac khi chay chuong trinh lan dau tien Neu trong thu muc

da ton tai cac tep neu tren thi chuong trinh se lay du lieu tu cac tep do

CHUONG TRINH QUAN LY TIEN GUI TRONG MOT NGANHANG

*************************************************

SoHSKH:string[7]; hoten:string[30];

diachi:string[50];

soCMT:string[9];

Ngaycap:string[10]; Next:khPointer;

end;

tkPointer=^taikhoan; taikhoan=record

SoTaiKhoan:string[7]; SoHSKH:string[7]; SoTienTrongTK:double; laisuat:real;

Next:rutPointer;

end;

TongHopDL=record

TongsoHSKH:longint; TongsoTK:longint; Tongtiengui:double; end;

write(' MAIN MENU ');

writeln(' 1 In danh sach khach hang.');

writeln(' 2 In thong tin ve 1 khach hang.');

writeln(' 3 In thong tin ve 1 tai khoan.');

writeln(' 4 Bao cao tong tien gui trong NH.');

writeln(' 5 Quay ve Main menu.');

write(' ** Chon so: ');

procedure Nap_TK;begin

FirstTK:=nil;

end;

procedure Nap_GDgui;begin

FirstGui:=nil;

end;

procedure Nap_GDrut;begin

FirstRut:=nil;

end;

procedure DuyetKH;var ptr:khPointer; i:longint;

begin

i:=0;

ptr:=FirstKH;

while ptr<>nil do begin

ptr:=ptr^.next; i:=i+1;

end;

SoBanGhiKH:=i;end;

procedure DuyetTK;var ptr:tkPointer; i:longint;

begin

i:=0;

ptr:=FirstTK;

while ptr<>nil do begin

ptr:=ptr^.next; i:=i+1;

end;

SoBanGhiTK:=i;end;

procedure ThemKH;var ptrKH:khPointer;

ptrTK^.SotientrongTK:=motTK.SotientrongTK; ptrTK^.laisuat:=motTK.laisuat;

writeln('Ngay (dd/mm/yyyy): ');

write('So ho so KH: ');

gotoxy(45,6);writeln('Ky han: Thang.'); writeln('Ten khach hang: ');

writeln('Dia chi lien he: ');

write('So chung minh thu: ');

gotoxy(1,12);writeln('So tai khoan: ',motTK.SoTaikhoan);

if ktra=false then ThemKH;

ThemTK;

ThemGDgui;

window(1,1,80,25);

end;

writeln(' -'); i:=1;

while (pKH<>nil) and not tim do

if pKH^.SoHSKH=sohs then tim:=true

writeln(' So tai khoan So tien');

writeln('Tong so tai khoan:',THDL.TongsoTK);

writeln('Tong so tien gui: ',THDL.Tongtiengui:18:2);

write('So ho so khach hang: ');

while (pKH<>nil) and not tim do

if pKH^.SoHSKH=sohs then tim:=true

write('Thong tin ve khach hang da duoc sua');

writeln('So tien trong TK: ',p^.SotientrongTK:15:2);

writeln('Lai suat: ',p^.laisuat:5:2);

gotoxy(25,3);writeln(' -');writeln; textcolor(7);

gotoxy(20,7);readln(motGDgui.tiengui); ptrTK:=FirstTK;

p^.SotientrongTK:=motGDrut.tienrut+motGDgui.tiengui;

ThemGDgui;

writeln(' 1 Rut lai dinh ky.');

writeln(' 2 Rut goc tu tai khoan.');

writeln(' 3 Tat toan, huy tai khoan.');

writeln(' 4 Quay ve Main Menu.');

write(' ** Chon so: ');

while (ptrKH<>nil) and not timKH do

if ptrKH^.SoHSKH=sohs then timKH:=true

writeln('So tien rut: ',tienrut:10:2);

motGDrut.Sotaikhoan:=tk;

motGDgui.ngaygui:=motGDrut.ngayrut;

motGDgui.Sotaikhoan:=motGDrut.Sotaikhoan;

write('Ngay (dd/mm/yyyy): ');readln(motGDrut.ngayrut);

write('So tai khoan: ');readln(tk);

write('So tien rut: ');readln(tienrut);

write('So ho so KH: ');readln(sohs);

timKH:=false;

ptrKH:=FirstKH;

while (ptrKH<>nil) and not timKH do

if ptrKH^.SoHSKH=sohs then timKH:=true

writeln('So tien con trong tai khoan: ',p^.SotientrongTK:15:2); motGDrut.Sotaikhoan:=tk;

while (ptrKH<>nil) and not timKH do

if ptrKH^.SoHSKH=sohs then timKH:=true

writeln('So tien rut: ',motGDrut.tienrut:15:2);

write('Ngay nhap vao som hon ngay gui( hoac rut) tien lantruoc.');

2 Đánh giá hiệu quả của chơng trình.

Chơng trình có đầy đủ các chức năng: Nạp , Thêm , Bớt, Sửa, In Có thể giảiquyết tốt các hoạt động cơ bản của ngành ngân hàng, giúp giảm bớt nhữngcông việc nhàm chán của giao dịch viên trong ngân hàng

Tuy nhiên chơng trình cũng những nhợc điểm:

Chơng trình chỉ chạy đợc trên đờng dẫn C:\DEANPAS vì cha có thiết kế ờng dẫn tơng đối Bên cạnh đó do hiểu biết của em về ngành ngân hàng khôngnhiều nên chơng trình không thể giải quyết đợc hết những tình huống giao dịch

đ-đặc biệt trong ngân hàng

Phần 3:

Kết luận.

Việc thực hiện đề án chuyên ngành là cơ hội cho sinh viên có dịp vận dụngnhững kiến thức đã học vào các bài tập thực hành tơng tự nh các yêu cầu trongcông việc sau này Với việc thực hiện đề tài của đề án này cũng giúp cho em cóthể vận dụng những kiến thức của mình để ứng dụng xử lý một hoạt động cơbản của ngành ngân hàng Đồng thời cũng giúp cho em hiểu biết thêm hoạt

động của ngân hàng, Tăng thêm kinh nghiệm trong công việc của mình saunày Tuy nhiên có những yếu tố khách quan cũng nh khả năng của bản thân cóhạn nên chơng trình của em chắc chắn không thể hoàn thiện Em rất mongnhận đợc sự chỉ bảo của các thầy cô giáo để chơng trình của mình có thể hoànthiện hơn

Tµi liÖu tham kh¶o:

 Gi¸o tr×nh CÊu tróc d÷ liÖu PGS.TS Hµn ViÕt ThuËnNhµ xuÊt b¶n Thèng kª _ Hµ Néi 1999

 Turbo Pascal 7.0 NXB Thèng kª _ Hµ Néi 1996

 CÊu tróc d÷ liÖu vµ gi¶i thuËt _ §ç Xu©n L«i

 Ng«n ng÷ lËp tr×nh PASCAL _ Qu¸ch TuÊn Ngäc

 Gi¸o tr×nh Lý thuyÕt Tµi chÝnh – TiÒn tÖ TS NguyÔn H÷u TµiNXB Thèng kª _ Hµ Néi 2002