XÂY DỰNG PHẦN mềm kế TOÁN TIỀN LƯƠNGTẠI CÔNG TY cổ PHẦN hợp tác PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM 50

102 84 0
XÂY DỰNG PHẦN mềm kế TOÁN TIỀN LƯƠNGTẠI CÔNG TY cổ PHẦN  hợp tác  PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM 50

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

Thông tin tài liệu

Đồ án tốt nghiệp Học viện Tài LỜI CAM ĐOAN Tơi xin cam đoan cơng trình nghiên cứu Các số liệu, kết nêu đồ án hoàn toàn trung thực xuất phát từ tình hình thực tế đơn vị thực tập Nếu sai sót tơi xin chịu trách nhiệm hoàn toàn ` Tác giả đồ án PHẠM THỊ THÚY Phạm Thị Thúy Lớp:CQ50/41.04 Đồ án tốt nghiệp Học viện Tài MỤC LỤC LỜI CAM ĐOAN i LỜI CẢM ƠN LỜI MỞ ĐẦU CHƯƠNG 1: LÝ LUẬN CHUNG ĐỂ XÂY DỰNG PHẦN MỀM KẾ TOÁN TIỀN LƯƠNG TRONG DOANH NGHIỆP 1.1.LÍ THUYẾT CHUNG ĐỂ XÂY DỰNG PHẦN MỀM KẾ TOÁN 1.1.1 Khái niệm, đặc điểm, yêu cầu phần mềm kế toán 1.1.2 Qui trình xây dựng phần mềm kế tốn 1.1.3 Các công cụ tin học sử dụng xây dựng phần mềm kế toán 16 1.2.KHÁI QUÁT CHUNG VỀ KẾ TOÁN TIỀN LƯƠNG TRONG DOANH NGHIỆP 20 1.2.1 Chức năng, nhiệm vụ kế toán tiền lương 20 1.2.2 Phương pháp tính lương khoản trích theo lương 1.2.3 Các chứng từ tài khoản kế toán sử dụng 21 28 1.2.4.Hệ thống sổ sách, báo cáo sử dụng liên quan đến kế toán tiền lương 31 1.2.5 Hạch tốn kế tốn tiền lương khoản trích theo lương 31 CHƯƠNG 2:THỰC TRẠNG VÀ GIẢI PHÁP PHÂN TÍCH THIẾT KẾ QUẢN LÝ TIỀN LƯƠNG TẠI CƠNG TY CP HỢP TÁC & PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM 35 2.1 KHÁI QUÁT CHUNG VỀ CÔNG TY CP HỢP TÁC & PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM 35 2.1.1 Quá trình hình thành phát triển 2.1.2.Lĩnh vực kinh doanh 35 35 2.1.3 cấu tổ chức quản lý Công ty 2.1.4 Tổ chức máy kế tốn cơng ty 36 38 Phạm Thị Thúy Lớp:CQ50/41.04 Đồ án tốt nghiệp Học viện Tài 2.2 THỰC TRANG CƠNG TÁC KẾ TỐN TIỀN LƯƠNG TẠI CƠNG TY CỔ PHẦN TRUYỀN THƠNG VIỆT NAM 39 2.2.1 Hình thức kế toán sử dụng 39 2.2.2 Các tài khoản kế toán sử dụng 40 2.2.3 Các chứng từ kế toán sử dụng 41 2.2.4 Sổ báo cáo kế tốn sử dụng 41 2.2.6 Cách tính lương cơng ty 42 2.2.7 Mơ tả hoạt động tính lương cơng ty44 2.2.8 Tình hình ứng dụng cơng nghệ thơng tin cơng tác kế tốn tiền lương 45 2.3.ĐÁNH GIÁ THỰC TRẠNG VÀ PHƯƠNG HƯỚNG KHẮC PHỤC 46 2.3.1 Về tổ chức máy kế toán, người, sở vật chất 46 2.3.2 Về hệ thống chứng từ báo cáo sử dụng 47 2.3.3 Về hình thức kế tốn 47 2.3.5 Về quy trình hoạt động tính lương 48 2.3.6 Về tính hình ứng dụng cơng nghệ thơng tin hoạt động kế tốn tiền lương 48 CHƯƠNG 3:XÂY DỰNG PHẦN MỀM KẾ TỐN TIỀN LƯƠNGTẠI CƠNG TY CỔ PHẦN HỢP TÁC & PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM 50 3.1.GIỚI THIỆU VỀ HỆ THỐNG 3.1.1 Mục tiêu hệ thống 3.1.2 Mơ tả tốn 50 50 50 3.1.3 Dữ liệu vào thông tin 52 3.1.4 Phân tích yêu cầu 52 3.1.5 Dữ liệu vào hệ thống 53 Phạm Thị Thúy Lớp:CQ50/41.04 Đồ án tốt nghiệp Học viện Tài 3.2.MƠ HÌNH NGHIỆP VỤ CỦA BÀI TỐN 3.2.1 Biểu đồ ngữ cảnh hệ thống 54 3.2.2 Biểu đồ phân cấp chức 55 3.2.3 Liệt hồ sơ liệu sử dụng 56 54 3.3.PHÂN TÍCH MƠ HÌNH KHÁI NIỆM – LOGIC 3.3.1 Biểu đồ luồng liệu mức 3.3.2 Biểu đồ luồng liệu 58 58 59 3.3.3 Mô hình liệu quan hệ 61 3.4.THIẾT KẾ CSDL 70 3.4.1 Mơ hình quan hệ 70 3.4.2 Thiết kế sở liệu vật lý ( thiết kế bảng) 71 3.4.3 Một số giao diện chương trình 74 3.4.4 Giao diện chương trình 74 3.4.5 Một số form 74 KẾT LUẬN 78 TÀI LIỆU THAM KHẢO 79 PHỤ LỤC: 80 Phạm Thị Thúy Lớp:CQ50/41.04 Đồ án tốt nghiệp Học viện Tài CẢM ƠN Trong trình xây dựng phát triển đề tài, em nhân hỗ trợ quý báu thầy công ty nơi em thực tập Trước hết em xin gửi lời cảm ơn sâu sắc đến THS Phan Phước Long - giảng viên khoa Hệ thống thơng tin kinh tế - Học viện tài chính, người hướng dẫn trình xây dựng đề tài em chi tiết, đồng thời đưa định hướng giúp em trình phân tích thiết kế ứng dụng Em xin gửi lời cảm ơn tới thầy giáo tồn Học viện, đặc biệt thầy giáo khoa Hệ thống thơng tin kinh tế kiến thức vơ bổ ích truyền đạt cho em xuyên suốt trình học tập học viện Cuối cùng, em không nhắc tới hỗ trợ nhiệt tình anh chị phòng tài kế tốn cơng Cổ Phần Hợp TácPhát Triển Truyền Thông VIệt Nam tạo điều kiện thuận lợi suốt thời gian em thực tập, dẫn nhiều cho em kiến thức thực tế để em hồn thành đồ án Mặc dù cố gắng hoàn thiện đề tài khả thân, nhiên đồ án tồn hạn chế lý hạn hẹp mặt kiến thức thời gian Vì vậy, em mong muốn nhận lời góp ý quý báu thầy bạn Em xin chân thành cảm ơn! Phạm Thị Thúy Lớp:CQ50/41.04 LỜI MỞ ĐẦU I Lý chọn đề tài Cùng với phát triển vượt bậc khoa học kỹ thuật, tin học trở thành lĩnh vực quan trọng, thiết yếu trình hội nhập phát triển đất nước Các lĩnh vực sống hỗ trợ đắc lực ứng dụng tin học nhằm nâng cao chất lượngvà hiệu công việc Đặc biệt, doanh nghiệp, việc ứng dụng tin học trở thành nhu cầu thiết yếu để tồn phát triển thị trường đầy cạnh tranh ngày Xuất phát từ xu chung xã hội, hàng loạt phần mềm phục vụ hoạt động sản xuất, kinh doanh, quản trị đời để đáp ứng nhu cầu cấp thiết doanh nghiệp Ở nước ta, việc tin học hóa cơng tác quản lý quan, xí nghiệp trở nên phổ biến cấp thiết Nhưng vấn đề đặt chuẩn hóa cách xử lý liệu cơng tác quản lý quan xí nghiệp vấn đề nhiều hạn chế đội ngũ nhân viên quản lý quan, xí nghiệp Trong đơn vị công việc không phần quan trọng việc hỗ trợ quản lý tiền lương thu nhập ứng dụng Tin học Các nhà quản lý cần hệ thống thơng tin khả cung cấp thơng tin cách xác, kịp thời phù hợp nhằm hỗ trợ họ hồn thành cơng việc, chức Thơng qua liệu hệ thống thơng tin quản lý tiền lương thu nhập nhà quản trị nắm rõ tình hình thực cơng việc, sử dụng làm thông tin để lên báo cáo theo yêu cầu Hệ thống thông tin quản lý thu nhập hỗ trợ định quản trị nguồn nhân lực đặc biệt thơng tin lương, thưởng…có liên quan đến nguồn thơng tin bên ngồi hệ thống thơng tin khác doanh nghiệp Qua q trình thực tập công ty cổ phần xuất nhập Bắc Giang, em nhận thấy tầm quan trọng công tác kế tốn tiền lương cơng ty Hệ thống kế tốn tiền lương cơng ty ứng dụng tin học nhiên số lượng nhiều q trình mở rộng phát triển cơng ty, đòi hỏi phần mềm khả quản lý xác, cung cấp báo cáo cách kịp thời Chính vậy, em chọn đề tài “Cổ phần hợp tác phát triển truyền thông Việt Nam” II Mục đích đề tài - Được người sử dụng chấp nhận - Cung cấp thông tin cách xác, kịp thời, đầy đủ, nhanh chóng, phục vụ tốt trình quản lý lương, phục vụ tốt cho phận kế toán đơn vị sử dụng - Tận dụng lực tài nguyên (hệ thống máy tính), lực người nhằm nâng cao hiệu công tác quản lý - Hỗ trợ cho nhân viên kế tốn việc quản lý lương cơng ty Cổ phần hợp tác phát triển truyền thông Việt Nam” III Đối tượng nghiên cứu đề tài - Xây dựng phần mềm kế toán tiền lương Công ty IV Phạm vi nghiên cứu đề tài - Hệ thống thông tin quản lý tiền lương, khoản trích theo lương thực báo cáo liên quan tới tiền lương Công ty V Phương pháp nghiên cứu - Thu thập thông tin: khảo sát thực tế, vấn nhân viên công ty, tham khảo ý kiến chuyên gia - Phương pháp phát triển hệ thống thông tin quản lý - Phương pháp phân tích hệ thống thơng tin quản lý VI Kết cấu đồ án Ngoàiphần mở đầu, kết luận, phụ lục, danh mục tài khoản nội dung đồ án chia thành chương: Chương 1: : LÝ LUẬN CHUNG ĐỂ XÂY DỰNG PHẦN MỀM KẾ TOÁN TIỀN LƯƠNG TRONG DOANH NGHIỆP Chương 2: THỰC TRẠNG VÀ GIẢI PHÁP PHÂN TÍCH THIẾT KẾ QUẢN LÝ TIỀN LƯƠNG TẠI CƠNG TY CP HỢP TÁC & PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM Chương 3: Xây dựng phần mềm kế toán tiền TẠI CÔNG TY CP HỢP TÁC & PHÁT TRIỂN TRUYỀN THÔNG VIỆT NAM DANH MỤC CÁC TỪ VIẾT TẮT SỬ DỤNG TRONG ĐỒ ÁN Viết tắt CSDL DL CP BHXH BHYT BHTN BH HTTT BCC VFP TK PMKT CNV Viết đầy đủ sở liệu Dữ liệu Cổ phần Bảo hiểm xã hội Bảo hiểm y tế Bảo hiểm thất nghiệp Bảo hiểm Hệ thống thông tin Bảng chấm cơng Visual Foxpro Tài khoản Phần mềm kế tốn Cơng nhân viên CHƯƠNG 1: LÝ LUẬN CHUNG ĐỂ XÂY DỰNG PHẦN MỀM KẾ TOÁN TIỀN LƯƠNG TRONG DOANH NGHIỆP 1.1 LÍ THUYẾT CHUNG ĐỂ XÂY DỰNG PHẦN MỀM KẾ TỐN 1.1.1 Khái niệm, đặc điểm, yêu cầu phần mềm kế toán a Khái niệm Phần mềm tập hợp câu lệnh viết hay nhiều ngôn ngữ lập trình theo trật tự xác định nhằm thực số chức giải số tốn Phần mềm kế tốn phần mềm ứng dụng việc ghi chép, xử lí giao dịch kế tốn máy tính Q trình khâu thu nhận thông tin từ chứng từ gốc, lưu trữ thơng tin xử lí thông tin cuối cung cấp thông tin dạng sổ kế toán báo cáo tài chính, báo cáo kế tốn quản trị báo cáo thống phân tích tài khác b Đặc điểm - Phần mềm kế tốn tính tn thủ + Phần mềm kế toán phải tuân thủ luật kế toán, chuẩn mực kế toán, chế độ kế toán, thơng tư, nghị định kế tốn + Phần mềm kế toán phải tuân thủ quy định doanh nghiệp - Phần mềm kế toán sử dụng phương pháp kế toán + Phương pháp chứng từ kế toán: phương pháp kế toán sử dụng để phản ánh, kiểm tra nghiêp vụ kinh tế tài phát sinh thực hoàn thành theo thời gian, địa điểm phát sinh nghiệp vụ phục vụ cơng tác kế tốn cơng tác quản lí + Phương pháp tính giá: phương pháp kế tốn sử dụng thước đo tiền tệ để xác định giá trị đối tượng kế tốn phục vụ q trình thu nhận, xử lí, hệ thống hóa cung cấp thơng tin kinh tế tài đơn vị + Phương pháp tài khoản kế toán: phương pháp kế toán sử dụng tài khoản kế toán để phân loại nghiệp vụ kinh tế tài theo nội dung kinh tế ghi chép, phản ánh cách thường xuyên, liên tục, hệ thống số biến động đối tượng kế toán cụ thể + Phương pháp tổng hợp – cân đối kế toán: phương pháp kế toán sử dụng báo cáo kế toán để tổng hợp số liệu từ sổ kế toán theo mối quan hệ cân dối đối tượng kế toán, cung cấp tiêu kinh tế tài cho đối tượng sử dụng thơng tin kế tốn - Phần mềm kế tốn tính mềm dẻo để thích nghi với cơng tác kế tốn thường xun thay đổi mà khơng làm thay đổi liệu c Yêu cầu Trước hết phần mềm kế toán phải đáp ứng tiêu chuẩn phần mềm kế tốn nói chung sau: ➢ Dễ sử dụng: Các phần mềm phải giao diện thân thiện với cấu trúc phân cấp dễ hiểu dễ sử dụng ngôn ngữ phù hợp với ngôn ngữ tự nhiên người dùng ➢ Chống chép: Đây tiêu chuẩn để phần mềm bảo vệ quyền Để vậy, phần mềm đưa thị trường không để dạng mã nguồn mà phải biên dịch Khi cài đặt lên máy tính sử dụng làm thao tác chạy chương trình Setup (Cài đặt); ➢ Tương thích với nhiều phần mềm khác: Các phần mềm thị trường phải tương thích với phần mềm khắc để không gây xung đột tạo cố máy chạy chương trình; ➢ Tương thích với nhiều thiết bị ngoại vi: Phần mềm cần tương thích với nhiều thiết bị ngoại vi như: bàn phím, chuột, máy quét, máy in, máy đồ họa… ➢ Tính thời trang phần mềm: Không lạc hậu, cập nhật thường xuyên để phù hợp với tình hình biến động thực tế ➢ Tính giá cạnh tranh: Để giá hợp lí, cơng ty phần mềm phải biết tiết kiệm chi phí lập trình thơng qua sử dụng nguồn nhân lực hợp lí, sử dụng tốt cơng cụ hỗ trợ lập trình thiết kế phần mềm ➢ Yêu cầu nhớ: Các phần mềm viết cầnphải quan tâm đến việc tiết kiệm nhớ cho máy tính, giúp máy tính hoạt động nhanh Cộng Ký hiệu chấm công NT: Làm thêm ngày làm việc (Từ đến giờ) NN: Làm thêm ngày thứ bảy, chủ nhật (Từ đến giờ) NL: Làm thêm ngày lễ, tết (Từ đến giờ) Đ: Làm thêm buổi đêm Xác nhận phận (phòng ban) người làm thêm (Ký, họ tên) Người chấm công Ngày tháng năm Người duyệt (Ký, họ tên) (Ký, họ tên) Họ tên A B Bảng toán tiền lương (02-LĐTL) Đơn vị: Mẫu số: 02-LĐTL Bộ phận: (Ban hành theo QĐ số 74/2007/QĐ-BTC ngày 21/ / 2007 Bộ trưởng BTC) Sô : BẢNG THANH TOÁN TIỀN LƯƠNG Tháng năm Nghỉ việc Lương ngừng Phụ Phụ Tạ Các khoản Bậc H thời gian việc cấp cấp Tổn m phải khấu trừ vào lương lươn ệ hưởng thuộc g số ứng g số % lương c kỳ I Số côn g Số tiề n Số côn g Số tiề n quỹ lươn g 10 B H X H 11 12 Thuế Số Ký TNC Cộn tiề nhận N g n phải nộp 13 14 15 C Cộn g Tổng số tiền (viết chữ): Ngày tháng năm Người lập biểu Kế toán trưởng Giám đốc (Ký, họ tên) (Ký, họ tên) (Ký, họ tên) Bảng toán tiền thưởng (03-LĐTL) Đơn vị: Bộ phận: Mẫu số 03- LĐTL (Ban hành theo QĐ số 74/2007/QĐ-BTC ngày 21/ / 2007 Bộ trưởng BTC) BẢNG THANH TOÁN TIỀN THƯỞNG Kỳ II lĩnh Số: Quý năm ST T A Họ tên Chứ c vụ Bậc B C lươn g Cộng x x Mức thưởng Xếp loại thưởng x Ghi Số tiền Ký nhận D E x Tổng số tiền (Viết chữ): Người lập biểu (Ký, họ tên) Kế toán trưởng (Ký, họ tên) Ngày tháng năm Giám đốc (Ký, họ tên) Giấy đường (04- LĐTL) Đơn vị: Bộ phận: Cộng hoà xã hội chủ nghĩa Việt Nam Độc lập - Tự - Hạnh phúc =========&========= Mẫu số: 04- LĐTL (Ban hành theo QĐ số 74/2007/QĐBTC ngày 21/ / 2007 Bộ trưởng BTC) GIẤY ĐI ĐƯỜNG Số: Cấp cho: Chức vụ: : Được cử công tác tại: : Theo công lệnh (hoặc giấy giới thiệu) số ngày tháng năm Từ ngày tháng năm đến ngày tháng năm Ngày tháng năm Người duyệt (Ký, họ tên, đóng dấu) Tiền ứng trước Lương đ Cơng tác phí Cộng đ Nơi Ngà y Nơi đến Nơi Nơi đến Nơi Nơi đến Phương Độ dài Số ngày tiện sử dụng chặng đường công tác Lý lưu trú Chứng nhận quan (Ký tên, đóng dấu) - Vé người .vé x đ = .đ - Vé cước vé x đ = .đ - Phụ phí lấy vé điện thoại vé x đ = .đ - Phòng nghỉ vé x đ = .đ 1- Phụ cấp đường: cộng đ 2- Phụ cấp lưu trú: Tổng cộng ngày công tác: đ Ngày tháng năm Duyệt Số tiền toán là: Người công tác (Ký, họ tên) Phụ trách phận (Ký, họ tên) Kế toán trưởng (Ký, họ tên Phiếu xác nhận sản phẩm công việc hoàn thành (05-LĐTL) Mẫu số 05-LĐTL Đơn vị: Bộ phận: (Ban hành theo QĐ số 15/2006/QĐ-BTC ngày 20/ 03 / 2006 Bộ trưởng BTC) PHIẾU XÁC NHẬN SẢN PHẨM HOẶC CƠNG VIỆC HỒN THÀNH Ngày tháng năm Tên đơn vị (hoặc cá nhân): Theo hợp đồng số: ngày tháng năm ST T Tên sản phẩm (cơng việc) Đơn vị tính Số lượng Đơn giá Thành tiền Ghi A B C D Cộng Tổng số tiền (Viết chữ): Ngày tháng năm Nguời giao việc duyệt (Ký, họ tên) tên) người nhận việc (Ký, họ tên) người kiểm tra chất lượng (Ký, họ tên) người (Ký, họ Bảng tốn tiền th ngồi (07-LĐTL) Đơn vị: Mẫu số 07 - LĐTL Bộ phận: (Ban hành theo QĐ số 74/2007/QĐBTC ngày 21/ / 2007 Bộ trưởng BTC) BẢNG THANH TOÁN TIỀN TH NGỒI (Dùng cho th nhân cơng, th khốn việc) Số: Họ tên người thuê: Bộ phận (hoặc địa chỉ): Đã thuê công việc sau đển: địa điểm từ ngày / / đến ngày / / ST T Họ tên người thuê Địa số CM T Nội dung tên công việc thuê A B C D Số công khối lượng công việc làm Đơn giá than h toán Thàn h tiền Tiền thuế khấ u trừ Số tiền lại đượ c nhận 5= 3- Ký nhậ n E Cộng Đề nghị cho toán số tiền: Số tiền (Viết chữ): (Kèm theo chứng từ kế toán khác) Ngày tháng năm Người đề nghị toán Kế toán trưởng Người duyệt (Ký, họ tên) (Ký, họ tên) (Ký, họ tên) 11 Bảng trích nộp khoản theo lương (10-LĐTL) Đơn vị: Mẫu số 10 - LĐTL Bộ phận: (Ban hành theo QĐ số 74/2007/QĐBTC ngày 21/ / 2007 Bộ trưởng BTC) BẢNG TRÍCH NỘP CÁC KHOẢN THEO LƯƠNG Tháng năm Đơn ị tính ST T A Số tháng trích BHXH , BHYT, KPCĐ Tổng quỹ lương trích BHXH , BHYT, KPCĐ B Bảo hiểm xã hội, bảo hiểm y tế Kinh phí cơng đồn Trong đó: Tổn g số Trích vào chi phí Trừ vào lươn g Trong đó: Tổn g số Trích vào chi phí Trừ vào lươn g Số phải nộp cơng đồn cấp Cộng Ngày tháng năm Người lập bảng Kế toán trưởng Giám đốc (ký, họ tên) (ký, họ tên) (ký, họ tên) Số đượ c để lại chi đơn vị 12.Bảng phân bổ tiền lương BHXH (11-LĐTL) Đơn vị Mẫu số 11 - LĐTL Bộ phận (Ban hành theo QĐ số 74/2007/QĐ-BTC ngày 21/ / 2007 Bộ trưởng BTC) BẢNG PHÂN BỔ TIỀN LƯƠNG VÀ BẢO HIỂM XÃ HỘI Tháng……năm…… TK 334 - Phải trả người lao động S T T Đối tượng sử dụng (ghi Nợ TK) A B TK 154 - CPSXKD dở dang (TK 631 - Giá thành SX TK 642 - CP quản lý kinh doanh TK 142 - CP trả trước ngắn hạn TK 242 - CP trả trước dài hạn TK 335 - Chi phí phải trả TK 241 - XDCB dở dang TK 334 - Phải trả người lao động TK 338 - Phải trả, phải nộp khác …………………………… ……… Cộng Người lập TK338 - Phải trả, phải nộp khác Cộng Cộng TK Các Kinh BHX 338 Lương khoản phí BHYT TK H (338 khác CĐ 334 2338 3,33 84) TK 335 Tổng Chi cộng phí phải trả Ngày tháng năm Kế toán trưởng (Ký, họ tên) (Ký, họ tên) MỘT SỐ ĐOẠN CODE: Form formdangnhap.scx: ✓ Sự kiện Click nút “ Đăng nhập”: IF EMPTY(thisform.txtten.value) OR EMPTY(thisform.txtmk.Value) THEN messagebox("Phai nhap day du thong tin",0) thisform.txtten.setfocus ELSE SELECT nguoidung LOCATE FOR LOWER(ALLTRIM(ten))==LOWER(ALLTRIM(thisform.txtten.Value)) AND ALLTRIM(matkhau)==ALLTRIM(thisform.txtmk.Value) IF FOUND() PUBLIC m as integer IF quyen=1 m=1 ENDIF IF quyen=2 m=2 ENDIF SELECT nguoidung USE MESSAGEBOX([XinChao]+["]+UPPER(ALLTRIM(thisform.txtten.value))+ ["]+[ da dang nhap cong he thong!],0+64) thisform.Release DO FORM e:\qltienluong\form\giaodien ELSE y=MESSAGEBOX([ Ten Nguoi Dung hoac Mat Khau sai! Ban co muon nhap lai khong ?],4+48) IF y=6 thisform.txtten.Value=" " thisform.txtmk.Value=" " thisform.txtten.SetFocus ELSE QUIT ENDIF ENDIF ENDIF Form Danh mục bút toán: ✓ Sự kiện Click nút “ Thêm”: x1=ALLTRIM(thisform.txtsobt.Value) x2=ALLTRIM(thisform.txtno.Value) x3=ALLTRIM(thisform.txtco.Value) x4=ALLTRIM(thisform.txtdiengiai.Value) IF EMPTY(x1) AND EMPTY(x2) AND EMPTY(x3) AND EMPTY(x4) =MESSAGEBOX("Ban chua nhap thong tin but toan",0+16) thisform.txtsobt.SetFocus ELSE IF EMPTY(x1) =MESSAGEBOX("Ban chua nhap ma but toan",0+16) thisform.txtsobt.SetFocus ELSE IF EMPTY(x2) =MESSAGEBOX("Ban chua nhap tk no",0+16) thisform.txtno.SetFocus ELSE IF EMPTY(x3) =MESSAGEBOX("Ban chua nhap tk co",0+16) thisform.txtco.SetFocus ELSE IF EMPTY(x4) =MESSAGEBOX("Ban chua nhap dien giai",0+16) thisform.txtdiengiai.SetFocus ELSE SELECT dmbuttoan LOCATE FOR ALLTRIM(dmbuttoan.sobt)==ALLTRIM(thisform.txtsobt.Value) IF FOUND()then MESSAGEBOX("But toan da co",0+16) ELSE APPEND BLANK replace sobt WITH thisform.txtsobt.Value replace tkno WITH thisform.txtno.Value replace tkco WITH thisform.txtco.Value replace diengiai WITH thisform.txtdiengiai.Value thisform.Refresh thisform.grid1.Refresh ENDIF ENDIF ENDIF ENDIF ENDIF ENDIF thisform.txtsobt.Value="" thisform.txtno.Value="" thisform.txtco.Value="" thisform.txtdiengiai.Value="" thisform.txtsobt.setfocus thisform.Refresh thisform.grid1.Refresh ✓ Sự kiện Click nút “Sửa”: IF this.Caption = "\

Ngày đăng: 21/05/2019, 16:09

Từ khóa liên quan

Tài liệu cùng người dùng

  • Đang cập nhật ...

Tài liệu liên quan