CHƯƠNG VI CƠ SỞ DỮ LIỆU VÀ CHI TIẾT CHƯƠNG TRÌNH
6.4. THIẾT KẾ CÁC FORM XEM DỮ LIỆU
Menu màn hình xem danh sách các đối tượng liên quan với nhau. Menu màn hình này chỉ có tác dụng cho xem, tìm kiếm với các bảng dữ liệu. Không có chức năng thêm, xóa, sửa, hiệu chỉnh trong các form của menu này.
6.4.1. Form ĐƠN VỊ THI CễNG - PHềNG BAN:
Màn hình gồm những trường dữ liệu của 2 bảng DONVITHICONG (Mã đơn vị thi công, tên đơn vị thi công, địa chỉ, điện thoại) và PHONGBAN (Mã phòng ban, tên phòng ban, điện thoại) trong đó DONVITHICONG là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 đơn vị thi công là danh sách các phòng ban mà đơn vị đó trực thuộc.
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng DONVITHICONG, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4
command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo
Button "Thoát" dùng để thoát khỏi màn hình danh sách đơn vị thi công phòng ban trở về menu chính của chương trình.
Source code
Trở về mẩu tin đầu tiên:
Begin
first_record;
End
Trở về mẩu tin trước mẩu tin hiện thời:
Begin
previous_record;
End
Đến mẩu tin sau mẩu tin hiện thời:
Begin
next_record;
End
Đến mẩu tin cuối cùng:
Begin
last_record;
End
Xuất dữ liệu:
execute_query Tìm kiếm:
DECLARE R CHAR;
R1 NUMBER;
BEGIN
IF :System.Mode = 'NORMAL' THEN DO_KEY('enter_query');
ELSE
DO_KEY('execute_query');
R := GET_BLOCK_PROPERTY(:SYSTEM.CURRENT_BLOCK, QUERY_HITS);
IF TO_NUMBER(R) > 0 THEN ON_ITEM('TIM_KIEM');
ON_ITEM('XOA');
ELSE
R1 := THONGBAO('ALERT2', 'Khong tim thay mau tin co Ma so '||:DONVITHICONG.MA_DVTC||'.'||Chr(13)||'Mau tin ban dau se tra ve !');
CLEAR_RECORD;
DO_KEY('execute_query');
END IF;
END IF;
END;
Thoát:
EXIT_FORM(NO_COMMIT)
6.4.2. Form PHềNG BAN - NHÂN VIấN:
Màn hình gồm những trường dữ liệu của 2 bảng PHONGBAN (mã phòng ban, mã đơn vị thi công, tên phòng ban, điện thoại) và NHANVIEN (mã nhân viên, tên nhân viên, chức vụ, địa chỉ, điện thoại) trong đó PHONGBAN là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 phòng ban là danh sách các nhân viên trực thuộc.
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng PHONGBAN, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4 command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo không tìm thấy.
Button "Thoát" dùng để thoát khỏi màn hình danh sách phòng ban nhân viên trở về menu chính của chương trình.
6.4.2. Form ĐƠN VỊ THI CễNG - PHềNG BAN - NHÂN VIấN:
Màn hình gồm những trường dữ liệu của 3 bảng DONVITHICONG (Mã đơn vị thi công, tên đơn vị thi công, địa chỉ, điện thoại), PHONGBAN (mã phòng ban, tên phòng ban, điện thoại) và NHANVIEN (mã nhân viên, tên nhân viên, chức vụ, địa chỉ, điện thoại) trong đó DONVITHICONG là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 đơn vị thi công là danh sách các phòng ban mà đơn vị đó trực thuộc và phía dưới là danh sách các nhân viên làm việc cho phòng ban đó (khi ta "click" vào một trường bất kỳ của 1 mẩu tin nào trong bảng PHONGBAN nếu nó thuộc phòng ban nào thì nó sẽ hiển thị danh sách nhân viên làm việc cho phòng ban đó).
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng DONVITHICONG, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4
command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo không tìm thấy.
Button "Thoát" dùng để thoát khỏi màn hình danh sách đơn vị thi công phòng ban nhân viên trở về menu chính của chương trình.
6.4.4. Form CÔNG VIỆC - NHÂN VIÊN:
Màn hình gồm những trường dữ liệu của 2 bảng NHANVIEN (mã nhân viên, tên nhân viên, chức vụ, địa chỉ, điện thoại) và CHITIETCONGVIEC (mã công việc, ngày làm việc, số ngày làm việc, giá trị, đơn vị tính) trong đó NHANVIEN là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 nhân viên là danh sách chi tiết công việc mà nhân viên đó thực hiện.
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng NHANVIEN, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4 command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo không tìm thấy.
Button "Thoát" dùng để thoát khỏi màn hình công việc nhân viên trở về menu chính của chương trình.
6.4.5. Form HẠNG MỤC - CÔNG VIỆC:
Màn hình gồm những trường dữ liệu của 2 bảng HANGMUC (mã chủ đầu tư, mã dự án, mã công việc, mã đơn vị thi công, số ngày dự kiến, số ngày thực tế, ngày bắt đầu dự kiến, ngày bắt đầu thực tế, ngày kết thúc dự kiến, ngày kết thúc thực tế, kinh phí dự kiến, kinh phí thực tế, đơn vị tính, độ ưu tiên, tỷ lệ hoàn thành) và CHITIETCONGVIEC (mã nhân viên, ngày làm việc, số ngày làm việc, giá trị, đơn vị tính) trong đó HANGMUC là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 hạng mục trong dự án là danh sách chi tiết công việc mà nhân viên đó thực hiện.
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng HANGMUC, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4 command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo không tìm thấy.
Button "Thoát" dùng để thoát khỏi màn hình hạng mục công việc trở về menu chính của chương trình.
6.4.6. Form BAN QUẢN LY - HểA ĐƠN:
Màn hình gồm những trường dữ liệu của 2 bảng BANQUANLY (mã ban quản lý, tên ban quản lý, điện thoại) và HOADON (mã hóa đơn, mã công việc, tiền thanh toán, tiền đã thu, tiền còn lại, đơn vị tính) trong đó BANQUANLY là chủ thể chính.
Màn hình cũng gồm 4 command button dùng di chuyển mẫu tin và 3 command button dùng để xuất dữ liệu, tìm kiếm, thoát. Trên màn hình ứng với tên 1 ban quản lý là các danh sách hóa đơn.
Button "Xuất dữ liệu" dùng để xuất lại dữ liệu sau khi tìm kiếm, có tác dụng như refresh lại dữ liệu.
Khi click vào buton "Tìm kiếm" ta có thể nhập vào các tham số cần tìm trên các trường của bảng BANQUANLY, nếu tìm thấy nó sẽ xuất dữ liệu (dùng 4 command button để di chuyển nếu có nhiều mẫu tin được tìm thấy), còn không tìm thấy nó sẽ hiện bảng thông báo không tìm thấy.
Button "Thoát" dùng để thoát khỏi màn hình ban quản lý hóa đơn trở về menu chính của chương trình.