(Luận văn TMU) phân tích, thiết kế hệ thống thông tin quản lý nhân sự tại công ty TNHH thép dongbang

LỜI CẢM ƠN Sau thời gian nghiên cứu thực khóa luận tốt nghiệp, em hoàn thành mục tiêu đặt Có kết trình phấn đấu nỗ lực thân, với động viên gia đình, bạn bè thầy Đó niềm khích lệ lớn giúp em hồn thành thật tốt khóa luận tốt nghiệp Em xin bày tỏ lòng cảm ơn sâu sắc đến T.S Nguyễn Thị Thu Thủy trực tiếp hướng dẫn, giúp đỡ tận tình cho em thời gian thực khóa luận tốt nghiệp Em xin chân thành cảm ơn giúp đỡ quý báu Ban giám đốc tồn thể nhân viên, phịng ban Công ty TNHH Thép DongBang cung cấp đầy đủ thông tin tạo điều kiện giúp đỡ em suốt thời gian thực tập Công ty để em nắm bắt kiến thức thực tế hồn thành khóa luận tốt nghiệp Em xin gửi lời tri ân tới Thầy cô giáo Trường Đại học Thương Mại, đặc biệt thầy cô giáo khoa Hệ thống thông tin kinh tế cho em có hội học tập tiếp thu kiến thức để em chuẩn bị tảng tốt cho công việc sau Mặc dù có nhiều cố gắng, song eo hẹp thời gian hạn chế kiến thức nên khóa luận khơng tránh khỏi thiếu sót Rất mong nhận đóng góp ý kiến, bảo Thầy giáo! Kính chúc Thầy ln mạnh khỏe, hạnh phúc! Em xin chân thành cảm ơn! Hà Nội, ngày 01 tháng 05 năm 2013 Sinh viên thực Đỗ Thị Ánh i LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com MỤC LỤC LỜI CẢM ƠN .i MỤC LỤC ii DANH MỤC TỪ VIẾT TẮT vi Chương 1: TỔNG QUAN VỀ PHÂN TÍCH THIẾT KẾ HỆ THỐNG THƠNG TIN QUẢN LÝ NHÂN SỰ TẠI CÔNG TY TNHH THÉP DONGBANG 1.1 Tầm quan trọng, ý nghĩa đề tài 1.2 Tổng quan vấn đề nghiên cứu 1.3 Mục tiêu đề tài .3 1.4 Đối tượng phạm vi nghiên cứu .4 1.5 Phương pháp thực đề tài .4 1.6 Kết cấu khóa luận Chương 2: CƠ SỞ LÝ LUẬN VÀ THỰC TRẠNG PHÂN TÍCH THIẾT KẾ HTTT QUẢN LÝ NHÂN SỰ TẠI CÔNG TY TNHH THÉP DONGBANG 2.1 Cơ sở lý luận 2.1.1 Một số khái niệm 2.1.3 UML công cụ phát triển hệ thống 12 2.2 Đánh giá, phân tích thực trạng HTTT quản lý nhân công ty TNHH Thép DongBang 13 2.2.1 Giới thiệu công ty TNHH Thép DongBang 13 2.2.1 Phân tích thực trạng hệ thống thơng tin quản lý nhân công ty TNHH 15 Thép DongBang 15 2.2.3 Đánh giá thực trạng hệ thống thông tin quản lý nhân công ty Thép DongBang 20 Chương 3: PHÂN TÍCH THIẾT KẾ HỆ THỐNG THÔNG TIN QUẢN LÝ NHÂN SỰ TẠI CÔNG TY TNHH THÉP DONGBANG .21 ii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 3.1 Chu trình nghiệp vụ quản lý nhân cơng ty TNHHThép DongBang 21 3.1.1 Chu trình nghiệp vụ quản lý nhân công ty TNHHThép DongBang 21 3.1.2 Yêu cầu phi chức 23 3.2 Phân tích hệ thống .24 3.2.1 Biểu đồ use case 24 3.2.2 Biểu đồ lớp 30 Phần 4: KẾT LUẬN CHUNG 47 4.1 Đánh giá khả ứng dụng hệ thống 47 4.2.Một số kiến nghị 47 KẾT LUẬN 48 TÀI LIỆU THAM KHẢO vii PHỤ LỤC viii iii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com DANH MỤC BẢNG BIỂU, SƠ ĐỒ HÌNH VẼ Bảng 2.1 Bảng so sánh đặc điểm phương pháp phân tích thiết kế hệ thống 11 Bảng 3.1 Bảng xác định tác nhân, UC đặc tả vắn tắt 26 Bảng 3.2 Bảng quan hệ kết hợp lớp thực thể 31 Biểu đồ 2.2 Mức độ hài lòng HTTT quản lý nhân TNHH Thép DongBang 17 Sơ đồ 2.1 Mơ hình hệ thống thông tin Sơ đồ 2.2 Sơ đồ HTTT doanh nghiệp Sơ đồ 2.3 Sơ đồ chức hệ thống thông tin 10 Sơ đồ 2.5 Sơ đồ tổ chức công ty TNHH Thép DongBang .14 Thép DongBang 15 Bảng 2.2 Cơ cấu nhân thức cơng ty 16 Hình 3.1 Mơ hình Use Case tổng qt 26 Hình 3.2 Mơ hình Use Case mức đỉnh tác nhân Nhân viên kế tốn 26 Hình 3.3 Mơ hình Use Case mức đỉnh tác nhân nhân viên 26 Hình 3.4 Mơ hình Use Case mức đỉnh tác nhân Nhân viên nhân 27 Hình 3.5 Mơ hình Use Case mức đỉnh tác nhân ban lãnh đạo 27 Hình 3.6 Biểu đồ UC cập nhật hồ sơ nhân viên 28 Hình 3.7 Biểu đồ UC quản lý hợp đồng lao động .28 Hình 3.8 Biểu đồ UC quản lý q trình cơng tác 28 Hình 3.9 Biểu đồ UC quản lý trình đào tạo 29 Hình 3.10 Biểu đồ UC quản lý khen thưởng – kỷ luật .29 Hình 3.11 Biểu đồ UC quản lý lương 29 Hình 3.12 Biểu đồ lớp quản lý hồ sơ nhân viên 31 Hình 3.13 Biểu đồ lớp quản lý hợp đồng lao động 31 Hình 3.14 Biểu đồ lớp quản lý khen thưởng kỷ luật 32 Hình 3.15 Biểu đồ lớp quản lý trình đào tạo 32 Hình 3.16 Biểu đồ lớp quản lý q trình cơng tác 33 Hình 3.17 Biểu đồ lớp quản lý lương 33 Hình 3.18 Biểu đồ chức “Quản lý hồ sơ nhân viên” 34 Hình 3.19 Biểu đồ chức “Quản lý q trình cơng tác” 35 Hình 3.20 Biểu đồ chức “Quản lý trình đào tạo” 36 Hình 3.21 Biểu đồ chức “Quản lý trình khen thưởng kỷ luật” 37 Hình 3.22 Biểu đồ chức “Cập nhật bảng lương” 38 iv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Hình 3.23 Sơ đồ hoạt động quản lý hồ sơ nhân viên 39 Hình 3.24 Sơ đồ hoạt động quản lý khen thưởng kỷ luật 39 Hình 3.25 Sơ đồ hoạt động quản lý Hợp đồng lao động .40 Hình 3.26 Sơ đồ hoạt động quản lý trình cơng tác 41 Hình 3.27 Sơ đồ hoạt động quản lý trình đào tạo 41 Hình 3.28 Sơ đồ hoạt động Cập nhật bảng lương .41 Hình 3.29 Biểu đồ liệu quan hệ 42 Hình 3.30 Form “Giao diện chính” .43 Hình 3.31 Form “ quản lý hồ sơ nhân viên” .43 Hình 3.32 Form “ Cập nhật phịng ban” 44 Hình 3.33 Form “Cập nhật trình khen thưởng kỷ luật” 44 Hình 3.34 Form “Cập nhật bảng lương” 45 Hình 3.35 Form “Xem thông tin nhân viên” 45 Hình 3.36 Form “Danh sách nhân viên theo phịng ban” 46 Hình 3.37 Form “Thống kê khen thưởng kỷ luật theo nhân viên” 46 Hình 3.38 Form “Tìm kiếm” 46 v LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com DANH MỤC TỪ VIẾT TẮT THUẬT NGỮ TIẾNG ANH NGHĨA TIẾNG VIỆT CNTT Công nghệ thông tin TNHH Trách nhiệm hữu hạn DSS Decision Support System Hệ thống trợ giúp định ESS Executive Support Sytem Hệ thống thông tin hỗ trợ điều hành HTTT Hệ thống thông tin KTKL Khen thưởng kỷ luật KWS KnowledgeWork HTTT quản lý tri thức Systems MIS Management Infomation Hệ thống thông tin quản lý System OAS Officer Automation HTTT tự động hóa văn phịng System PMQLNS TPS Phần mềm quản lý nhân Transaction Processing HTTT xử lý giao dịch System UC Use case UML Unified Ca sử dụng Modelling Ngơn ngữ mơ hình hóa tổng qt hệ Language thống hướng đối tượng vi LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Chương 1: TỔNG QUAN VỀ PHÂN TÍCH THIẾT KẾ HỆ THỐNG THÔNG TIN QUẢN LÝ NHÂN SỰ TẠI CÔNG TY TNHH THÉP DONGBANG 1.1 Tầm quan trọng, ý nghĩa đề tài Việt Nam bước vào thiên niên kỷ mới, kỷ nguyên khoa học công nghệ, kỷ nguyên thông tin Cùng với phát triển nhanh chóng xã hội ngày nay, thơng tin xem nguồn tài nguyên vô quan trọng tổ chức doanh nghiệp Kế hoạch hoạt động tốt việc quản lý điều hành có hiệu thơng qua định đắn phải dựa vào nguồn thông tin thường xuyên cập nhật có chất lượng cao Với yêu cầu thông tin làm phát sinh nhu cầu người lãnh đạo, quản lý thay đổi cách thức làm việc tiếp nhận thành viên đội ngũ quản lý xử lý thơng tin - hệ thống thơng tin – hệ thống quản lý thông tin, liệu dựa vào máy tính Hệ thống thơng tin phương tiện quan trọng để cung cấp thông tin cần thiết cho tổ chức hoạt động Như vậy, việc xây dựng hệ thống thông tin giúp cho việc tự động hóa cơng tác quản lý nhu cầu thiết yếu doanh nghiệp Ứng dụng hệ thống thông tin quản lý trở nên phổ biến nước ta Rất nhiều tổ chức doanh nghiệp có ứng dụng hệ thống thơng tin vào công việc khác như: quản lý công văn – đến; quản lý tài liệu – hồ sơ; quản lý tài – kế tốn; quản lý nhân lực; quản lý khách hàng; quản lý tài sản Trong đó, hệ thống thơng tin quản lý nhân tất doanh nghiệp thuộc thành phần kinh tế quan tâm, ý đến Hệ thống thông tin quản lý nhân doanh nghiệp hệ thống phản ánh toàn diện tiềm trí lực, thể lực lao động, bao gồm: số lượng, chất lượng thời điểm: khứ, dự kiến tương lai Vì vậy, cơng tác quản lý nhân phải tiến hành thường xuyên, cung cấp kịp thời, đầy đủ thông tin theo yêu cầu quản lý cấp nhằm hồn thành tốt kế hoạch nhiệm vụ cơng ty giai đoạn Trong thời gian thực tập công ty TNHH Thép DongBang, em nhận thấy cần thiết phải xây dựng hệ thống thông tin quản lý nhân thay cho hệ thống khơng cịn đáp ứng nhu cầu quản lý nhân công ty Tuy thị trường có nhiều phần mềm quản lý nhân phần mềm sản xuất chào bán chung cho phần đông quan tổ chức LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com nên không sát với yêu cầu quản lý cụ thể doanh nghiệp Chính em định lựa chọn đề tài “Phân tích, thiết kế hệ thống thơng tin quản lý nhân Công ty TNHH Thép DongBang” nhằm giúp cơng tác quản lý nhân nhanh chóng, tiện lợi, giảm thiểu sức người, sức của, góp phần nâng cao hiệu hoạt động kinh doanh công ty TNHH Thép DongBang 1.2 Tổng quan vấn đề nghiên cứu Công tác quản lý nhân doanh nghiệp vấn đề có vai trị vơ quan trọng hoạt động sản xuất kinh doanh doanh nghiệp Do nhận thấy tầm quan trọng cơng tác quản lý nhân nên có nhiều cơng trình nghiên cứu tới vấn đề Sau số cơng trình nghiên cứu liên quan: Luận văn tốt nghiệp: “Thiết kế phần mềm quản lý nhân mỏ than Cọc Sáu”, Vũ Anh Quyết - lớp Tin 44C - Khoa Quản trị hệ thống thông tin kinh tế, Đại học Kinh tế quốc dân Luận văn tốt nghiệp tác giả Vũ Anh Quyết làm rõ số lý thuyết phương pháp phát triển hệ thống thông tin quản lý quy trình phân tích thiết kế hệ thống hướng cấu trúc Luận văn hồn thành bước phân tích thiết hệ thống thông tin xây dựng mã chương trình Chun đề tốt nghiệp: “Xây dựng hệ thống thơng tin quản lý nhân cho Ủy ban nhân dân huyện Lý Nhân”, Lê Thị Thúy Quỳnh – lớp CNTTK1- Đại học công nghệ thông tin truyền thông Chuyên đề tốt nghiệp tác giả Lê Thị Thúy Quỳnh đưa lý thuyết xây dựng hệ thống thơng tin, từ đó, tiến hành bước phân tích thiết kế hệ thống Hệ thống thơng tin quản lý nhân xây dựng đáp ứng số yêu cầu hệ thống dừng lại bước thiết kế giao diện cho hệ thống Hai hệ thống đáp ứng nhu cầu doanh nghiệp xây dựng theo hướng cấu trúc nên có số nhược điểm như: + Mơ hình xây dựng theo cách tiếp cận không mô tả đầy đủ trung thực hệ thống thực tế + Không hỗ trợ sử dụng lại: chương trình phụ thuộc chặt chẽ vào cấu trúc liệu tốn cụ thể, khơng thể dùng lại modul hệ thống cho hệ thống với yêu cầu liệu khác LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com + Có hàm truy cập thay đổi liệu chung dẫn đến khó kiểm sốt Nếu thay đổi cấu trúc liệu dùng chung cho số hàm phải thay đổi hàm liên quan liệu Đề tài “Phân tích thiết kế hệ thống thơng tin quản lý nhân công ty TNHH Thép DongBang” trình bày khóa luận tốt nghiệp tiến hành xây dựng theo phương pháp hướng đối tượng sử dụng ngơn ngữ mơ hình hóa tổng qt hệ thống hướng đối tượng – UML Do hệ thống phân tích thiết kế theo hướng đối tượng nên có nhiều ưu điểm dễ nâng cấp liệu hàm bổ sung vào đối tượng dễ dàng hệ thống mở rộng Chương trình ngắn gọn loại bỏ đoạn chương trình lặp lại Hơn nữa, hệ thống thiết kế theo hướng đối tượng mô tả phản ánh trung thực đầy đủ hệ thống thực tế 1.3 Mục tiêu đề tài  Mục tiêu tổng quát Đề tài “Xây dựng hệ thống thông tin quản lý nhân công ty TNHH Thép DongBang” đề xuất cho doanh nghiệp với mục tiêu sau: - Trình bày khái niệm, lý thuyết hệ thống thông tin quản lý, phương pháp phân tích thiết kế hệ thống quy trình phân tích thiết kế hệ thống với UML Khảo sát đánh giá thực trạng công tác quản lý nhân cơng ty Từ đưa giải pháp tiến hành thiết kế, xây dựng hệ thống thông tin quản lý nhân phù hợp, giải tốn quản lý nhân cơng ty, giúp công ty đạt hiệu cao công tác quản lý lao động, quản lý công tác đào tạo, khen thưởng, kỷ luật, quản lý lương thưởng cho cán nhân viên  Mục tiêu cụ thể Mục tiêu khóa luận tốt nghiệp xây dựng demo số mã chương trình cho hệ thống thông tin quản lý nhân Trong đó, hệ thống thơng tin xây dựng phải đáp ứng số yêu cầu cụ thể sau: Đáp ứng đầy đủ nghiệp vụ quản lý nhân công ty Hệ thống dễ sử dụng, dễ bảo hành, bảo trì Hệ thống có khả mở rộng, tích hợp với hệ thống khác tương lai Dễ dàng xuất liệu đưa lên web Nâng cao tính bảo mật LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 1.4  Đối tượng phạm vi nghiên cứu Đối tượng nghiên cứu đề tài Đối tượng nghiên cứu đề tài công ty TNHH Thép DongBang với hoạt động quản lý nhân công ty  Phạm vi nghiên cứu đề tài Các lý thuyết thông tin, hệ thống thơng tin, phân tích thiết kế hệ thống thơng tin quản lý nhân quy trình phân tích thiết kế hệ thống hướng đối tượng với UML Lịch sử hình thành, cấu tổ chức, lĩnh vực kinh doanh, tình hình hoạt động kinh doanh từ năm 2010 - 2012 thực trạng công tác quản lý nhân sự, hệ thống thông tin quản lý nhân đơn vị nghiên cứu Các bước triển khai phân tích thiết kế hệ thống quản lý nhân cụ thể cho công tác quản lý nhân công ty TNHH Thép DongBang 1.5  Phương pháp thực đề tài Phương pháp thu thập tài liệu Đây phương pháp thu thập thông tin, liệu (sơ cấp thứ cấp) đối tượng cần tìm hiểu Từ nguồn tài liệu thu thập được, sử dụng phương pháp phân tích, xử lý tổng hợp số liệu khác ta tạo nguồn thơng tin xác cần thiết Thu thập tài liệu phương pháp tạo đầu vào cho q trình biến đổi liệu thành nguồn thơng tin hữu ích Sử dụng phương pháp thu thập tài liệu khóa luận tốt nghiệp nhằm thu thập liệu sơ cấp (bảng câu hỏi vấn) thứ cấp (các lý thuyết hệ thống thông tin quản lý phân tích thiết kế hệ thống, thơng tin website, nghiên cứu, tìm hiểu công ty TNHH Thép DongBang …) để làm nguồn tài liệu hữu ích cho q trình phân tích, xử lý sau Phương pháp thu thập tài liệu: + Gửi phiếu vấn: chuẩn bị câu hỏi vấn gửi tới phịng ban để tìm hiểu nội dung liên quan đến thực trạng hệ thống thông tin quản lý nhân nhu cầu xây dựng hệ thống thông tin quản lý nhân công ty + Quan sát trực tiếp sở hạ tầng, môi trường làm việc doanh nghiệp để nắm bắt nghiệp vụ quản lý nhân công ty… LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Private Sub cmdtimkiemttluong_Click(Index As Integer) XemThongTinBangLuong.Show End Sub Private Sub cmdThongTinNV_Click(Index As Integer) XemThongTinNVDangNhap.Show End Sub Private Sub cmdbaocaohethan_Click() ThongKeDanhSachNVSapHetHopDong.Show End Sub Private Sub cmdbaocaodsnhanvientheopb_Click() ThongKeDanhSachNVTheoPhongBan.Show End Sub Private Sub cmdbaocaodsktkl_Click() ThongKeDanhSachKTKLtheoNV.Show End Sub Private Sub cmdbaocaobangluongnv_Click() XemThongTinBangLuong.Show End Sub Private Sub cmdthoat_Click() Unload Me End Sub - Code form “Cập nhật trình khen thưởng kỷ luật” Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim ht As ADODB.Recordset Dim ld As ADODB.Recordset Private Sub cbonhanvien_Click() If Not rs.EOF Then rs.MoveFirst Dim tk As Integer tk = xxxi LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Do While tk = And Not rs.EOF If cbonhanvien.ItemData(cbonhanvien.ListIndex) = rs.Fields("MaNV") Then tk = End If rs.MoveNext Loop If rs.EOF Then rs.MoveLast Else rs.MovePrevious End If End Sub Private Sub cmdcuoi_Click() Adodc1.Recordset.MoveLast 'hien ten nv Dim i, tk As Integerz i=0 tk = Do While tk = If cbonhanvien.ItemData(i) = Adodc1.Recordset.Fields("MaNv") Then tk = End If i=i+1 Loop If tk = Then i=i-1 End If cbonhanvien.ListIndex = i 'hien hinh thuc ktkl Dim i2 As Integer xxxii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Dim tk2 As Integer i2 = tk2 = Do While tk2 = If cbohinhthuc.ItemData(i2) = Adodc1.Recordset.Fields("HTKTKL") Then tk2 = End If i2 = i2 + Loop If tk2 = Then i2 = i2 - End If cbohinhthuc.ListIndex = i2 'hien li ktkl Dim i3 As Integer Dim tk3 As Integer i3 = tk3 = Do While tk3 = If cbolido.ItemData(i3) = Adodc1.Recordset.Fields("TenLiDoKTKL") Then tk3 = End If i3 = i3 + Loop If tk3 = Then i3 = i3 - End If cbolido.ListIndex = i3 End Sub Private Sub cmddau_Click() xxxiii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Adodc1.Recordset.MoveFirst 'hien ten nv Dim i, tk As Integer i=0 tk = Do While tk = If cbonhanvien.ItemData(i) = Adodc1.Recordset.Fields("MaNv") Then tk = End If i=i+1 Loop If tk = Then i=i-1 End If cbonhanvien.ListIndex = i 'hien hinh thuc ktkl Dim i2 As Integer Dim tk2 As Integer i2 = tk2 = Do While tk2 = If cbohinhthuc.ItemData(i2) = Adodc1.Recordset.Fields("HTKTKL") Then tk2 = End If i2 = i2 + Loop If tk2 = Then i2 = i2 - End If cbohinhthuc.ListIndex = i2 'hien li ktkl xxxiv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Dim i3 As Integer Dim tk3 As Integer i3 = tk3 = Do While tk3 = If cbolido.ItemData(i3) = Adodc1.Recordset.Fields("TenLiDoKT") Then tk3 = End If i3 = i3 + Loop If tk3 = Then i3 = i3 - End If cbolido.ListIndex = i3 End Sub Private Sub cmdluu_Click() Adodc1.Recordset.Fields("MaNV") = cbonhanvien.ItemData(cbonhanvien.ListIndex) Adodc1.Recordset.Fields("TenLiDoKTKL") = cbolido.ItemData(cbolido.ListIndex) Adodc1.Recordset.Fields("HTKTKL") = cbohinhthuc.ItemData(cbohinhthuc.ListIndex) Adodc1.Recordset.Update End Sub Private Sub cmdthem_Click() Adodc1.Recordset.AddNew cbonhanvien.ListIndex = cbohinhthuc.ListIndex = cbolido.ListIndex = Adodc1.Recordset.Fields("MaNV") = cbonhanvien.ItemData(0) xxxv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Adodc1.Recordset.Fields("TenLiDoKTKL") = cbolido.ItemData(0) Adodc1.Recordset.Fields("HTKTKL") = cbolido.ItemData(0) txtngay = Date Adodc1.Recordset.Update cmddau.Enabled = True cmdcuoi.Enabled = True cmdluu.Enabled = True cmdxoa.Enabled = True End Sub Private Sub cmdthoat_Click() Unload Me End Sub Private Sub cmdxoa_Click() If Not Adodc1.Recordset.EOF Then Dim xacnhan xacnhan = MsgBox("Chac chan xoa khong?", vbInformation + vbYesNo, "Xac nhan") If xacnhan = vbYes Then Adodc1.Recordset.Delete End If End If End Sub Private Sub data_Click() 'hien ten nv Dim i, tk As Integer i=0 tk = Do While tk = xxxvi LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com If cbonhanvien.ItemData(i) = Adodc1.Recordset.Fields("MaNV") Then tk = End If i=i+1 Loop If tk = Then i=i-1 End If cbonhanvien.ListIndex = i 'hien hinh thuc ktkl Dim i2 As Integer Dim tk2 As Integer i2 = tk2 = Do While tk2 = If cbohinhthuc.ItemData(i2) = Adodc1.Recordset.Fields("HTKTKL") Then tk2 = End If i2 = i2 + Loop If tk2 = Then i2 = i2 - End If cbohinhthuc.ListIndex = i2 'hien li ktkl Dim i3 As Integer Dim tk3 As Integer i3 = tk3 = Do While tk3 = If cbolido.ItemData(i3) = Adodc1.Recordset.Fields("TenLiDoKT") Then xxxvii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com tk3 = End If i3 = i3 + Loop If tk3 = Then i3 = i3 - End If cbolido.ListIndex = i3 End Sub Private Sub Form_Load() Set conn = CreateObject("ADODB.Connection") conn.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & App.Path & "\QLNS.Mdb" conn.Open 'load ds nhan vien Set rs = CreateObject("ADODB.Recordset") rs.Open "select NV.MaNV,NV.HoTen,PB.TenPB from PHONGBAN PB,HoSoNV where NV.MaPB=PB.MaPB", conn, 3, If Not rs.EOF Then rs.MoveFirst End If Do While Not rs.EOF cbonhanvien.AddItem rs.Fields("HoTen") cbonhanvien.ItemData(cbonhanvien.NewIndex) = rs.Fields("MaNV") rs.MoveNext Loop Set txtphongban.DataSource = rs: txtphongban.DataField = "TenPB" Set txtmanv.DataSource = rs: txtmanv.DataField = "MaNV" 'load hinh thuc Set ht = CreateObject("ADODB.recordset") xxxviii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com ht.Open "HTKHKL", conn, 3, If Not ht.EOF Then ht.MoveFirst End If Do While Not ht.EOF cbohinhthuc.AddItem ht.Fields("HTKTKL") cbohinhthuc.ItemData(cbohinhthuc.NewIndex) = ht.Fields("MaHTKTKL") ht.MoveNext Loop 'load li Set ld = CreateObject("ADODB.recordset") ld.Open "LIDOKTKL", conn, 3, If Not ld.EOF Then ld.MoveFirst End If Do While Not ld.EOF cbolido.AddItem ld.Fields("TenLiDoKTKL") cbolido.ItemData(cbolido.NewIndex) = ld.Fields("MaLiDoKTKL") ld.MoveNext Loop Set txtngay.DataSource = Adodc1.Recordset: txtngay.DataField = "NgayKTKL" Set txtghichu.DataSource = Adodc1.Recordset: txtghichu.DataField = "GhiChu" If Not Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast 'hien ten nv Dim i, tk As Integer i=0 tk = Do While tk = xxxix LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com If cbonhanvien.ItemData(i) = Adodc1.Recordset.Fields("MaNv") Then tk = End If i=i+1 Loop If tk = Then i=i-1 End If cbonhanvien.ListIndex = i 'hien hinh thuc ktkl Dim i2 As Integer Dim tk2 As Integer i2 = tk2 = Do While tk2 = If cbohinhthuc.ItemData(i2) = Adodc1.Recordset.Fields("HTKTKL") Then tk2 = End If i2 = i2 + Loop If tk2 = Then i2 = i2 - End If cbohinhthuc.ListIndex = i2 'hien li kt Dim i3 As Integer Dim tk3 As Integer i3 = tk3 = Do While tk3 = If cbolido.ItemData(i3) = Adodc1.Recordset.Fields("TenLiDoKTKL") Then xl LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com tk3 = End If i3 = i3 + Loop If tk3 = Then i3 = i3 - End If cbolido.ListIndex = i3 Else ' neu khong co ban ghi nao data.Enabled = False cmddau.Enabled = False cmdcuoi.Enabled = False cmdxoa.Enabled = False cmdluu.Enabled = False End If End Sub - Code form “Cập nhật chức vụ” Private Sub cmdluu_Click() If Not Adodc1.Recordset.EOF Then Adodc1.Recordset.Update MsgBox " Luu cong" cmdthem.Enabled = True cmdxoa.Enabled = True If Adodc1.Recordset.EOF Then cmdxoa.Enabled = False cmdluu.Enabled = False Else Adodc1.Recordset.MoveFirst End If End If xli LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com End Sub Private Sub cmdthem_Click() Adodc1.Recordset.AddNew txtchucvu = " " Adodc1.Recordset.Update End Sub Private Sub cmdthoat_Click() Unload Me End Sub Private Sub cmdxoa_Click() If Not Adodc1.Recordset.EOF Then Dim xacnhan xacnhan = MsgBox("Chac chan xoa khong?", vbInformation + vbYesNo, "Xac nhan") If xacnhan = vbYes Then Adodc1.Recordset.Delete End If End If End Sub xlii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Phụ lục 4: Mẫu phiếu điều tra A THƠNG TIN CHUNG Thơng tin người điền phiếu - Họ tên: …………………………………………………………………… - Vị trí cơng tác …………………………………………………………… - Chức phịng ban cơng tác: ………………………………………………………………………………… ………………………………………………………………………………… ………………………………………………………………………………… ……………………………………… B KHÁI QUÁT TÌNH HÌNH QUẢN LÝ NHÂN SỰ CỦA CTY TNHH THÉP DONGBANG Cơ cấu nhân công ty - Tổng số nhân viên: Phòng ban quản lý hoạt động thông tin liên quan đến người lao động cơng ty? - Phịng: ………… Các nghiệp vụ quản lý nhân chủ yếu diễn công ty: ……………………………………………………………………………… ……………………………………………………………………………… ……………………………………………………………………………… ……………………………………………………………………………… …………………………… C TÌNH HÌNH HTTT QUẢN LÝ NHÂN SỰ CỦA TNHH THÉP DONGABNG Hệ thống thông tin quản lý nhân công ty sử dụng từ nào? xliii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Mức độ hài lịng hệ thống thơng tin quản lý nhân tại? ( ) Rất hài lòng ( ) Khá hài lịng ( ) Khơng hài lịng Đánh giá mức độ hài lòng chức quản lý hồ sơ nhân viên HTTT quản lý nhân tại? ( ) Rất hài lòng ( ) Khá hài lịng ( ) Khơng hài lịng Đánh giá mức độ hài lòng chức quản lý khen thưởng kỷ luật HTTT quản lý nhân tại? ( ) Rất hài lòng ( ) Khá hài lịng ( ) Khơng hài lịng Đánh giá mức độ hài lòng chức quản lý lương nhân viên HTTT quản lý nhân tại? ( ) Rất hài lòng ( ) Khá hài lòng ( ) Khơng hài lịng Đánh giá mức độ hài lòng chức thống kê báo cáo HTTT quản lý nhân tại? ( ) Rất hài lịng ( ) Khá hài lịng ( ) Khơng hài lòng Đánh giá nhu cầu xây dựng HTTT quản lý nhân cho CT TNHH Thép DongBang? ( ) Rất cần thiết ( ) Cần thiết xliv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com ( ) Không cần thiết Đề xuất yêu cầu chức cần thiết hệ thống thông tin quản lý nhân sự? [ ] Quản lý hồ sơ nhân viên [ ] Quản lý hợp đồng lao động [ ] Quản lý khen thưởng kỷ luật [ ] Quản lý q trình cơng tác [ ] Quản lý q trình đào tạo [ ] Quản lý lương nhân viên [ ] Thống kê báo cáo [ ] Khác……………………… xlv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com ... thiết kế hệ thống thông tin quản lý nhân công ty TNHH Thép DongBang Chương 2: Cơ sở lý luận thực trạng phân tích thiết kế hệ thống thơng tin quản lý nhân công ty TNHH Thép DongBang Chương 3: Phân. .. đề tài công ty TNHH Thép DongBang với hoạt động quản lý nhân công ty  Phạm vi nghiên cứu đề tài Các lý thuyết thông tin, hệ thống thông tin, phân tích thiết kế hệ thống thơng tin quản lý nhân. .. trạng hệ thống thông tin quản lý nhân công ty Thép DongBang - Thành tựu Nhìn chung, hệ thống thơng tin quản lý nhân đáp ứng yêu cầu công tác, nghiệp vụ quản lý nhân diễn công ty TNHH Thép DongBang