Trong khi dựng ngụn ngữ Visual Foxpro cần sử dụng rất nhiều từ khoỏ ( khoảng > 3000 từ khoỏ khỏc nhau ) nờn ở đõy ta giới thiệu một số từ khoỏ chớnh thường sử dụng cơ bản :
! <> != = ==
% % .AND. .F. .NOT.
.NULL . OR. .T. .Y. /R
#ELIF #ELSE #IF #REGION #SECTION
_BOX _DOS _UNIX AGAIN AFTER
AS BEGIN CALL CHAR CLASS
CLOSE COLUMN COMPACT COPY CONNECTION
CREAT ELSE EOF FLOAT MENU
…….
a. Kiểu dữ liệu
Kiểu dữ liệu là một thuộc tớnh gắn liền với biến hay Fiel trong cơ sở dữ liệu .
Visual Foxpro cú tất cả 10 kiểu dữ liệu khỏc nhau và mỗi kiểu đều cú cỏc phộp toỏn riờng của nú .
Vớ dụ : khụng thể đem kiểu dữ liệu char cộng với kiểu số được .
b. Biến
+/ Mụ tả : là một vị trớ trong bộ nhớ mà giỏ trị của chỳng cú thể thay đổi từ đầu đến cuối chương trỡnh .
Một biến cú thể chứa giỏ trị bất kỡ một loại dữ liệu nào. Chỳng ta cú thể thay đổi giỏ trị của biến vào bất kỡ lỳc nào .
+/ Phạm vi của biến: biến chỉ tồn tại trong một ứng dụng đang chạy hay trong một lần làm việc của Visual Foxpro mà đó tạo ra chỳng. Để chỉ rừ phạm vi của biến ta dựng cỏc từ khoỏ Local, Private hay Public .
+/ Quy ước và cỏch đặt tờn: tờn biến cú quy ước đặt dài khụng quỏ 254 ký tự ( riờng biến vựng chỉ được 10 ký tự ). Cú thể dựng cỏc chữ cỏi, chữ số
và dấu gạch dưới ( _ ) để đặt tờn biến nhưng khụng được bắt đầu bằng số . Khụng được dựng cỏc từ khoỏ của Visual Foxpro.
Lưu ý: trong tờn biến khụng phõn biệt chữ hoa, chữ thường . +/ Cỏc loại biến trong VF: bao gồm 3 loại biến chớnh là :
- Biến kớ ức ( Memory Variable ): là biến do người dựng khai bỏo. Khi khụng muốn sử dụng biến này nữa thỡ nờn giải phúng chỳng cho đỡ tốn bộ nhớ .
- Biến hệ thống: là biến do Visual Foxpro tạo ra ngay sau khi khởi động. Loại biến này cú thể bắt đầu bằng dấu gạch dưới ( _ ) và thường dựng trong việc in ấn. Trong khi VF đang hoạt động thỡ ta khụng thể giải phúng biến bộ nhớ được.
Vớ dụ : _pageno : là biến hệ thống cho biết số trang hiện hành
- Biến vựng: là tờn cỏc vựng trong CSDL và chỉ cú nghĩa khi bạn mở tập tin CSDL .
+/ Cỏch tạo biến: để tạo một biến và gỏn giỏ trị ban đầu cho biến đú ta cú thể sử dụng cõu lệnh STORE hay phộp toỏn =
Vớ dụ : STORE space(10) To thang: Lệnh này khai bỏo một biến cú tờn là thang và gỏn giỏ trị ban đầu cho nú là 10 khoảng trắng .
Lệnh STORE : dựng để đưa dữ liệu vào biến .
c. Cỏch sử dụng cỏc từ khoỏ Local, Private và Public
+/ Từ khoỏ Local :
Chức năng : dựng để tạo biến cục bộ . Cỳ phỏp : LOCAL Varlist .
í nghĩa cỏc thụng số :
Biến cục bộ chỉ cú thể được tạo và dựng trong cỏc chương trỡnh con và khụng thể truy xuất được ở cấp chương trỡnh cao hơn. Cỏc biến cục bộ sẽ bị huỷ khi cỏc thủ tục hay hàm chứa chỳng thực thi xong .
Cỏc biến cục bộ cú thể được truyền qua tham biến .
Ghi chỳ : ta khụng thể viết tắt từ LOCA vỡ sẽ trựng với từ LOCATE đều cú 4 kớ tự đầu tiờn giống nhau .
+/ Từ khoỏ Private :
Chức năng : dựng để che cỏc biến được chỉ ra . Cỳ phỏp : PRIVATE Varlist hay PRIVATE All Nếu sử dụng dạng 2 thỡ sẽ dấu tất cả cỏc biến .
Khi một chương trỡnh chứa từ khoỏ Private được thi hành xong thỡ tất cả cỏc biến được khai bỏo trong Private sẽ được khụi phục lại giỏ trị ban đầu trước khi bị giấu .
Private khụng tạo ra biến mới , nú chỉ đơn giản là dấu đi cỏc biến đó được khai bỏo ở chương trỡnh cấp cao hơn .
Ghi chỳ : Khi sử dụng từ khoỏ Private sẽ khụng làm ảnh hưởng đến giỏ trị cỏc biến được giấu .
+/ Từ khoỏ Public :
Chức năng : dựng để định nghĩa cỏc biến toàn cục, nghĩa là cỏc biến này cú thể truy xuất ở bất cứ đõu trong chương trỡnh .
Cỳ phỏp : PUBLIC <biến>
Ghi chỳ: Tất cả cỏc biến được khai bỏo trong cửa sổ lệnh đều là biến toàn cục .
d. Loại bỏ biến :
Tất cả cú thể sử dụng Replease để loại bỏ cỏc biến khụng cũn sử dụng. Cỳ phỏp: Replease <biến>
Vớ dụ: All like N ? ( Loại bỏ tất cả cỏc biến cú 2 kớ tự mà bắt đầu bằng N ) Replease Except S* ( loại bỏ tất cả cỏc biến ngoain trừ cỏc biến cú tờn bắt đầu bằng chữ S ).
Trờn đõy tụi đó giới thiệu một cỏch sơ lược nhất, khỏi quỏt nhất về ngụn ngữ lập trỡnh Visual Foxpro – ngụn ngữ dựng để viết chương trỡnh giao dịch xó. Để giới thiệu về ngụn ngữ này sẽ cũn rất nhiều điều nhưng vỡ đề tài khụng tập trung vào vấn đề này nhiều nờn xin được tạm dừng ở đõy.
II.Thiết kế CSDL hệ thống
1. Giới thiệu về một số file chương trỡnh cựng với hệ thống dữ liệu chớnh
a/ Cỏc file trong thư mục PRG/DATASYS
Thư mục này chứa cỏc loại file dạng DBF, cỏc file này chứa danh mục dữ liệu hệ thống như: loại vay, kiểu trả, lói suất,….
Tờn File Loại file Diễn giải
QL DBF Cấp quản lý
CBTD DBF Cỏn bộ tớn dụng CONST_TK DBF Hằng số tài khoản DAMBAO DBF Mó đảm bảo nợ vay
DATA_SYS DBF Cấu trỳc dữ liệu hệ thống DMTQ DBF Định mức tồn qũy
DONVI DBF Đơn vị tớnh DP DBF Mó địa phương EVAL_NT DBF Hạch toỏn ngoại tệ FONTFX DBF Font mỏy in FX
FONTLQ DBF Font mỏy in LQ-Roman FONTLQDR DBF Font mỏy in LQ-Draft GDMN00_0 DBF Menu tiền vay
GDMN00_1 DBF Menu tiền gửi khụng kỳ hạn GDMN00_2 DBF Menu tiền gửi cú kỳ hạn GDMN00_4 DBF Menu tiết kiệm kỳ phiếu GDMN00_5 DBF Menu ngoại tệ
GDMN00_B DBF Menu vóng lai
GDMN00_F DBF Menu giao dịch khỏc GROUP DBF Cỏc nhúm người sử dụng HACHTOAN DBF Hạch toỏn kế toỏn
HELPNHNO DBF Hướng dẫn
HT_TGTK DBF Hạch toỏn tiết kiệm & kỳ phiếu INSP DBF Mó in sổ phụ nội tệ
KETOAN DBF Danh sỏch kế toỏn KHTM DBF Ký hiệu tiền mặt KIEUTRA DBF Kiểu trả Nợ vay KIEUVAY DBF Cỏc kiểu vay KTDO DBF Kế toỏn đồ
LCT DBF Loại chứng từ
LOAIGB DBF Loại giấy bỏo liờn hàng LOAILH DBF Loại liờn hàng
LOAINT DBF Loại ngoại tệ
LOAITGTK DBF Loại tiền gửi TK+KP LOAITK DBF Loại tài khoản
LOAIVAY DBF Loại vay
LOAI_KH DBF Loại khỏch hàng
LSUAT DBF Mó lói suất tiền gửi – vay MADT DBF Mó đầu tư
MGD DBF Mó giao dịch NGANHKT DBF Ngành kinh tế
NGAYLE DBF Cỏc ngày lễ trong năm
NHNOMENU DBF Menu chớnh của chương trỡnh PLMD DBF Phõn loại mục đớch vay
PTVORG DBF Chuẩn phõn tớch vốn REFERGD DBF Tham chiếu giao dịch
REFERTK DBF Tham chiếu giao dịch tiết kiệm, KP RESONHNO DBF Resource (Color,help window ) RIGHTS DBF Cỏc quyền khụng được phộp SHLH DBF Số hiệu liờn hàng
TAP DBF Mó tập chứng từ TCTD DBF Mó tổ chức Tớn dụng THUPHI DBF Mó và cụng thức tớnh phớ TPKT DBF Thành phần kinh tế
USER DBF Danh sỏch người sử dụng
VARGD DBF Biến giao dịch của từng SCREENS VARMCN DBF Biến chung của từng chi nhỏnh VONDIDEN DBF Vốn kế hoạch điều chuyển đi đến CNMENU4 DBF Menu cuối ngày của tiết kiệm+KP CDRG ORG File văn bản Cõn đối rỳt gọn
b/ Trường trong file hồ sơ khế ước(hsku.dbf)
- File này dựng lưu trữ toàn bộ số liệu về khế ước của chi nhỏnh. Mỗi khế ước là 1 bản ghi. Trong đú cần lưu ý một số trường sau:
+ TK_than: tài khoản cho vay trong hạn. + TK_qhan: tài khoản cho vay quỏ hạn.
+ TK_nokh: Tài khoản nợ khoanh.
+ TK_tlaith: Tài khoản thu lói trong hạn. + TK_tlaiqh: Tài khoản thu lói quỏ hạn. + TK_tlaink: Tài khoản thu lói nợ khoanh.
c/File hồ sơ cho vay (hscv.dbf)
- Lưu trữ toàn bộ số liệu được cập nhật gần nhất về việc cho vay thu nợ của tất cả cỏc khế ước. Mỗi khế ước được lưu trữ bởi một bản ghi. Trong đú, ta cần lưu ý một số trường:
+ GNGAN: Tổng giải ngõn của KU + CNQH: Tổng chuyển nợ quỏ hạn + TNTH: Tổng thu nợ trong hạn + TNQH: Tổng thu nợ quỏ hạn + DNTH: Tổng dư nợ trong hạn + DNQH: Tổng dư nợ quỏ hạn + DNKH: Tổng dư nợ khoanh
d/ File hồ sơ nội bảng (hsb3.dbf)
File này lưu trữ toàn bộ số liệu mới nhất của cỏc tài khoản nội bảng cú số dư hay cú phỏt sinh trong năm. Mỗi tài khoản được lưu bởi 1 bản ghi
Cần lưu ý một số trường sau :
- NAMNO : Tổng phỏt sinh Nợ trong năm tớnh đến ngày cập nhật - NAMCO : Tổng phỏt sinh Cú trong năm tớnh đến ngày cập nhật - QUYNO : Tổng phỏt sinh Nợ trong quý tớnh đến ngày cập nhật - QUYCO : Tổng phỏt sinh Cú trong quý tớnh đến ngày cập nhật
- THGCO : Tổng phỏt sinh Cú trong thỏng tớnh đến ngày cập nhật - THGNO : Tổng phỏt sinh Nợ trong thỏng tớnh đến ngày cập nhật - NGYNO : Tổng phỏt sinh Nợ trong ngày
e/File hồ sơ tiết kiệm (B3TK.dbf)
File này lưu trữ số liệu được cập nhật gần nhất của tất cả cỏc sổ tiết kiệm, mỗi sổ tiết kiệm là một bản ghi .
Trong file này cú một số trường cần lưu ý như sau :
- NGAY: thể hiện ngày cập nhật gần nhất của chương trỡnh tiết kiệm - BAN: số bàn tiết kiệm
- SOSO : số sổ tiết kiệm
- NGGUI: ngày gửi gần nhất của khỏch hàng gửi - NGDHAN: ngày đến hạn của sổ tiết kiệm - DU: số dư của sổ
f/Cỏc bảng chớnh của hệ thống :
Đối với chương trỡnh giao dịch xó , ta sẽ cú một số bảng chớnh như sau :
f.1/ Bảng lưu trữ liờn hàng :
DCLH
Tờn trường Kiểu dữ liệu Kớch thước Giải thớch
Thang int 0<thang<13 Thỏng nhập dữ liệu Nam int 10 Năm nhập dữ liệu SHNHA nvarchar 50 Số hiệu Ngõn hàng A NgayLT int 0<ngayLT<32 Ngày NH lưu trữ LoaiGB nvarchar 50 Loại giấy bỏo SoGB nvarchar 10 Số giấy bỏo Sotien long 50 Số tiền
f.2/Bảng bổ sung liờn Ngõn hàng :
BSLH
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch Ngay int 2 Ngày chuyển đổi LoaiGB nvarchar 50 Loại giấy bỏo SoGB nvarchar 10 Số giấy bỏo
SohieuNHA nvarchar 10 Số hiệu Ngõn hàng A TKKHA nvarchar 10 Tài khoản khỏch hàng A HT_KHA nvarchar 20 Họ và tờn KH A
DC_KHA nvarchar 50 Địa chỉ KH A SCMT_KHA char 20 Số CMT KH A SohieuNHB nvarchar 20 Số hiệu NHB
TKKHB nvarchar 20 Tài khoản khỏch hàng B HT_KHB nvarchar 10 Họ và tờn KH B
DC_KHB nvarchar 50 Địa chỉ KH B SCMT_KHB char 20 Số CMT KH B TenNHtra nvarchar 50 Tờn Ngõn hàng trả C Ngaycap date-time Ngày cấp
Sotien int 20 Số tiền
f.3/Bảng nhập lói suất và kỡ hạn (BTLTK):
Bảng BTLTK
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch laisuat float 10 Lói suất (%)
Kỡ hạn int 10 Kỡ hạn ( tớnh theo thỏng ) Tieude nvarchar 50 Tiờu đề
f.4/Bảng cỏ nhõn giao dịch với Ngõn hàng :
KHGD
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch
SoCMT char 20 Số chứng minh thư Ngaycap date and time 8 Ngày cấp CMT Noicap nvarchar 50 Nơi cấp CMT TenCMT nvarchar 20 Tờn trong CMT Namsinh date and time 8 Năm sinh Diachi nvarchar 50 Địa chỉ
f.5/Bảng chứng từ thanh toỏn bự trừ :
TTBT
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch PhGD int 10 Phiờn giao dịch NoCo true/fase 2 Nợ hoặc cú Ký hiệu true/fase 2 Đi hoặc về TK nvarchar 20 Tài khoản
f.6/Bảng thanh toỏn liờn Ngõn hàng :
TTLNH
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch NHA nvarchar 20 Ngõn hàng A Tkno nvarchar 20 Tài khoản nợ Tkco nvarchar 20 Tài khoản cú Sotien int 10 Số tiền ND nvarchar 50 Nội dung
f.7/Bảng kiểm tra chứng từ nội bảng chờnh lệch :
KTCTNB
Tờn trường Kiểu file Kớch thước Chỳ thớch Ngay int 2 1<=ngay<=31 Phien int 2 Phiờn giao dịch
TMT int 10 Tổng số mẫu tin ThuTM int 20 Thu tiền mặt ChiTM int 20 Chi tiền mặt Dsno int 20 Doanh số nợ Dsco int 20 Doanh số cú Chenh int 20 Chờnh lệch
f.8/Bảng kiểm tra chứng từ ngoại tệ :
KTNT
Tờn trường Kiểu dữ liệu Kớch thước Chỳ thớch Ngay int 2 Ngày kiểm tra Phien int 1 Phiờn giao dịch TMT int 10 Tổng số mẫu tin ThuTM int 10 Thu tiền mặt ChiTM int 10 Chi tiền mặt Dsno int 10 Doanh số nợ VNĐ Dsco int 10 Doanh số cú VNĐ Chenh1 int 10 Chờnh lệch
DsnoNT int 10 Doanh số nợ Ngoại tệ DscoNT int 10 Doanh số cú Ngoại tệ Chenh2 int 10 Chờnh lệch
III. Thiết kế dự ỏn (Project design):
Trong phần này tụi xin giới thiệu về một số form chương trỡnh giao dịch được thiết kế bởi cỏc cỏn bộ phũng Phần mềm, trung tõm Cụng nghệ thụng tin, Ngõn hàng chớnh sỏch xó hội Việt Nam.
1. Một số form chương trỡnh :
Ngõn hàng CSXH tỉnh Vỉnh Phỳc / Hội sở . ( Bàn số 1 ) Thứ bẩy Ngày 10 thỏng 5 năm 2008
Đầu ngày
Hệ thống Đăng kớ Giao dịch tại xó Cuối ngày Người sử dụng
Dữ liệu hệ thống Lập chỉ mục Đổi khoỏ sử dụng
Ra khỏi hệ thống
a/ Form lưư trữ liờn hàng :
c/ Form bảng kờ thu nợ tổ :
e/ Form bảng tớnh lói tài khoản :
h/ Form đăng kớ và kế hoạch :
k/ Form tài sản khỏch hàng :
m/ Form thanh toỏn bự trừ :
2.1/Thuật toỏn tớnh lói suất gửi tiết kiệm
n-1
CT : TL=TG*(LS+1) * LS n TT= TG*(LS+1)
Trong đú : TL : tiền lói của người gửi .
TG: số tiền gửi ban đầu của người LS : lói suất gửi tiết kiệm
n : số kỡ hạn gửi tiết kiệm
TT : tổng số tiền nhận lại sau khi gửi */ Thuật toỏn :
Procedure : TK // Nhập số tiền gửi
Read( TG) ;
// Nhập số kỡ hạn gửi tiết kiệm Read ( n ) ; // Tớnh lói suõt for i = 1 to n do { TL = TG * LS ; TG + = TL ; i ++ ; } Return ;