Đang tải... (xem toàn văn)
Vật tư là một vấn đề quyết định nên sự hình thành và phát triển của công ty. Nhận thấy tầm quan trọng và sự cần thiết phải có công tác quản lý vật tư trong bất cứ một doanh nghiệp nào cộng với lòng say mê muốn tìm hiểu về việc quản lý, nên sau quá trình thực tập tại công ty em đã quyết định chọn đề tài: “Phân tích và thiết kế hệ thống thông tin quản lý vật tư tại Công ty Cổ phần vật liệu và xây lắp Nghĩa Hưng” để làm báo cáo tốt nghiệp của mình. Đề tài của em gồm 3 chương:Chương 1: Tìm hiểu chung về đề tài và cơ sở thực tập.Chương 2: Cơ sở phương pháp luận và công cụ cần thiết để thực hiện đề tài.Chương 3: Phân tích thiết kế, cài đặt hệ thống thông tin quản lý vật tư tại công ty Cổ phần vật liệu và xây lắp Nghĩa Hưng.Trong quá trình thực hiện đề tài này, em đã nhận được sự quan tâm giúp đỡ của các thầy cô giáo trong Khoa hệ thống thông tin kinh tế, đặc biệt là sự giúp đỡ tận tình của thầy giáo hướng dẫn Trương Văn Tú; đồng thời em cũng nhận được sự quan tâm giúp đỡ tạo điều kiện của ban lãnh đạo, các cô chú trong phòng Điều hành sản xuất và tiêu thụ đã tạo điều kiện cho em được tiếp cận với thực tế, thu thập tài liệu...Do còn nhiều hạn chế về kiến thức và kinh nghiệm nên trong chuyên đề cũng khó tránh khỏi những khiếm khuyết, em mong được thầy giáo hướng dẫn chỉ bảo để bài của em được hoàn thiện hơn.Em xin chân thành cảm ơn
Chuyên đề thực tập Khoa tin học kinh tế MỤC LỤC 1.1.2. Cơ cấu tổ chức máy * Quy trình sản xuất: Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế DANH MỤC CÁC SƠ ĐỒ, BẢNG BIỂU, HÌNH VẼ 1.1.2. Cơ cấu tổ chức máy * Quy trình sản xuất: LỜI MỞ ĐẦU Vật tư vấn đề định nên hình thành phát triển công ty. Nhận thấy tầm quan trọng cần thiết phải có công tác quản lý vật tư doanh nghiệp cộng với lòng say mê muốn tìm hiểu việc quản lý, nên sau trình thực tập công ty em định chọn đề tài: “Phân tích thiết kế hệ thống thông tin quản lý vật tư Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng” để làm báo cáo tốt nghiệp mình. * Đề tài em gồm chương: Chương 1: Tìm hiểu chung đề tài sở thực tập. Chương 2: Cơ sở phương pháp luận công cụ cần thiết để thực đề tài. Chương 3: Phân tích thiết kế, cài đặt hệ thống thông tin quản lý vật tư công ty Cổ phần vật liệu xây lắp Nghĩa Hưng. Trong trình thực đề tài này, em nhận quan tâm giúp đỡ thầy cô giáo Khoa hệ thống thông tin kinh tế, đặc biệt giúp đỡ tận tình thầy giáo hướng dẫn Trương Văn Tú; đồng thời em nhận quan tâm giúp đỡ tạo điều kiện ban lãnh đạo, cô phòng Điều hành sản xuất tiêu thụ tạo điều kiện cho em tiếp cận với thực tế, thu thập tài liệu . Do nhiều hạn chế kiến thức kinh nghiệm nên chuyên đề khó tránh khỏi khiếm khuyết, em mong thầy giáo hướng dẫn bảo để em hoàn thiện hơn. Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế Em xin chân thành cảm ơn! Hà Nội, Ngày . tháng . năm 2014 Sinh viên thực Vũ Thị Mùi Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế CHƯƠNG 1: TÌM HIỂU CHUNG VỀ ĐỀ TÀI VÀ CƠ SỞ THỰC TẬP 1.1 Khái quát chung Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng 1.1.1 Quá trình hình thành phát triển - Công ty cổ phần vật liệu xây lắp Nghĩa Hưng tiền thân xí nghiệp gạch ngói Nghĩa Hưng thành lập từ năm 1972 đến năm 1993 UBND tỉnh Nam Hà QĐ 19/QĐ-UB ngày 01 / 03 / 2003 thành lập lại doanh nghiệp - đổi tên thành Xí nghiệp sản xuất vật liệu xây dựng Nghĩa Hưng. - Năm 1997 Xí nghiệp đầu tư mở rộng thêm dây chuyền sản xuất vật liệu xây dựng công nghệ Tuynel với công suất thiết kế 12-15 triệu viên sản phẩm / năm. Tháng năm 2003 thực theo QĐ 2251 / QĐ – UB ngày 25 / 08 / 2003 UBND Nam Định việc giao doanh nghiệp nhà nước cho tập thể người lao động đại hội cổ đông thành lập Công ty cổ phần vật liệu xây lắp Nghĩa Hưng. *Thông tin giao dịch: Tên công ty: Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng Tên giao dịch quốc tế: NH jont stock company Tên viết tắt: XNGN J.S.Co Trụ sở chính: Xã Nghĩa Đồng - Huyện Nghĩa Hưng-Tỉnh Nam Định Mã số thuế: 0600310123-1 Điện thoại: 03503.871.206 Fax: 03503.871.206 Tài khoản giao dịch: 510A 111206 Ngân hàng Nông nghiệp phát triển nông thôn * Tổng vốn điều lệ là: tỷ đồng * Chức năng, nhiệm vụ công ty là: - Chức năng: Sản xuất kinh doanh vật liệu xây dựng công nghệ lò nung Tuynel, kinh doanh vật liệu khác, xây lắp công trình cao tầng, công trình thủy lợi, giao thông vừa nhỏ vv . Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế - Nhiệm vụ: Công ty không ngừng đổi trang thiết bị máy móc, áp dụng kỹ thuật công nghệ vào trình sản xuất kinh doanh doanh nghiệp để tạo sản phẩm chất lượng với giá phù hợp thị trường chấp nhận, đồng thời có chiến lược khâu tiêu thụ để đẩy nhanh trình tiêu thụ sản phẩm nhằm mở rộng thị trường, gia tăng lợi nhuận. 1.1.2. Cơ cấu tổ chức máy Tổ chức máy quản lý Công ty thể hình sau: Ban Giám đốc Phòng kế toán Phòng kỹ Phòng kế hoạch vật tư thuật Phòng hành Sơ đồ 1.1: Cơ cấu tổ chức máy Chức nhiệm vụ phòng ban: * Ban Giám đốc: Là người đại diện cho pháp luật công ty, có lực tổ chức đạo tổ chức sản xuất kinh doanh. Được tín nghiệm thành viên người điều hành toàn hoạt động công ty. Giám đốc tổ chức quản lí, tổ chức công tác tài kế toán, kế hoạch sản xuất kinh doanh, ký kết hợp đồng kinh tế hợp đồng lao động. * Các phòng ban công ty: + Phòng kế toàn tài vụ: Có nhiệm vụ đạo tổ chức thực toàn công tác xí nghiêp là: Phân tích đánh giá tình hình hoạt động sản xuất kinh doanh doanh nghiệp, tính toán tổng hợp số liệu xác để phản ánh tình hình xí nghiệp. + Phòng kỹ thuật: lập kế hoạch phân tích vật tư, tiến độ sản xuất, kiểm tra kỹ thuật. Tiến hành nghiên cứu mẫu mã sản phẩm mới, tìm tòi sáng tạo cải tiến kỹ thuật đáp ứng nhu cầu thị trường. Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế + Phòng kế hoạch vật tư: tương ứng theo dõi vật tư, tình hình nhập, xuất vật tư. + Phòng tổ chức hành có chức tiếp nhận thông tin, có nhiệm vụ giúp giám đốc việc quản lý điều hành đơn vị. Có nhiệm vụ tuyển chọn cán công nhân viên, xếp nhân xếp công việc phòng ban xí nghiệp. + Phòng y tế: Khám chữa bệnh, theo dõi kinh tế tất nhân viên xí nghiệp. 1.1.3. Sản phẩm dịch vụ 1.1.3.1. Sản phẩm kinh doanh Công ty cổ phần vật liệu xây lắp Nghĩa Hưng chuyên sản xuất cung ứng loại gạch Tuynel, ngói, gạch bi sử dụng cho xây dựng: - Gạch rỗng lỗ - Gạch rỗng lỗ - Gạch rỗng lỗ - Gạch đặc - Gạch bi - Ngói đỏ - Ngói xi măng - Gạch men - Ngói đình chùa. 1.1.3.2. Dịch vụ Hàng năm công ty thực chương trình khuyến mại giảm giá, chiết khấu toán cho khách hàng mùa mưa để kích thích người tiêu dùng mua dự trữ. Từ công ty giảm lượng tồn kho giúp giảm chi phí lưu kho Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế 1.1.4. Đặc điểm sản xuất kinh doanh * Quy trình sản xuất: Sơ đồ 1.2: Quy trình sản xuất công ty 1.1.5 Tình hình hoạt động kinh doanh công ty Năm 2013 công ty trở thành Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng có nhiệm vụ phát triển mở rộng hơn, xây dựng thêm phân xưởng nợp PHI PRO XI MĂNG, Phân xưởng xây lắp, mở rộng thêm dây truyền sản xuất vật liệu xây dựng công nghệ Tuynel đưa công suất thiết kế từ 15 – 20 triệu viên sản phẩm / năm lên 35 – 37 triệu viên sản phẩm / năm. Hàng tháng, quý, năm công ty thực lập kế hoạch kinh doanh, kế hoạch tiêu thụ sản phẩm. Về công tác tài công ty hoạt động theo hình thức Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế hạch toán kinh doanh độc lập. 1.1.6 Quản lý vật tư công ty cổ phần vật liệu xây lắp Nghĩa Hưng 1.1.6.1 Khái niệm quản lý vật tư Quản lý nguyên vật liệu hoạt động liên quan tới việc quản lý dòng vật liệu vào, doanh nghiệp. Đó trình phân nhóm theo chức quản lý theo chu kỳ hoàn thiện dòng nguyên vật liệu, từ việc mua kiểm soát bên nguyên vật liệu sản xuất đến kế hoạch kiểm soát công việc trình lưu chuyển vật liệu đến công tác kho tàng vận chuyển phân phối thành phẩm. 1.1.6.2 Nhiệm vụ quản lý vật tư - Tính toán số lượng mua sắm dự trữ tối ưu (kế hoạch cần nguyên vật liêu). - Đưa phương án định phương án mua sắm kho tàng. - Đường vận chuyển định vận chuyển tối ưu. - Tổ chức công tác mua sắm bao gồm công tác từ khâu xác định bạn hàng, tổ chức nghiệp vụ đặt hàng, lựa chọn phương thức giao nhận, kiểm kê, toán. - Tổ chức hoạt động vận chuyển nguyên vật liệu bao gồm từ khâu lựa chọn định phương án vận chuyển: Bạn hàng vận chuyển đến kho doanh nghiệp thuê hay tự tổ chức vận chuyển phương tiện doanh nghiệp, bố trí tổ chức hệ thống kho tàng hợp lý (vận chuyển nội bộ). - Tổ chức cung ứng tổ chức quản trị nguyên vật liệu cấp phát kịp thời cho sản xuất. 1.1.6.3 Đánh giá, phê phán giải pháp nâng cao nghiệp vụ quản lý vật tư công ty a. Đánh giá, phê phán nghiệp vụ * Ưu điểm: Quy trình quản lý vật tư công ty tạm ổn, đảm bảo số lượng chất lượng cung cấp kịp thời cho sản xuất, kiểm soát chặt chẽ, hạn chế tượng mát vật tư. Hệ thống quản lý vật tư công ty vừa phải tiến hành theo dõi thường xuyên Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế việc thực kế hoạch, kết hợp với theo dõi nhu cầu vật tư phận sản xuất gửi tới, đồng thời phải theo dõi trình nhập, xuất, tồn kho cách thường xuyên, liên tục để đáp ứng nhu cầu sản xuất dự báo vật liệu không đủ để đáp ứng kế hoạch sản xuất cúng nhu cầu sản xuất, đồng thời lập báo cáo kịp thời cho phòng ban khác để có hướng giải quyết. * Hạn chế: Nhiều vấn đề chưa nêu rõ ràng nghiệp vụ dẫn đến phận gặp nhiều khó khăn nắm bắt công việc cần làm ảnh hưởng đáng kể đến việc sản xuất sản phẩm. Số lượng vật tư nhiều, chủng loại phong phú, quản lý không tốt, chặt chẽ dễ dẫn đến nhầm lẫn xuất, nhập vật tư thiết bị. Mỗi lần nhập hay xuất vật tư lại có hóa đơn lưu trữ, tính lần báo cáo tình hình xuất, nhập vật tư số lượng hóa đơn nhiều. Nếu kế toán hay người phụ trách giấy tờ sổ sách không cẩn thận dẫn đến việc làm thất thoát hóa đơn, từ làm ảnh hưởng đến hoạt động kinh doanh công ty. Ngoài ra, muốn tìm kiếm hóa đơn để kiểm tra sễ nhiều thời gian muốn tổng hợp báo cáo gặp nhiều khó khăn. *Giải pháp nâng cao nghiệp vụ Để nâng cao hiệu công tác quản lý, công ty cần ứng dụng tin học vào công tác quản lý vật tư để nâng cao chất lượng, hiệu công tác này. Vì công ty cần xây dựng hệ thống quản lý vật tư giúp cho việc quản lí dễ dàng, đơn giản hơn, tránh sai sót,tiết kiệm thời gian, nguồn nhân lực, tài chính…Phần mềm đòi hỏi phải có khả xử lý khối lượng liệu lớn, nhanh chóng, kịp thời. Hệ thống phải có khả theo dõi tình hình vật liệu cách tức thời, không theo định kỳ hàng tháng, hàng quý hay hàng năm. Ngoài ra, yêu cầu quan trọng phần mềm mẫu báo cáo cần phù hợp với yêu cầu quản lý công ty. Sinh Viên : Vũ Thị Mùi Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế 1.2. Tìm hiểu đề tài: 1.2.1 Tên đề tài: “Phân tích thiết kế hệ thống thông tin quản lý vật tư Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng”. 1.2.2 Lý chọn đề tài Công nghệ thông tin hiên áp dụng thành công với nhiều doanh nghiệp. Do vậy, Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng nơi em thực tập áp dụng công nghệ thông tin công việc quản lý mình. Tuy nhiên, hệ thống quản lý vật tư Công ty Cổ phần vật liệu xây lắp Nghĩa Hưng nhiều hạn chế, hiệu công việc chưa cao, dễ sai sót. Nhưng với chương trình quản lí thiết kế công việc đơn giản dễ làm tốn nguồn nhân lực hơn, việc sửa chữa sai sót dễ dàng hơn. Nhận thấy hoạt động quản lý vật tư nhiều bất cập, nên em muốn thực chương trình “Phân tích thiết kế hệ thống thông tin quản lý vật tư”. Dựa sở em thu công ty, em mong muốn hoàn thiện hơn, nhằm phát huy mặt tích cực như: độ xác cao, chủ động với yêu cầu cấp bách; khắc phục hạn chế như: tình trạng nhiều thời gian công sức việc cập nhập lưu trữ liệu. Sinh Viên : Vũ Thị Mùi 10 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế 3.7.7.3 Form báo cáo xuất kho Sinh Viên : Vũ Thị Mùi 61 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế KẾT LUẬN Việt Nam trình phát triển kinh tế, đặc biệt 10 năm trở lại ngành công nghệ thông tin góp phần quan trọng hoạt động tất lĩnh vực kinh tế, trị, văn hóa, xã hội…đặc biệt góp phần đáng kể vào trình thúc đẩy sản xuất tốc độ truyền nhận thông tin, công tác quản lý ngày gọn nhẹ tự động hóa nhiều khâu. Trong trình thực tập công ty, em thu nhận nhiều kiến thức thực tế bổ ích thử sức ứng dụng kiến thức học vào giải nhu cầu thực tế. Qua em nâng cao trình độ hiểu rõ cách thức ứng dụng vào thực tế để có sản phẩm có ích cho xã hội. Trong khoảng thời gian thực tập, với giúp đỡ cô công ty thông qua việc tìm hiểu thực tế công tác quản lý vật tư công ty, em tìm hiểu thấy vài nhược điểm cần khắc phục hệ thống cũ, từ xây dựng lên hệ thống phần đáp ứng nhu cầu công tác tổ chức hệ thống quản lý vật tư. Là người học khoa hệ thống thông tin quản lí, sinh viên nên chưa có nhiều kinh nghiệm. Em cố gắng sử dụng học kinh nhiệm rút từ thân để thực chương trình chưa hoàn thiện vào khía cạnh quản lý công tác quản lý nói chung. Do thời gian làm đề tài bị hạn chế nên nhiều thiếu sót không tránh khỏi thiếu sót. Em mong nhận đóng góp ý kiến thầy cô bạn bè để chương trình hoàn thiện hơn, quy mô lớn sát vào thực tế. Em xin chân thành cảm ơn! Hà Nội, Ngày, tháng, năm 2014 Sinh viên thực Vũ Thị Mùi Sinh Viên : Vũ Thị Mùi 62 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế TÀI LIỆU THAM KHẢO 1. Th.s Trịnh Hoài Sơn, Phát triển ứng dụng quản lý(2011), NXB Đại học kinh tế quốc dân. 2. Hệ thống thông tin quản lýTS. GCV. Trần Thị Song Minh, Hệ thống thông tin quản lý(2012), NXB Đại học kinh tế quốc dân. 3. Ths. Trần Công Uẩn, Cơ sở liệu(2005), NXB Đại học kinh tế quốc dân. 4. Nguyễn Văn Ba, Phân tích thiết kế hệ thống thông tin quản lí (2003). 5. Ths. Tạ Minh Châu, Lập trình visual basic 6.0(2010), NXB Lao động Hà Nội. 6. Đồ án tốt nghiệp “Phân tích thiết kế hệ thống thông tin quản lý vật tư”_ĐHQG TPHCM. 7. Đỗ Trung Tuấn; Cơ sở liệu; Nhà xuất Giáo dục(1998). 8. Phạm Hữu Khang (Chủ biên); Lập trình Windown forms(Tập 2); NXB Lao Động Xã Hội( 2006). 9. Phạm Hữu Khang (Chủ biên); Lập trình hướng đối tƣợng (tập 3); NXB Lao Động Xã Hội(2006). 10. Bách khoa toàn thư: vi.wikipedia.org . 11. Forum: congdongcviet.com. 12. Forum :caulacbovb.com. Sinh Viên : Vũ Thị Mùi 63 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế PHỤ LỤC 1. Code số form a. Form đăng nhập Private Sub cmdthoat_Click() End End Sub Private Sub cmddangnhap_Click() Dim tg As Integer Dim strSQL As String, rs As New ADODB.Recordset tg = If ConnectDB() = True Then strSQL = "SELECT Tendangnhap,Matkhau FROM Matkhau" rs.Open strSQL, cn rs.MoveFirst While Not rs.EOF If (txttendangnhap.Text = rs.Fields("Tendangnhap") And txtmatkhau.Text = rs.Fields("Matkhau")) Then MsgBox ("Ban Dang Nhap Thanh Cong"), vbOKOnly, "Thong Bao" MDIForm1.Enabled = True Unload Me tg = Exit Sub End If rs.MoveNext Sinh Viên : Vũ Thị Mùi 64 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế Wend If tg Then MsgBox ("Ban Hay Nhap Lai Ten Va Mat Khau"), vbOKOnly, "Thong bao !" Exit Sub End If End If End Sub Private Sub Form_Load() MDIForm1.Show MDIForm1.Enabled = False End Sub Private Sub txttendangnhap_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then If txttendangnhap.Text = "" Then txttendangnhap.SetFocus MsgBox ("Ban Hay Nhap Ten Truy Nhap"), vbOKOnly, "Luu Y" Else txtmatkhau.SetFocus End If End If End Sub Private Sub txtmatkhau_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Sinh Viên : Vũ Thị Mùi 65 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế If txtmatkhau.Text = "" Then txtmatkhau.SetFocus MsgBox ("Ban Hay Nhap Mat Khau"), vbOKOnly, "Luu Y" Else cmddangnhap.SetFocus End If End If End Sub b. Lập trình cập nhật bảng danh mục khách hàng Private Sub cmdChapnhan_Click() If Trim(txtMaKH) "" And Trim(txtTenKH) "" Then Connection ("QLVT.mdb") If Flag = "N" Then If SearchKey("tbKhachHang", "MaKH", Trim(txtMaKH)) Then MsgBox "Ma khach hang " & txtMaKH & " da ton tai! Vui long nhap ma khac!" CloseConn Else Call InsertDB("tbKhachHang", "MaKH,TenKH,DiaChi,SoDT", "'" & txtMaKH & "','" & txtTenKH & "','" & txtDiaChi & "','" & txtSoDT & "'") Sinh Viên : Vũ Thị Mùi 66 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế CloseConn Unload Me frmDmKH.FormatVSF End If End If If Flag = "E" Then If (txtMaKH Key1) And (SearchKey("tbKhachHang", "MaKH", Trim(txtMaKH))) Then MsgBox "Ma khach hang " & txtMaKH & " da ton tai! Vui long nhap ma khac!" CloseConn Else Call Updatedb("tbKhachHang", "MaKH='" & txtMaKH & "',TenKh='" & txtTenKH & "',DiaChi='" & txtDiaChi & "',SoDT='" & txtSoDT & "'", "MaKH='" & Key1 & "'") CloseConn Unload Me frmDmKH.FormatVSF End If Sinh Viên : Vũ Thị Mùi 67 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế End If Else MsgBox "Vui long nhap day du thong tin!" End If End Sub Private Sub cmdThoat_Click() Unload Me End Sub Private Sub Form_Load() Me.Top = (MDI.Height - Me.Height) / Me.Left = (MDI.Width - Me.Width) / If Flag = "N" Then Me.Caption = "Them danh muc khach hang" End If If Flag = "E" Then Me.Caption = "Sua danh muc khach hang" End If Sinh Viên : Vũ Thị Mùi 68 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế End Sub Private Sub Form_Unload(Cancel As Integer) frmDmKH.Enabled = True End Sub Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then SendKeys "{Tab}" KeyAscii = End If End Sub *Lập trình form MDI Private Sub mnuBCDSHH_Click() Dim rs As New ADODB.Recordset, strSQL As String Dim rsSV As New ADODB.Recordset Dim intSTT As Integer ConnectDB rs.Fields.Append "STT", adInteger rs.Fields.Append "MaVT", 200, 100 Sinh Viên : Vũ Thị Mùi 69 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế rs.Fields.Append "TenVT", 200, 100 rs.Fields.Append "Soluong", 200, 100 rs.Fields.Append "DVT", 200, 100 rs.Open strSQL = "SELECT * FROM VatTu " rsSV.Open strSQL, cn While Not rsSV.EOF intSTT = intSTT + rs.AddNew rs.Fields("STT") = intSTT rs.Fields("MaVT") = rsSV.Fields("MaVT") rs.Fields("TenVT") = rsSV.Fields("TenVT") rs.Fields("Soluong") = rsSV.Fields("Soluong") rs.Fields("DVT") = rsSV.Fields("DVT") rsSV.MoveNext Wend With DanhSachHangHoa.Sections("Section1").Controls .Item("txtSTT").DataField = rs("STT").Name Sinh Viên : Vũ Thị Mùi 70 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế .Item("MaVT").DataField = rs("MaVT").Name .Item("TenVT").DataField = rs("TenVT").Name .Item("txtSoluong").DataField = rs("Soluong").Name .Item("txtDVT").DataField = rs("DVT").Name End With Set DanhSachHangHoa.DataSource = rs DanhSachHangHoa.Show End Sub Private Sub mnuBCDSKH_Click() Dim rs As New ADODB.Recordset, strSQL As String Dim rsSV As New ADODB.Recordset Dim intSTT As Integer ConnectDB rs.Fields.Append "STT", adInteger rs.Fields.Append "TenKH", 200, 100 rs.Fields.Append "Diachi", 200, 100 rs.Fields.Append "Tel", 200, 100 rs.Fields.Append "Mail", 200, 100 Sinh Viên : Vũ Thị Mùi 71 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế rs.Open strSQL = "SELECT * FROM KhachHang " rsSV.Open strSQL, cn While Not rsSV.EOF intSTT = intSTT + rs.AddNew rs.Fields("STT") = intSTT rs.Fields("TenKH") = rsSV.Fields("TenKH") rs.Fields("Diachi") = rsSV.Fields("Diachi") rs.Fields("Tel") = rsSV.Fields("Tel") rs.Fields("Mail") = rsSV.Fields("Mail") rsSV.MoveNext Wend With DanhSachKhachHang.Sections("Section1").Controls .Item("txtSTT").DataField = rs("STT").Name .Item("txtTenKH").DataField = rs("TenKH").Name .Item("txtDiachi").DataField = rs("Diachi").Name .Item("txtTel").DataField = rs("Tel").Name Sinh Viên : Vũ Thị Mùi 72 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế .Item("txtMail").DataField = rs("Mail").Name End With Set DanhSachKhachHang.DataSource = rs DanhSachKhachHang.Show End Sub *Form Phiếu nhập Private Sub cmdin_Click() Dim rs As New ADODB.Recordset, strSQL As String Dim rsPNK As New ADODB.Recordset Dim tenlop As String Dim intSTT As Integer ConnectDB rs.Fields.Append "STT", adInteger rs.Fields.Append "NgayNhap", 200, 100 rs.Fields.Append "Nguoigiaohang", 200, 100 rs.Fields.Append "TenKho", 200, 100 rs.Fields.Append "TenVT", 200, 100 rs.Fields.Append "Soluong", 200, 100 Sinh Viên : Vũ Thị Mùi 73 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế rs.Fields.Append "Dongia", 200, 100 rs.Open strSQL = "SELECT PhieuNhapKho.NgayNhap,PhieuNhapKho.Nguoigiaohang,TenKho,TenVT,HoaDo n.Soluong,HoaDon.Dongia FROM HoaDon,Kho,PhieuNhapKho,VatTu WHERE SoPNK = '" & cbosophieu.Text & "' And PhieuNhapKho.MaKho = Kho.MaKho And PhieuNhapKho.MaHD = HoaDon.MaHD and Hoadon.MaVt = VatTu.MaVT" rsPNK.Open strSQL, cn While Not rsPNK.EOF intSTT = intSTT + rs.AddNew rs.Fields("STT") = intSTT rs.Fields("NgayNhap") = rsPNK.Fields("NgayNhap") rs.Fields("Nguoigiaohang") = rsPNK.Fields("Nguoigiaohang") rs.Fields("TenKho") = rsPNK.Fields("TenKho") rs.Fields("TenVT") = rsPNK.Fields("TenVT") rs.Fields("Soluong") = rsPNK.Fields("Soluong") rs.Fields("Dongia") = rsPNK.Fields("Dongia") rsPNK.MoveNext Wend Sinh Viên : Vũ Thị Mùi 74 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế With RpPhieuNhapKho.Sections("Section1").Controls .Item("txtSTT").DataField = rs("STT").Name .Item("txttenvt").DataField = rs("TenVT").Name .Item("txtsoluong").DataField = rs("Soluong").Name .Item("txtgiaban").DataField = rs("Dongia").Name End With RpPhieuNhapKho.Sections("Section4").Controls("Lbngay").Caption = rs.Fields("NgayNhap") RpPhieuNhapKho.Sections("Section4").Controls("LbNguoiGH").Caption = rs.Fields("Nguoigiaohang") RpPhieuNhapKho.Sections("Section4").Controls("LBKho").Caption = rs.Fields("TenKho") Set RpPhieuNhapKho.DataSource = rs RpPhieuNhapKho.Show End Sub. Sinh Viên : Vũ Thị Mùi 75 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế Cộng hòa xã hội chủ nghĩa Việt Nam Độc lập- Tự do- hạnh phúc *** XÁC NHẬN CỦA GIÁO VIÊN HƯỚNG DẪN Kính gửi: Khoa Tin Học Kinh Tế, Trường Đại học Kinh tế Quốc dân Họ tên GVHD:………………………………………………………………………. Đơn vị công tác: …………………………………………………………………… Xác nhận: Sinh viên:……………………………………………………………………………. Lớp:………………………………………………………………………………… Đã thực tập tốt nghiệp thời gian từ:………………………đến……………… Về tinh thần, ý thức, thái độ:………………………………………………………… ……………………………………………………………………………………… . Về trình độ, lực học tập nghiên cứu:…………………………………… . ……………………………………………………………………………………… Hà Nội, ngày….tháng…năm 2014 Giáo viên hướng dẫn (Họ tên, chữ ký) Sinh Viên : Vũ Thị Mùi 76 Lớp: TIKT13A.01 [...]... trình sẽ truy xuất và sử dụng Các đối tư ng của Ado là: Connection, command, recordset Sinh Viên : Vũ Thị Mùi 19 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế CHƯƠNG 3: PHÂN TÍCH HỆ THỐNG THÔNG TIN QUẢN LÝ VẬT TƯ TẠI CÔNG TY CỔ PHẦN VẬT LIỆU VÀ XÂY LẮP NGHĨA HƯNG 3.1 Các tài liệu sử dụng trong quản lý vật tư 3.1.1 Phiếu nhập kho Đơn vị: Công ty Cổ phần vật liệu và xây lắp Nghĩa Hưng Bộ phận:……... tả hệ thống logic rồi là đặc tả vật lý Pha thiết kế này gồm 2 pha nhỏ: thiết kế logic và thiết kế vật lý - Thiết kế logic: tập trung vào các khía cạnh nghiệp vụ của hệ thống thực vì vậy một vài phương pháp luận vòng đời còn gọi pha này là pha thiết kế nghiệp vụ - Thiết kế vật lý: là quá trình chuyển mô hình logic trừu tư ng thành bản thiết kế vật lý hay các đặc tả kỹ thuật Những phần khác nhau của hệ. .. dữ liệu ngữ cảnh của hệ thống quản lý vật tư Biểu đồ 3.5:Biểu đồ luồng dữ liệu ngữ cảnh của hệ thống quản lý vật tư Sinh Viên : Vũ Thị Mùi 30 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế 3.3.2.2 Biểu đồ luồng dữ liệu mức đỉnh của hệ thống quản lý vật tư Biểu đồ 3.6:Biểu đồ luồng dữ liệu mức đỉnh của hệ thống quản lý vật tư Sinh Viên : Vũ Thị Mùi 31 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin. .. Phân tích hệ thống xử lý 3.3.1 Sơ đồ phân cấp chức năng Sơ đồ 3.4: Sơ đồ phân cấp chức năng Sinh Viên : Vũ Thị Mùi 27 Lớp: TIKT13A.01 Chuyên đề thực tập Khoa tin học kinh tế Mô tả chi tiết chức năng (1.1) Kiểm tra thông tin vật tư : Dữ liệu vào: Thông tin vật tư của nhà cung cấp gửi đến, số lượng vật tư tồn và tình hình sử dụng vật tư Chức năng xử lý: Phòng mua vật tư dựa vào thông tin vật tư của nhà... gửi đến, số lượng vật tư tồn và tình hình sử dụng vật tư để tiến hành mua vật tư Dữ liệu ra: Kết quả kiểm tra (1.2) Lập đơn mua hàng Dữ liệu vào: Kết quả kiểm tra vật tư Chức năng xử lý: Dựa vào kết quả kiểm tra vật tư của phòng mua vật tư để lập hóa đơn mua hàng Dữ liệu ra: Đơn mua hàng (1.3) Nhận hóa đơn giao hàng Dữ liệu vào: Đơn mua hàng của phòng mua vật tư Chức năng xử lý: Phòng kế toán nhận hóa... (ký, họ tên) 3.2 Quy trình quản lý vật tư tại công ty 3.2.1 Quy trình nhập vật tư: Tại công ty Cổ phần vật liệu và xây lắp Nghĩa Hưng, khi có yêu cầu nhập vật tư, bộ phận quản lý kho sẽ dựa vào bảng kê tồn kho và sử dụng vật tư để đưa ra số lượng, loại vật tư cần nhập với nhà cung cấp bằng cách chuyển cho nhà cung cấp hóa đơn mua hàng Nhà cung cấp sẽ xem xét và lâp hóa đơn giao hàng gồm 3 liên, một... thuật Những phần khác nhau của hệ thống được gắn vào bằng những thao tác và thiết bị vật lý cần thiết để tiện lợi cho việc thu thập dữ liệu, xử lý và đưa ra thông tin cần thiết cho tổ chức Trong phần thiết kế vật lý cần phải quyết định lựa chọn ngôn ngữ lập trình, hệ cơ sở dữ liệu, cấu trúc tập tin tổ chức dữ liệu, những phần cứng, hệ điều hành và môi trường mạng cần được xây dựng Sinh Viên : Vũ Thị Mùi... loại vật tư, ngày xuất, ….) Dữ liệu ra: Thẻ kho (3.1) Kiểm kê vật tư Dữ liệu vào: Yêu cầu kiểm kê Chức năng xử lý: Kiểm kê thực tế tại kho, xem rõ số lượng vật tư thực tồn Dữ liệu ra: Số lượng vật tư tồn kho (3.2) Lập biên bản kiểm kê Dữ liệu vào: Kết quả kiểm kê(số lượng vật tư tồn kho) Chức năng xử lý: Dựa vào kết quả kiểm kê lập biên bản kiểm kê Dữ liệu ra: Biên bản kiểm kê (3.3) Đối chiếu vật tư. .. qủa kinh tế Và nhiều tính năng khác Từ đó giúp cho nhân viên quản lý làm việc nhanh chóng và hiệu quả, lưu trữ các thông tin một cách có hệ thống giúp các nhân viên kế toán tiền lương giảm thời gian ghi chép sổ sách 2.1.1 Tổng quan về quá trình phận tích hệ thống thông tin quản lí Phân tích hệ thống theo nghĩa chung nhất là khảo sát nhận diện và phân định các thành phần của một phức hợp và chỉ ra các... 2.1.2.3 Thiết kế giao diện chương trình Thiết kế hệ thống cho chương trình bao gồm: + Thiết kế tổng thể: Nhằm xác định vai trò, vị trí của máy vi tính trong hệ thống mới và phân tích rõ cho thấy công việc nào có thể do máy vi tính đảm nhiệm, công việc nào do người dùng phải làm thủ công, để tạo cơ sở cho việc thiết kế hệ thống sau này để từ đó có thể phát huy được những ưu điểm của hệ thống mới + Thiết kế . 3: PHÂN TÍCH HỆ THỐNG THÔNG TIN QUẢN LÝ VẬT TƯ TẠI CÔNG TY CỔ PHẦN VẬT LIỆU VÀ XÂY LẮP NGHĨA HƯNG 3.1 Các tài liệu sử dụng trong quản lý vật tư 3.1.1 Phiếu nhập kho Đơn vị: Công ty Cổ phần vật. ty Cổ phần vật liệu và xây lắp Nghĩa Hưng nơi em thực tập đã và đang áp dụng công nghệ thông tin và công việc quản lý của mình. Tuy nhiên, hệ thống quản lý vật tư tại Công ty Cổ phần vật liệu. việc quản lý, nên sau quá trình thực tập tại công ty em đã quyết định chọn đề tài: Phân tích và thiết kế hệ thống thông tin quản lý vật tư tại Công ty Cổ phần vật liệu và xây lắp Nghĩa Hưng