Xây dựng phần mềm quản lý bán hàng tại công ty trách nhiệm hữu hạn sản xuất và thương mai tân thành

Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân LỜI NĨI ĐẦU Trong năm qua cơng đổi đất nước đạt thành tựu quan trọng Q trình tồn cầu hố tốc độ phát triển vũ bão công nghệ thông tin làm thay đổi mối quan hệ công việc truyền thống Trước tác động từ yêu cầu đại hoá, việc áp dụng tin học doanh nghiệp nhiệm vụ quan trọng doanh nghiệp đặt lên hàng đầu Quá nhiều yếu tố ảnh hưởng đến phát triển doanh nghiệp: thị trường, sản phẩm, nhân lực, tri thức, trí tuệ người ta hay nói: Doanh nghiệp quản lý điều hành tốt hoạt động hiệu Một yếu tố quan trọng giám đốc điều hành doanh nghiệp thông tin Thông tin giúp cho nhà quản trị doanh nghiệp nhìn thực trạng doanh nghiệp có sách hợp lý để khắc phục điểm yếu phát huy điểm mạnh hoạt động doanh nghiệp Vậy để có thơng tin? Thời đại cơng nghệ thơng tin bùng nổ tạo khả thu thập xử lý thông tin rộng khắp mặt sống, kinh tế Các doanh nghiệp đối tượng nhanh nhậy việc áp dụng công nghệ thông tin để phục vụ công việc Một q trình ứng dụng cơng nghệ thơng tin doanh nghiệp xây dựng hệ thống thơng tin hồn hảo lựa chọn phần mềm tốt Mà từ người quản lý đưa kế hoạch định đắn, giảm chi phí tăng cường khả cạnh tranh, nâng cao kết hoạt động sản xuất kinh doanh doanh nghiệp Xuất phát từ lý nêu trên, sinh viên khoa Hệ Thống Thông Tin Kinh Tế Trường Đại Học Kinh tế Quốc Dân thực tập Công Ty TNHH Sản Xuất Và Thương Mai Tân Thành qua thời gian tìm hiểu thực tế cơng tác quản lý bán hàng doanh nghiệp, với kiến thức học tập với bảo, hướng dẫn tận tình Thầy Nguyễn anh Phương- giảng viên hướng dẫn, em định chọn đề tài “Xây dựng Phần mềm Quản lý bán hàng Công ty TNHH Sản Xuất Và Thương Mai Tân Thành” từ sâu, tìm hiểu thực tế cơng tác quản lý bán hàng doanh nghiệp sản xuất nhằm tìm hiểu đưa vài đánh giá ưu nhược điểm công tác quản lý vật tư cơng ty Từ đề xuất số ý kiến, giải pháp với mong muốn hoàn thiện công tác quản lý bán hàng công ty để góp phần nhỏ bé vào phát triển, thành công kinh doanh Công ty Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Nội dung báo cáo Em gồm chương sau: Chương 1: Tổng quan đề tài sở thực tập: Xây dựng phần mềm quản lý bán hàng Công ty TNHH Sản Xuất Và Thương Mai Tân Thành Chương 2: PHƯƠNG PHÁP LUẬN NGHIÊN CỨU, PHÂN TÍCH, THIẾT KẾ VÀ XÂY DỰNG PHẦN MỀM Chương PHÂN TÍCH THIẾT KẾ PHẦN MỀM QUẢN LÝ BÁN HÀNG TẠI CÔNG TY TNHH SẢN XUẤT VÀ THƯƠNG MẠI TÂN THÀNH Do trình độ chun mơn cịn hạn chế thời gian thực tập có hạn nên chun đề em khơng thể tránh thiếu sót Em mong nhận ý kiến đóng góp thầy để báo cáo em hoàn thiện giúp Em vững vàng công tác chuyên môn sau Em xin chân thành cảm ơn Hà nội , Ngày tháng năm 2014 Sinh viên thực hiện: Hoàng Văn Thanh Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Chương 1: Tổng quan đề tài sở thực tập: Xây dựng phần mềm quản lý bán hàng Công ty TNHH Sản Xuất Và Thương Mai Tân Thành 1.1 Giới thiệu chung Công ty TNHH Sản Xuất Và Thương Mai Tân Thành 1.1.1 Tổng quan trình hình thành phát triển Công ty TNHH Sản Xuất Và Thương Mai Tân Thành Tên giao dịch: Công ty TNHH Sản Xuất Và Thương Mai Tân Thành - Giám đốc công ty: Lê Xuân Vịnh - Mã số thuế: 0102080952 - Điện thoại:03213622307 - Lĩnh vực hoạt động: Kinh doanh xe máy thiết bị linh kiện phụ tùng xe máy - Địa chỉ: Mỹ Hào – Hưng Yên Công ty TNHH Sản Xuất Và Thương Mai Tân Thành công ty chuyên kinh doanh xe máy thiết bị linh kiện phụ tùng thay Công ty thành lập vào hoạt động năm 2002, thành lập theo định số 1943/GP, từ thành lập đến chọn làm đại lý uỷ quyền cung cấp, sửa chữa, bảo hành sản phẩm xe máy hãng HONDA Việt Nam Công ty nhận ủng hộ tin tưởng khách hàng mang đến cho khách hàng loại xe chất lượng cao, kiểu dáng đẹp hợp thời đại với thiết bị có chất lượng cao, tính kỷ thuật tốt Để phục vụ khách hàng ngày tốt hơn, công ty không ngừng nỗ lực cải tiến đầu tư trang thiết bị, nâng cấp nhà xưởng, phòng trưng bày nâng cao trình độ chun mơn đội ngũ cán bộ, nhân viên kỹ thuật Đặc biệt với phương châm kinh doanh uy tín chất lượng, cơng ty đem đến loại xe đáp ứng nhu cầu quý khách hàng, chương trình khuyến bảo hành hấp dẫn đảm bảo quyền lợi khách hàng Khi cần thiết nhân viên kỹ thuật đến tận nhà quý khách để lắp đặt, hướng dẫn thao tác bảo trì Hình thức hoạt động công ty: Sau nhận thông báo yêu cầu khách hàng nhân viên bán hàng giới thiệu tính thơng tin sản phẩm Nếu khách hàng đồng ý mua hai bên thoả thuận giá cả, hình thức tốn số điều khoản khác có liên quan… 1.1.2 Cơ cấu tổ chức công ty TNHH Sản Xuất Và Thương Mại Tân Thành Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân (*) Sơ đồ máy quản lý cơng ty: Giám đốc Phịng HC Phịng kế tốn Phịng KD Phịng kỹ thuật - Giám đốc: Là người đứng đầu cơng ty, có trách nhiệm mặt hoạt động cơng ty, có quyền hạn cao tồn bộ máy cơng ty Ở Cơng ty, Giám đốc người chịu trách nhiệm hồn tồn trước pháp luật tổng số vốn cơng ty - Phịng kế tốn : có nhiệm vụ quản lý lương nhân viên, quản lý thu chi tình hình tài cơng ty - Phịng kinh doanh : Đây phân có đội ngũ nhân viên có lực chun mơn cao, có kiến thức sâu lĩnh vực kinh doanh nắm bắt thị trường kinh doanh Có thể nói đầu định phát triển cơng ty Phịng kinh doanh có nhiệm vụ khai thác khách hàng, tìm kiếm mở rộng thị trường - Phòng kỹ thuật: Đây mắt xích quan trọng với phịng kinh doanh, có đội ngũ nhân viên chun mơn cao Phịng kỹ thuật ln song hành với phịng kinh doanh để đẩy mạnh phát triển cơng ty - Phịng hành chính: Có chức tham mưu cho giám đốc việc đào tạo, tuyển dụng, sa thải công nhân, quản lý công nhân viên cơng ty, ngồi phịng hành nghiên cứu, đề xuất biện pháp giúp giám đốc đạo, hướng dẫn, kiểm tra đôn đốc công nhân viên thực nội quy, quy chế công ty 1.1.3 Thực trạng ứng dụng công nghệ thông tin công ty TNHH Sản Xuất Và Thương Mại Tân Thành -Công ty TNHH Sản Xuất Và Thương Mại Tân Thành có 30 máy tính để bàn kết nối Internet, máy photocopy, máy in trang bị phịng ban cơng ty Ngồi số nhân viên phải công tác xa công ty cịn trang bị máy tính xách tay ipad để sử dụng Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Tại số phịng ban phận kế tốn sử dụng phần mềm kế toán Misa để phục vụ cho cơng tác kế tốn cơng ty Các phòng ban khác chưa sử dụng phần mềm quản lý - Nhân viên phòng trang bị người máy tính sử dụng thành thạo phần mềm Microsoft Offíce, Auto Cad Vì nhân viên phịng hầu hết có trình độ cử nhân kỹ sư xây dựng, nên có khả sử dụng máy tính phần mềm khác tốt - Phịng tài kế tốn: Phịng tài kế tốn có chức thực kế toán, lập theo dõi số sách kế toán, hỗ trợ phịng ban thủ tục hành cụ thể sau: ghi chép, phản ánh liệu kế tốn; thơng tin, báo cáo, chuyển tin số liệu kế tốn cho Giám đốc Cơng ty biết tình hình tài Cơng ty đơn vị Nhân viên phòng trang bị người máy tính sử dụng thành thạo phần mềm Microsoữ Offíce 1.2 Giới thiệu đề tài 1.2.1 Giới thiệu phòng ban nơi thực tập Quản lý bán hàng đề tài mà Em quan tâm theo Em chọn Bộ phận bán hàng làm phịng ban thực tập Chức năng, nhiệm vụ phận quản lý sản phẩm, nơi xử lý yêu cầu mua hàng khách hàng thực trình bán hàng Quy trình xuất bán sản phẩm trải qua nhiều khâu với nhiều ghi chép hầu hết thực thủ công tay Sau xuất bán sản phẩm nhận đầy đủ tiền hàng khách hàng phận hồn thành cơng việc 1.2.2 Tên đề tài, lý do,mục đích chọn đề tài - Tên đề tài: Xây dựng phần mềm Quản Lý Bán Hàng Công ty TNHH Sản Xuất Và Thương Mại Tân Thành - Lý chọn đề tài: Trong thời gian thực tập Công ty TNHH Sản Xuất Và Thương Mai Tân Thành em nhận thấy máy Quản Lý Bán Hàng Công ty TNHH Sản Xuất Và Thương Mai Tân Thành hoạt động với số nghiệp vụ giao dịch ngày thường lớn, lượng liệu tính tốn lớn, mà áp dụng phương pháp thủ cơng tốn nhiều công sức, nhiều thời gian Tất công việc liên quan đến việc bán hàng (nhậpxuất hàng hoá) thực giấy tờ, sổ sách kế toán trực tiếp kiểm kê xác nhận Hiện nay, công tác quản lý điều hành kinh doanh dịch vụ Công ty TNHH Sản Xuất Và Thương Mại Tân Thành nhiều lĩnh vực chưa tin học hoá cao, bước đầu đưa ứng dụng tin học vào cơng tác kế tốn kinh doanh cấp độ lưu trữ xử lý thông tin cách đơn Theo yêu cầu Em nhận thấy cần thiết việc đưa lý thuyết học vào phục vụ thực tế từ thực tế công tác quản lý bán hàng Công ty TNHH Sản Xuất Và Thương Mại Tân Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Thành Với mục đích quản lý nguồn thơng tin đầu vào trình bán hàng, cho phép xem báo cáo, thông tin phục vụ nhà quản lý, thực bán hàng nhanh chóng cho khách hàng Hi vọng đề tài em mang lại nhiều tiện ích cơng tác bán hàng Cơng ty, giúp Ban Lãnh Đạo Cơng ty tham khảo ứng dụng vào việc quản lý Cơng ty -Mục đích xây dưng phần mềm Trong q trình hội nhập kinh tế quốc tế, đòi hỏi doanh nghiệp phải nâng cao trình độ quản lý, trình độ kinh doanh trình độ ứng dụng khoa học kỹ thuật Vì vậy, phát triển thương mại điện tử vấn đề cần quan tâm Muốn vậy, cần phải nắm rõ tình hình thương mại điện tử nước giới Từ đó, áp dụng cho phù hợp với tình hình kinh tế Việt Nam Trên sở đó, em định tìm hiểu lý thuyết thương mại điện tử xây dựng phần mềm quản lý bán hàng cơng ty phù hợp tình hình kinh doanh *Cụ thể tin học : Nắm sở lý thuyết chung thương mại điện tử vấn đề thương mại điện tử Tìm hiểu website thương mại giới để nắm cách thức hoạt động yêu cầu cần thiết ứng dụng thương mại điện tử * Về mặt ứng dụng: Xây dựng sở liệu đáp ứng cho việc lưu trữ tất loại mặt hàng Dựa vào việc tìm hiểu tình hình thương mại điện tử Việt Nam, xây dựng nên ứng dụng thích hợp với kinh tế đất nước, hỗ trợ tốt cho doanh nghịêp khách hàng Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân CHƯƠNG : PHƯƠNG PHÁP LUẬN NGHIÊN CỨU, PHÂN TÍCH, THIẾT KẾ VÀ XÂY DỰNG PHẦN MỀM 2.1 Tổng quan xây dựng phần mềm 2.1.1 Phần mềm a Khái niệm phần mềm Phần mềm tin học trở thành phần tử chủ chốt hệ thống dựa máy tính Trong cơng nghệ phần mềm phần mềm hiểu theo định nghĩa nhà tin học người Mỹ Roger Pressman: “ Phần mềm tổng thể bao gồm yếu tố: Các chương trình máy tính, cấu trúc liệu, tài liệu hướng dẫn sử dụng phần mềm” Định nghĩa xác định thành phần phần mềm công nghệ phần mềm Phần mềm sản phẩm cơng nghệ gồm có hai tính chất sau: + Phần mềm hệ thống logic khơng phải kỹ thuật Do khơng ráp theo nghĩa thơng thường sản phẩm cơng nghiệp khác Một phần mềm cần có đầu tư nhiều trí tuệ người chế tác phần mềm + Sản phẩm công nghiệp truyền thống bị hao mịn q trình sử dụng Giá trị phần mềm tăng lên người sử dụng hiểu sau b Các giai đoạn phát triển phần mềm Giai đoạn 1950 - 1960 - Xử lý theo lô - Đơn theo đơn đặt hàng Giai đoạn 1960 – 1970 Giai đoạn 1970 – 1990 - Nhiều người sử dụng - Thời gian thực - Bắt đầu có phần mềm thương mại - Hệ phân tán - Hiệu thương mại hoá Giai đoạn 1990 trở - Hệ thống để bàn - Hệ thông minh - Quy mô công nghiệp Theo giai đoạn phát triển phần mềm, ta nhận thấy tiến trình phát triển phần mềm luôn song song với trình phát triển phần cứng theo định hướng hồn tồn tương tự, tức là: Quy mơ thu nhỏ, tính nâng cao Sinh Viên:Hồng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Tính chất thương mại hóa phần mềm thị trường ngày bộc lộ rõ đỉnh cao việc sản xuất phần mềm tiến hành quy mô đại trà theo tác phong công nghiệp xu tổng quát thị trường 2.1.2 Công nghệ phần mềm a khái niệm Công nghệ phần mềm môn khoa học nghiên cứu phương pháp, thủ tục công cụ từ phân tích thiết quản lý dự án phần mềm nhằm đạt mục tiêu dự án Hay nói cách khác: Cơng nghệ phần mềm tổ hợp công cụ, phương pháp thủ tục làm cho người quản trị viên dự án nắm xu tổng quát công nghệ phần mềm Đồng thời giúp cho kỹ sư lập trình có tảng để khai thác định hướng phần mềm b Các giai đoạn phát triển dự án phần mềm Quy trình phát triển dự án phần mềm không phụ thuộc vào quy mô, độ phức tạp miền ứng dụng, trải qua giai đoạn sau: - Giai đoạn 1: Giai đoạn xác định Nhóm sản xuất phần mềm phải xác định cụ thể chi tiết sản phẩm phần mềm mà cần chế tạo Đây công đoạn quan trọng sản xuất phần mềm với quy mơ cơng nghiệp có xác định rõ ràng phạm vi sản phẩm buộc liên quan tiến hành kết công đoạn sau Trong giai đoạn phải xác định giải ban vấn đề mấu chốt sau: + Tiến hành phân tích hệ thống cách toàn diện theo quan điểm: phần mềm phận hệ thống quản lý Phần mềm phải đặt tổng thể hệ thống xem xét mối quan hệ ràng buộc với yếu tố quản lý khác + Tiến hành lập kế hoạch sản xuất phần mềm trước vào yêu cầu cụ thể + Tiến hành phân tích yêu cầu cách cụ thể, chi tiết theo đối tượng Đây giai đoạn định danh phần mềm thực tế cơng ty phần mềm cụ thể hóa vai trị cán có chức danh: Cán phân tích yêu cầu phần mềm, Cán lập quản lý yêu cầu phần mềm - Giai đoạn 2: Giai đoạn phát triển Trong giai đoạn phải định hướng phần mềm phát triển Trong có cơng việc quan trọng cần làm: thiết kế, mã hóa, kiểm thử Cần ý khái niệm mã hóa cơng nghệ phần mềm khác với khái niệm mã hóa hệ thống thơng tin Trong cơng nghệ phần mềm, mã hóa q trình chuyển đổi, dịch từ thiết kế ban đầu thành ngơn ngữ lập trình mà máy tính hiểu Sinh Viên:Hoàng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Trong thực tiễn công nghệ phần mềm giai đoạn thực chức danh: Cán thiết kế, Cán quản lý cấu hình phần mềm, Lập trình viên, Cán test phần mềm - Giai đoạn 3: Giai đoạn bảo trì Trong có loại hình: bảo trì sửa chữa, bảo trì thích nghi bảo trì hồn thiện (cịn gọi bảo trì nâng cao) + Bảo trì sửa chữa: tức sửa lỗi phần mềm, lỗi chi tiết đơn giản lỗi hệ thống + Bảo trì thích nghi: tức làm cho sản phẩm phần mềm hoàn toàn thân thiện môi trường người sử dụng + Bảo trì hồn thiện ( bảo trì nâng cao): tức làm cho sản phẩm phần mềm đẹp hơn, có tính thẩm mỹ cao với chức thực ngày hoàn thiện, kỹ sư phần mềm phải bổ sung thêm vài chức mà công ty mua phần mềm yêu cầu Trong thực tiễn hoạt động công ty phần mềm nhiệm vụ thường giao cho cán triển khai phần mềm ban hỗ trợ khách hàng Đánh giá hiệu hoạt động công ty phần mềm việt nam Người ta thấy vấn đề hậu lại đóng vai trị quan trọng chất lượng phần mềm Trong công nghệ phần mềm, người ta thường áp dụng quy tắc 40 – 20 – 40 phân bổ nỗ lực tiến trình phát triển phần mềm Tức tồn tiến trình chia thành ba khối lớn Có nghĩa giai đoạn phát triển phẫn mã hóa cơng ty phần mềm cần tập trung tiềm vật chất người mức độ 20% lại tiềm chia làm lần cho quy trình thiết kế thử nghiệm 2.1.3 Vòng đời phát triển phần mềm Mỗi phần mềm từ đời phát triển trải qua chu kì cơng nghệ phần mềm gọi vịng đời phát triển phần mềm Mục đích việc nghiên cứu vòng đời phát triển phần mềm phân thành giai đoạn sở tìm hiểu giải pháp cơng cụ thích hợp để tác động vào giai đoạn Vòng đời phát triển phần mềm biểu diễn mô hình thác nước theo hình vẽ sau đây: Sinh Viên:Hồng Văn Thanh Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Hình 2.1 Mơ hình biểu diễn vòng đời phát triển phần mềm - Công đoạn công nghệ hệ thống bao trùm tồn q trình cơng nghệ phần mềm Vì phần mềm thành phần hệ thống quản lý phải xem xét mối liên quan tổng thể kinh tế, kỹ thuật, tài tồn bộ máy quản lý - Cơng đoạn phân tích Với mục đích xác định rõ ràng cụ thể yêu cầu phần mềm - Phần thiết kế công nghệ phần mềm hướng tới vấn đề sau đây: + thiết kế kiến trúc hệ thống: phần quan trọng cho ta nhìn tổng thể phần mềm cần xây dựng + Thiết kế kỹ thuật vào vấn đề cụ thể gồm: thiết kế liệu, thiết kế thủ tục, thiết kế chương trình, thiết kế giao diện hình cuối thiết kế công cụ cài đặt Người ta dùng mơ hình thác nước để biểu diễn vòng đời phát triển phần mềm với ý nghĩa Một là: để khẳng định giai đoạn quy trình thống nhất, khơng tách rời mà có mối liên quan mật thiết với Hai là: mơ hình cơng đoạn phía chịu tác động tồn cơng đoạn phía bên Chỉ có cơng đoạn cơng nghệ hệ thống không chịu ảnh hưởng hay tác động công đoạn 2.1.4 Làm mẫu phần mềm Đây công đoạn đặc trưng sản xuất phần mềm quy mô công nghiệp Cũng tương tụ sản xuất ngành cơng nghiệp đó, trước đưa sản phẩm vào sản xuất hàng loạt phải tiến hành thử nghiệm làm thử số sản phẩm để đưa thăm dò ý kiến khách hàng, khách hàng đồng ý tiến hành sản xuất hàng loạt Sinh Viên:Hoàng Văn Thanh 10 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân PHỤ LỤC Sinh Viên:Hoàng Văn Thanh 67 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Phụ luc 3.1.4 Một số mẫu biểu Mẫu 01: Phiếu Nhập Kho Đơn vị: Công ty TNHH SX TM Tân Thành Bộ phận:………………… Mẫu số: 02 - VT QĐ số: 15/2006/QĐ-BTC ngày 20/ 03/2006 BTBTC PHIẾU NHẬP KHO Ngày tháng năm 20 Số: … ………… Nợ: … ……… Có: … ………… Nhập cho ơng(bà):…………………………………………………………… Theo………số……Ngày…tháng…năm 2010 của…………………………… Nhập kho:………………………… Địa chỉ:…………………………… Nhập mặt hàng đây: STT Vật tư - Hàng hoá Mã hiệu Tên – nhãn hiệu - ĐVT quy cách Số Đơn giá lượng Thành tiền Cộng : Cộng tiền chữ: Số chứng từ kèm theo:……………………………………………………… Ngày tháng năm 201 Người giao hàng Thủ kho Người lập phiếu Kế toán Giám đốc (ký tên) (ký tên) (ký tên) (ký tên) (KT,đóng dấu) Sinh Viên:Hoàng Văn Thanh 68 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân  Mẫu 02: Đơn Đặt Hàng: Công ty TNHH SX TM Tân Thành Tân Thành Địa chỉ: Mỹ Hào – Hưng Yên Điện thoại: 03213622307 - - - - - - - - - - - - - - - - - - - - - - -o0o- - - - - - - - - - - - - - - - - - - - Hưng Yên, ngày … tháng … năm… ĐƠN ĐẶT HÀNG Họ Tên Khách Hàng:…………………………………………………… Địa chỉ:……………………………………………………………………… Cần mua số loại xe máy sau: STT Tên hàng hóa ĐVT Số lượng Thực giao hàng vào ngày … tháng … năm … T.M Công ty TNHH SX TM Tân Thành (Họ, ký tên) Sinh Viên:Hoàng Văn Thanh 69 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân  Mẫu 03: Phiếu xuất kho Đơn vị: Công ty TNHH SX TM Tân Thành Bộ phận:………………………… Mẫu sổ: 02 - VT QĐ số: 15/2006/QĐ-BTC ngày 20 tháng 03 năm 2006 Bộ trưởng Bộ Tài PHIẾU XUẤT KHO Ngày tháng năm 20 Số: … ………… Nợ: … ……… Có: … ………… Họ, tên người nhận hàng: ………………………………………………… Địa chỉ:…………………………………………………………………… Lý xuất kho:…………………………………………………………… Xuất kho:……………………………………………………………… Xuất mặt hàng liệt kê đây: STT Vật liệu- Hàng hoá Mã hiệu Tên - nhãn hiệu - quy cách ĐVT Số lượng thự c xuấ t Đơn giá Thành tiền Bảo hành theo mã hàng hoá Cộng: Cộng tiền viết chữ: Số chứng tờ gốc kèm theo:………………………………………………………… Ngày tháng năm 20 Người lập phiếu Người nhận hàng Thủ kho Kế toán trưởng Giám đốc (ký tên) (Ký tên) (Ký tên) ( ký tên) (KT, đóng dấu) Sinh Viên:Hồng Văn Thanh 70 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân  Mẫu 04: Phiếu Thu Đơn vị: Công ty TNHH SX TM Tân Thành Mẫu số: 01-TT Địa chỉ: QĐ số:1141-TC/QĐ/CĐ Mỹ Hào - Hưng Yên ngày tháng năm ĐT: 0383622307 Bộ trưởng Bộ Tài PHIẾU THU Ngày… tháng…năm 20 Quyển sổ:………………… Số: Nợ:… Có:… Họ tên người nộp tiền:………………………………………………………… Địa chỉ:………………………………………………………………… Lý thu:……………………………………………………………… Số tiền:…………………(viết chữ)…………………………………………… Chứng từ kèm theo:……… Chứng từ gốc……………………………………… Ngày tháng năm 20 Giám đốc Kế toán trưởng Người lập phiếu người nộp tiền Thư quỹ (ký tên) (ký tên) (ký tên) (ký tên) (ký tên) Sinh Viên:Hoàng Văn Thanh 71 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Phụ lục 3.5.4 Một số đoạn code chương trình: a/ Modul hàm thủ tục xử lý chung: Option Explicit Public T, T1, T2, T3, T4, T5, T6, T7, T8, T9, T10, T11, T12 Public SoTT, pn, px Public IDVT, IDNV, IDkh, IDKHO, IDHH, IDSoPX, DT Public ID Public chon, flag_chon, Flag Public cn As New ADODB.Connection Public a As New ADODB.Recordset Public a1 As New ADODB.Recordset Public c As New ADODB.Recordset Public d As New ADODB.Recordset Public rs As New ADODB.Recordset Public rs1 As New ADODB.Recordset Public rs11 As New ADODB.Recordset Public rsCust As New ADODB.Recordset Public rsC As New ADODB.Recordset Public rsCust1 As New ADODB.Recordset Public rsCust2 As New ADODB.Recordset Public rsCust11 As New ADODB.Recordset Public rsCust12 As New ADODB.Recordset Public strSQL As String Sinh Viên:Hoàng Văn Thanh 72 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Public Sub Open_mdb() Set cn = New ADODB.Connection Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source= " & App.Path & "\Data.mdb" Set rsCust = New ADODB.Recordset rsCust.LockType = adLockOptimistic rsCust.CursorType = adOpenKeyset Set rs = New ADODB.Recordset rs.LockType = adLockOptimistic rs.CursorType = adOpenKeyset Set a = New ADODB.Recordset a.LockType = adLockOptimistic a.CursorType = adOpenKeyset Set a1 = New ADODB.Recordset a1.LockType = adLockOptimistic a1.CursorType = adOpenKeyset Set rs1 = New ADODB.Recordset rs1.LockType = adLockOptimistic rs1.CursorType = adOpenKeyset Set rs11 = New ADODB.Recordset rs11.LockType = adLockOptimistic rs11.CursorType = adOpenKeyset Set rsC = New ADODB.Recordset rsC.LockType = adLockOptimistic rsC.CursorType = adOpenKeyset Set rsCust1 = New ADODB.Recordset rsCust1.LockType = adLockOptimistic rsCust1.CursorType = adOpenKeyset Set rsCust11 = New ADODB.Recordset rsCust11.LockType = adLockOptimistic rsCust11.CursorType = adOpenKeyset Set rsCust2 = New ADODB.Recordset rsCust2.LockType = adLockOptimistic rsCust2.CursorType = adOpenKeyset Set rsCust12 = New ADODB.Recordset Sinh Viên:Hoàng Văn Thanh 73 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân rsCust12.LockType = adLockOptimistic rsCust12.CursorType = adOpenKeyset Set c = New ADODB.Recordset c.LockType = adLockOptimistic c.CursorType = adOpenKeyset Set d = New ADODB.Recordset d.LockType = adLockOptimistic d.CursorType = adOpenKeyset End Sub b/ Đoạn code “Viết số tiền thành chữ” Private Function Donvi(X) Dim dv Select Case X Case 0: dv = "không" Case 1: dv = "một" Case 2: dv = "hai" Case 3: dv = "ba" Case 4: dv = "bốn" Case 5: dv = "năm" Case 6: dv = "sáu" Case 7: dv = "bảy" Case 8: dv = "tám" Case 9: dv = "chín" End Select Donvi = dv End Function Sinh Viên:Hồng Văn Thanh 74 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Private Function Chuc(X) Dim Ch, Dau, Cuoi Cuoi = Right(X, 1) Dau = Left(X, 1) If Cuoi = Then If Dau = Then Ch = "mười" Else Ch = Donvi(Dau) & " mươi" End If End If If Cuoi = Then If Dau = Then Ch = "mười lăm" Else Ch = Donvi(Dau) & " mươi lăm" End If End If If Cuoi = Then If Dau = Then Ch = " mười bốn" Else Ch = Donvi(Dau) & " mươi tư" End If End If If Cuoi = Then If Dau = Then Ch = " mười " & Donvi(Cuoi) Else Ch = Donvi(Dau) & " mười một" End If End If Select Case Cuoi Case 2, 3, 6, 7, 8, Select Case Dau Case 0: Sinh Viên:Hoàng Văn Thanh 75 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Ch = Donvi(Cuoi) Case 1: Ch = " mười " & Donvi(Cuoi) Case Else: Ch = Donvi(Dau) & " mười " & Donvi(Cuoi) End Select End Select Chuc = Ch End Function Private Function Tram(X) Dim Tr, Dau, Cuoi, Giua Dau = Left(X, 1) Giua = Mid(X, 2, 1) Cuoi = Right(X, 1) Ch = Right(X, 2) If Dau Then If Giua = Then If Cuoi = Then Tr = Donvi(Dau) & " trăm" Else Tr = Donvi(Dau) & " trăm linh " & Donvi(Cuoi) End If Else Tr = Donvi(Dau) & " trăm " & Chuc(Ch) End If Else If Giua Then Tr = "không trăm " & Chuc(Ch) Else If Cuoi = Then Tr = "" Else Tr = "không trăm linh " & Donvi(Cuoi) End If End If End If Sinh Viên:Hoàng Văn Thanh 76 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Tram = Tr End Function Private Function Nghin(X) Dim Ng, Dau, Cuoi Dim Tiep1, Tiep2 Dau = Left(X, 1) Cuoi = Right(X, 1) Tiep1 = Mid(X, 2, 3) Tiep2 = Mid(X, 3, 2) If Dau = Then Ng = "khơng nghìn " & Tram(Tiep1) Else Ng = Donvi(Dau) & " nghìn " & Tram(Tiep1) End If Nghin = Ng End Function Private Function Chucnghin(X) Dim cn Dim Dau, Cuoi1, Cuoi2, Dau2 Dau = Left(X, 1) Dau2 = Left(X, 2) Cuoi1 = Right(X, 4) Cuoi2 = Right(X, 3) If Dau = Then cn = Nghin(Cuoi1) Else cn = Chuc(Dau2) & " nghìn " & Tram(Cuoi2) End If Chucnghin = cn End Function Private Function Tramnghin(X) Dim TN Dim Dau, Tiep1, Tiep2, Cuoi, Cuoi1, Cuoi2 Dau = Left(X, 1) Tiep1 = Mid(X, 2, 1) Tiep2 = Mid(X, 3, 1) Sinh Viên:Hoàng Văn Thanh 77 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Cuoi = Right(X, 3) Cuoi1 = Right(X, 4) Cuoi2 = Right(X, 5) If Dau = Then TN = Chucnghin(Cuoi2) Else If Tiep1 = Then If Tiep2 = Then TN = Donvi(Dau) & " trăm nghìn " & Tram(Cuoi) Else TN = Donvi(Dau) & " trăm linh " & Nghin(Cuoi1) End If Else TN = Donvi(Dau) & " trăm " & Chucnghin(Cuoi2) End If End If Tramnghin = TN End Function Private Function Trieu(X) Dim T Dim Dau, Sau, Tiep1, Tiep2, Tiep3 Dau = Left(X, 1) Sau = Right(X, 6) Sau1 = Right(X, 3) Sau2 = Right(X, 4) sau3 = Right(X, 5) Tiep1 = Mid(X, 2, 1) Tiep2 = Mid(X, 3, 1) Tiep3 = Mid(X, 4, 1) If Dau = Then T = "không trăm " & Tramnghin(Sau) Else If Tiep1 = Then If Tiep2 = Then If Tiep3 = Then T = Donvi(Dau) & " triệu " & Tram(Sau1) Sinh Viên:Hoàng Văn Thanh 78 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Else T = Donvi(Dau) & " triệu " & Nghin(Sau2) End If Else T = Donvi(Dau) & " triệu " & Chucnghin(sau3) End If Else T = Donvi(Dau) & " triệu " & Tramnghin(Sau) End If End If Trieu = T End Function Private Function Chuctrieu(X) Dim CT Dim Dau, Sau, Dau1, Sau1, Tiep Dau = Left(X, 1) Dau1 = Left(X, 2) Sau = Right(X, 7) Sau1 = Right(X, 6) Tiep = Mid(X, 5, 1) If Dau = Then CT = "linh " & Trieu(Sau) Else CT = Chuc(Dau1) & " triệu " & Tramnghin(Sau1) End If If Sau1 = "000000" Then CT = Chuc(Dau1) & " triệu" End If Chuctrieu = CT End Function Private Function Tramtrieu(X) Dim TT Dim Dau, Sau, Tiep1, Tiep2, Sau1, Dau2 Sau = Right(X, 8) Sau1 = Right(X, 7) Sau2 = Right(X, 6) Sinh Viên:Hoàng Văn Thanh 79 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân Dau = Left(X, 1) Dau2 = Left(X, 3) Tiep1 = Mid(X, 2, 1) Tiep2 = Mid(X, 3, 1) If Dau = Then TT = Chuctrieu(Sau) Else If Tiep1 = Then If Tiep2 = Then TT = Donvi(Dau) & " trăm triệu " & Tramnghin(Sau2) Else TT = Donvi(Dau) & " trăm linh " & Trieu(Sau1) End If Else TT = Tram(Dau2) & " triệu " & Tramnghin(Sau2) End If End If If Sau2 = "000000" Then TT = Tram(Dau2) & " Triệu" End If Tramtrieu = TT End Function Public Function Tienchu(X) Dim st If Len(Trim(X)) < Then st = Donvi(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Chuc(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Tram(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Nghin(X) & " ( đồng)" Else Sinh Viên:Hoàng Văn Thanh 80 Lớp 13A Tikt.01 Báo Cáo Thực Tập Trường ĐH Kinh Tế Quốc Dân If Len(Trim(X)) < Then st = Chucnghin(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Tramnghin(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Trieu(X) & " ( đồng)" Else If Len(Trim(X)) < Then st = Chuctrieu(X) & " ( đồng)" Else st = Tramtrieu(X) & " ( đồng )" End If End If End If End If End If End If End If End If Tienchu = UCase(Left(st, 1)) & Right(st, Len(st) - 1) End Function Sinh Viên:Hoàng Văn Thanh 81 Lớp 13A Tikt.01