Sửa danh sách nhân viênBổ sung nhân viên Loại bỏ nhân viênCập nhật nhân viên Phân tích và thiết kế hệ thống thông tin quản lý tiền lơng 1.. -Từ các thông tin đầu ra trên, sau khi xác địn
Trang 1Sửa danh sách nhân viên
Bổ sung nhân viên Loại bỏ nhân viênCập nhật nhân viên
Phân tích và thiết kế hệ thống thông tin quản lý tiền lơng
1 Sơ đồ chức năng của hệ thống thông tin.
1
1
Trang 3B¶ng chÊm c«ng
B¶ng CC tæng hîp
3
3
Trang 4-II. ThiÕt kÕ C¬ së d÷ liÖu
1 ThiÕt kÕ c¬ së d÷ liÖu ®i tõ c¸c th«ng tin ®Çu ra.
Dùa vµo c¸c th«ng tin ®Çu ra: danh s¸ch nh©n viªn, danh s¸ch phßng ban, b¶ng chÊm c«ng, b¶ng thanh to¸n l¬ng cho nh©n viªn c¸c c«ng tr×nh, b¶ng thanh to¸n l¬ng hµnh chÝnh, danh s¸ch nép b¶o hiÓm x· héi… ta cã c¸c th«ng tin ®Çu ra sau:
§Þa ®iÓm phßng ban
§iÖn tho¹i phßng ban
Trang 5-Từ các thông tin đầu ra trên, sau khi xác định các thuộc tính lặp(R), loại
bỏ các thuộc tính thứ sinh (S) khỏi danh sách và thực hiện việc chuẩn hoá mức 1NF, 2NF, 3NF ta có các tệp sau:
Trang 7-− M· b¶o hiÓm
− TiÒn ¨n
7
7
Trang 8n viê n
Mã n hâ
n v iên Tên nh
ân viên Mã p hòn
g b anC hức vụ Ngà
y sin hG iới tín hTr
ình độ Quê qu
ánN gày và
o b iên ch ếHệ số lươ
ngH
ệ số ph
ụ c ấpS
ố h iệu khe
n th
ưởn gSố hi
ệu
kỷ luậ t
Bảo hiểmMã bảo hiểmBảo hiểm xã hộiBảo hiểm y tếNgày áp dụngNgày huỷ bỏ
Kỷ luật Số hiệu kỷ luậtHệ số kỷ luậtLý do kỷ luậtHình thức kỷ luậtNgày quyết định
Ngày côngThángMã nhân viênNgày công chính thứcNgày công thêm giờNgày công ca đêmư Ngày công nghỉ phépLương cơ bảnMã lương cơ bảnMức lương cơ bảnNgày thực hiệnNgày huỷ bỏ
Khen thưởngSố hiệu khen thưởngHệ số khen thưởngHình thức khen thưởngLý do khen thưởngNgày quyết định
Phòng banMã phòng banTên phòng banĐịa điểmư Điện thoại
Từ các danh sách trên ta có sơ đồ cấu trúc dữ liệu:
8
8
Trang 9-2 M« t¶ c¸c b¶ng.
2.1 B¶ng l¬ng nh©n viªn
Trang 10III Thiết kế chơng trình quản lý lơng
1 Ngôn ngữ thiết kế chơng trình.
Pascal là một ngữ lập trình cấp cao, các chơng trình có cấu trúc rõ ràng
và dễ hiểu Đợc dùng phổ biến ở nớc ta hiện nay trong công tác giảng dạy, lập trình tính toán, đồ hoạ, xử lý văn bản Với tiện ích của Pascal và sự hiểu biết của em qua chơng trình đào tạo của trờng và sự giúp đỡ hớng dẫn của thầy trởng khoa Hàn Viết Thuận.
Em đã vận dụng ngôn ngữ này để thiết kế chơng trình quản lý lơng Em
hy vọng rằng phần mềm này của em sẽ góp phần nâng cao hiệu quả quản lý tiền lơng trong các doanh nghiệp của nớc ta hiện nay.
2 Thiết kế menu của chơng trình.
a) Thực đơn trong chơng trình chính gồm các mục sau:
Bổ sung vào cuối danh sách.
Bổ sung vào vị trí bất kỳ.
Trang 111 Cap nhat danh sach nhan vien
2 Duyet danh sach
3 Bo sung vao cuoi danh sach
4 Bo sung vao vi tri bat ky
5 Loai bo nhan vien
6 Sua du lieu nhan vien
7 Ghi danh sach
8.Doc danh sach
9 Ket thuc cap nhat
+++++++++++++++++++++++++++++++++++++++++++++
c Thực đơn tìm kiếm.
Trang 12PHAN MEM QUAN LY LUONG
+++++++++++++++++++++++++++++++++++++++++++++ THUC DON CHUONG TRINH TIM KIEM
1.Tim kiem theo so thu tu
2.Tim kiem theo ma nhan vien
1 Bao cao chi tiet luong
2.Bao cao tong hop luong
3.Ket thuc
++++++++++++++++++++++++++++++++++++++++++++
Trang 134 Mét sè kÕt qu¶ ®Çu ra.
Trang 14|1 | HC | 05 | Hanh chinh | Hong Tham | Nhan vien | 577.76 |
| 2 | HC | 02 | Hanh Chinh | Han Dat | Pho Phong | 1122.09 |
|3 | TCCB | 01 | To chuc can bo | Le Tam | Truong Phong | 1148.37 |
| 4 | HC | 03 | Hanh Chinh | Minh Thu | Truong Phong | 1197.32 |
| 5 | GD | 04 | Ban lanh dao | Hong Giang | Giam doc | 1276.43 | -
Trang 16b:=readkey;write('*');
c:=readkey;write('*');
until (a='t') and (b='h') and (c='u');
gotoxy(6,8); writeln('Ban da nhap dung mat khau'); matkhau:=true;
readln;
end;
(*////////////////////////////////////////////////*) (*Thu tuc tao danh sach*)
procedure taods(var Pdau:Pbang_luong);
Trang 19gotoxy(25,dong); writeln(p^.NC);
gotoxy(27,dong );writeln('|');
gotoxy(28,dong);writeLN(p^.tongl:8:2); gotoxy(36,dong );writeln('|');
gotoxy(37,dong); writeLN(P^.BHXH:5:2); gotoxy(42,dong );writeln('|');
gotoxy(43,dong); writeln(p^.lamthem:5:2); gotoxy(48,dong ); writeln('|');
gotoxy(49,dong); write(p^.PC:5:2);
gotoxy(54,dong ); writeln('|');
gotoxy(55,dong); writeln(p^.TH:5:2); gotoxy(60,dong ); writeln('|');
gotoxy(61,dong);writeln(p^.Ph:5:2);
gotoxy(66,dong ); writeln('|');
gotoxy(67,dong);writeLN(p^.TA);
gotoxy(70,dong ); writeln('|');
Trang 20gotoxy(10,34);Writeln('An phim bat ky de ket thuc xem'); readln;
end;
(*///////////////////////////////////////////////*) (**Thu tuc in**)
Trang 21gotoxy(80,8);write('|');
gotoxy(1,9); Write(' -'); dong:=10;
end;
(*//////////////////////////////////////////////////*) (*Thu tuc in bang luong tong hop*)
Trang 22end;
(*///////////////////////////////////////////*)
(**Chuc nang tim dia chi ban ghi**)
Trang 23function dc(p:pbang_luong;stt:integer):pbang_luong; var
Trang 24gotoxy(25,dong); writeln(p^.NC);
gotoxy(27,dong );writeln('|');
gotoxy(28,dong); writeLN(p^.tongl:8:2); gotoxy(36,dong );writeln('|');
gotoxy(37,dong); writeLN(p^.BHXH:5:2); gotoxy(42,dong );writeln('|');
gotoxy(43,dong); writeln(p^.lamthem:5:2); gotoxy(48,dong );writeln('|');
Trang 25gotoxy(3,dong);writeln(' -‘) end
gotoxy(20,3); writeln(' -THONG TIN VE NHAN VIEN
DANG TIM VA SUA -');
Trang 27gotoxy(20,3); writeln(' -THONG TIN VE NHAN VIEN
SAU KHI SUA -');
gotoxy(3,6); writeln(' -'); gotoxy(4,8 );write('|');
Trang 29while(p<>nil) and(not timthay) do
if p^.manv=maso then timthay:=true
procedure chenthem(var pdau:pbang_luong;k:integer); var
Trang 32gotoxy(20,8);writeln('THUC DON CHUONG TRINH CAP NHAT '); gotoxy(20,12);writeln('1.Cap nhat danh sach nhan vien'); gotoxy(20,14); writeln('2.Duyet danh sach ');
gotoxy(20,16); Writeln('3.Bo sung vao cuoi danh sach'); gotoxy(20,18); writeln('4.Bo sung vao vi tri bat ky'); gotoxy(20,20); writeln('5.Loai bo nhan vien');
gotoxy(20,22); writeln('6.Sua du lieu nhan vien');
gotoxy(20,24); writeln('7.Ghi danh sach');
gotoxy(20,26); writeln('8.Doc danh sach')
gotoxy(20,28); writeln('9.Ket thuc cap nhat');
gotoxy(15,30); writeln('+++++++++++++++ ++++++++++++++++++++++' );
gotoxy(20,32); Writeln('Hay chon mot chuc nang de cap
nhat:');
gotoxy(60,32); Readln(chon);
Case chon of
Trang 33gotoxy(20,12);writeln('THUC DON CHUONG
TRINH TIM KIEM '); gotoxy(20,15);writeln(' 1.Tim kiem theo
so thu tu');
gotoxy(20,17);writeln(' 2.Tim kiem theo
ma nhan vien');
Trang 34gotoxy(20,19);Writeln(' 3.Ket thuc'); gotoxy(15,22);writeln('++++++++++++++++ +++++++++++++' );
gotoxy(20,25);Writeln(' phuong an toi lua chon la :'); gotoxy(48,25);readln(chon);
Trang 36gotoxy(20,12); writeln('THUC DON CHUONG TRINH BAO
CAO ');
gotoxy(20,16);writeln('1 Bao cao chi tiet luong'); gotoxy(20,18);writeln('2.Bao cao tong hop luong'); gotoxy(20,20);writeln('3.Ket thuc');
gotoxy(15,22);writeln('+++++++++++++++++++++++' ); gotoxy(20,25);Writeln('Phuong an toi lua chon la :'); gotoxy(52,25); readln(chon);
LY LUONG');
gotoxy(24,15); writeln('1.Thuc Don Cap Nhat');
gotoxy(24,17); writeln('2.Tim Kiem');
gotoxy(24,19); Writeln('3 Bao Cao');
Trang 38Kết luận.
Từ thực tế cho thấy tiền lơng lao động biểu hiện rõ ràng nhất lợi ích kinh
tế của ngời lao động, trở thành đòn bẩy kinh tế mạnh mẽ nhất để kích thích ngời lao động do đó công việc tính lơng trong cho ngời lao động là rất quan trọng và tr-
ớc sự mong muốn của bộ phận tính lơng nên em đã thực hiện đề tài:”Chơng trình
hỗ trợ hệ thống tính lơng theo thời gian” Với mục đích: giảm bớt đợc khối lợng nhân sự cũng nh khối lợng công việc thủ công trong quản lý lơng và tiền lơng, việc lu trữ dữ liệu không còn cồng khềnh nh trớc nữa cũng nh việc tính toán đợc chính xác và kịp thời hơn.
Với sự hớng dẫn nhiệt tình của PGS.TS Hàn Viết Thuận và qua nghiên cứu tài liệu em đã cố gắng nghiên cứu đề tài này với một số giải pháp và chức năng sau:
Chơng trình đã căn bản xây dựng đợc việc tính lơng cho nhân viên.
Tự động hoá các khâu cập nhật, lu trữ, xử lý thông tin, và lên báo cáo
về lơng.
Chơng trình đã phần nào khắc phục đợc những nhợc điểm về thực hiện tự
động hoá phần dữ liệu đầu vào, đầu ra cũng nh việc tính toán lơng Song do thời gian hạn chế và khả năng của em còn nhiều thiếu sót nên hệ thống cha thực sự đ-
ợc hoàn chỉnh Em mong đợc sự chỉ bảo và đóng góp của thầy cô và các bạn để hệ thống hoàn chỉnh hơn
Em xin chân thành cảm ơn PGS.TS Hàn Viết Thuận, ngời đã nhiệt tình chỉ bảo và dẫn dắt cụ thể cho em trong quá trình làm đề tài này và em hi vọng đợc thầy hớng dẫn trong những đề tài sau này