Luận văn ứng dụng việc quản lý bằng tin học vào trong việc quản lý bệnh nhân của bệnh viện đa khoa tỉnh khánh hoà

Đồ án tốt nghiệp Trang LUẬN VĂN TỐT NGHIỆP KHOA CÔNG NGHỆ THÔNG TIN Đề tài: ứng dụng việc quản lý tin học vào việc quản lý Bệnh nhân Bệnh viện đa khoa tỉnh Khánh Hoà SVTH: Nguyễn Văn Hưng Lớp 40TH Trang Đồ án tốt nghiệp LỜI NÓI ĐẦU Ngày nay, với phát triển vượt bậc khoa học kỹ thuật Công nghệ thông tin lĩnh vực nhiều ứng dụng thiết thực lĩnh vực sống x hội chng ta, đặc biệt cơng cụ hỗ trợ đắc lực thiếu cơng tc quản lý Dễ dng thấy sở liệu ứng dụng quan trọng công tác tin học hoá quản lý kinh doanh cc doanh nghiệp Nhờ vo cơng tc tin học hố m cơng tc quản lý, điều hành doanh nghiệp tỏ có hiệu quả, nhanh chóng, xác, lưu trữ gọn, bảo mật cao dễ dàng Chính lẽ mà sở liệu giải pháp hữu hiệu cho doanh nghiệp tồn phát triển cách nhanh chóng Bệnh viện đa khoa tỉnh Khánh Hoà trung tâm khám chữa bệnh lớn tỉnh Khánh Hồ Do đó, nhu cầu ứng dụng việc quản lý tin học vo việc quản lý Bệnh nhn bệnh viện l nhu cầu tất yếu Chính lý ny m em chọn đề tài Hiện nay, có nhiều phần mềm hệ quản trị sơ khác Tuy nhiên, vào tình hình quản lý bệnh nhn v nhn vin thực tế bệnh viện m em chọn hệ quản trị sở liệu quan hệ SQL Server 2000 ngôn ngữ hỗ trợ cài đặt Visual Basic 6.0 Mặc dù, đ cĩ nhiều cố gắng thời gian thực tập có hạn nên khơng thể tránh khỏi sai lầm thiếu sót Rất mong đóng góp bảo quý thầy cng bạn đọc Cuối cùng, em xin chân thành cảm ơn hướng dẫn bảo tận tình thầy hướng dẫn Nguyễn Hữu Trọng, cng với hướng dẫn, giúp đỡ nhiệt tình kỹ sư Văn Hội (Phịng kế hoạch tổng hợp bệnh viện tỉnh Khnh Hồ) đ gip em hồn thnh đồ án tốt nghiệp Sinh Vin Thực Hiện Nguyễn Văn Hưng SVTH: Nguyễn Văn Hưng Lớp 40TH Trang Đồ án tốt nghiệp GIỚI THIỆU CHUNG VỀ NHIỆM VỤ Nội dung đề tài : Phân tích cài đặt chương trình quản lý bệnh nhân bệnh viện Khánh Hoà Yêu cầu : TTTN: - Tìm hiểu ngơn ngữ lập trình CSDL : SQL Server 2000 - Phân tích tìm hiểu nghiệp vụ quản lý - Phân tích thiết kế chi tiết cho tồn hệ thống - Viết chương trình demo đơn giản LVTN: · Hiện thực chương trình mơ hình máy đơn sử dụng ngơn ngữ Visual Basic 6.0 Yêu cầu chung : Đi tìm hiểu thực tế nghiệp vụ quản lý bệnh nhân bệnh viện Khánh Hoà Các bước tiến hành thực đề tài : Với nội dung yêu cầu trình bày trên, trình thực đề tài tiến hành qua bước sau : + Tìm hiểu ngơn ngữ lập trình CSDL : SQL Server 2000 + Tìm hiểu cách sơ lược công tác quản lý bệnh nhân bệnh viện Khánh Hoà Tiến hành thiết lập hệ thống câu hỏi vấn trình hệ thống câu hỏi cho người có liên quan để tham khảo chuẩn bị + Tiến hành vấn thu thập liệu cần thiết Sau viết lại nội dung vấn, trình để phận vấn xem lại để đóng góp ý kiến, bổ sung thiếu sót, cung cấp thêm thơng tin cần thiết Trình Giáo viên hướng dẫn nội dung thông tin thu thập để lấy ý kiến bổ sung Q trình phải tiến hành nhiều lần, lẽ liệu cần thu thập lớn lại liên quan nhiều thơng tin đòi hỏi cần có thời gian nghiên cứu, xem xét xếp thông tin cách hợp lý + Phân tích báo cáo có liên quan để làm sở xây dựng sở liệu (CSDL) cho hệ thống Trình Giáo viên hướng dẫn CSDL thiết kế để lấy ý kiến bổ sung + Tiến hành nhập số liệu cần thiết SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang + Tiến hành xây dựng giao diện cho chương trình quản lý bệnh nhân Visual Basic 6.0 Trình Giáo viên hướng dẫn xem qua giao diện xây dựng để lấy ý kiến bổ sung, sửa chữa + Tiến hành kiểm tra công việc thực CSDL thử có Sau đó, hồn thiện đề tài Trên đây, bước thực đề trình tiến hành đề tài Tuy nhiên, q trình làm có linh động thực thích hợp bước tùy theo tình hình thực tế diễn nhằm giảm thiểu thời gian bị chờ đợi 3.Kết đạt : Chương trình sử dụng ngôn ngữ sở liệu Microsoft Visual Basic 6.0 trao đổi với sở liệu SQL Server 2000 máy đơn Vì có bảo mật an tồn liệu cao Ngồi việc tạo sở liệu, xóa hay backup,…cũng thực dễ dàng Chương trình quản lý bệnh nhân bệnh viện giúp bệnh viện đa khoa tỉnh Khánh Hồ quản lý bệnh nhân cách hiệu Nắm bắt biến động bệnh nhân để có kế hoạch phục vu chữa trị cho bệnh nhân cách tốt Chương trình cho phép tìm kiếm bệnh nhân theo trật tự giúp bác sĩ người nhà bệnh nhân tìm kiếm thơng tin bệnh nhân cách dễ dàng Chương trình cho phép quản lý hồ sơ bệnh nhân cách linh động theo thời gian Do vừa tìm hiểu vừa làm kinh nghiệm xây dựng hạn chế nên mức độ tiện dụng người sử dụng chưa cao Màn hình giao diện, báo biểu mức độ chấp nhận SVTH: Nguyễn Văn Hưng Lớp 40TH Trang Đồ án tốt nghiệp PHẦN I TỔNG QUAN VỀ NGÔN NGỮ CÀI ĐẶT Chương I GIỚI THIỆU VỀ HỆ QUẢN TRỊ CƠ SỞ DƯ LIỆU VÀ SQL SERVER 2000 I KHÁI NIỆM CƠ BẢN VỀ CÁC LOẠI CƠ SỞ DỮ LIỆU Một hệ quản trị sở liệu hệ thống chương trình hỗ trợ cc tc vụ quản lý, khai thc liệu theo mơ hình sở liệu quan hệ SQLserver l hệ thống quản lý sở liệu quan hệ (RDBOMS) hay cịn gọi Relational Database Mannagement system Cơ sở liệu quan hệ sở liệu mà liệu bên tổ chức thành bảng Các bảng tổ chức cách nhóm liệu theo chủ đề có chứa cột hàng thơng tin Sau bảng liên kết với Database Engine có yêu cầu sở liệu quan hệ mơ hình sở liệu thông dụng II GIỚI THIỆU CHUNG VỀ SQL SERVER 2000 SQL (Structured Query Language ) ngôn ngữ dùng để truy vấn cho phép lấy thông tin từ bảng liệu SQL Server 2000 tối ưu nhiều so với sở liệu quan hệ Chúng phát triển để sử dụng nhiều ấn CE, Personal, Desktop Engine, standand… SQL Server 2000 hỗ trợ kiểm tra khĩa chính, phụ thuộc tồn tại, miền gi trị,… liệu bn cc bảng cch chặt chẽ SQL Server 2000 hỗ trợ khám phá mạnh cho sở liệu đa truy cập tức sở liệu mạng Những thnh phần SQL Server 2000 bao gồm: SVTH: Nguyễn Văn Hưng Lớp 40TH Trang Đồ án tốt nghiệp Hệ thống Diễn giải Ấn SQL Server 2000 Đây thành phần hệ thống trung tâm điều hành thành phần thực thi khc Với Desktop Engine bạn tìm thấy cc dịch vụ hệ thống SQL Server Agent, SQL Server Profiler… Và số công cụ khác Desktop Engine personal standard Desktop Enterprise Full-text sarch Đây phần tự chọn lúc cài đặt, bạn muốn chức tìm kiếm nn chọn hệ thống ny chng khơng l phần mặc nhin Full-text Sarch cung cấp chức tìm kiếm từ mạnh, sử dụng internet để tìm kiếm giải pháp tuyệt vời Nếu ban muốn tìm kiếm chuỗi đoạn văn cơng cụ thích hợp Personal Standard Developer enterprise English Query English Query cho phép người sử dụng Personal khơng có kỹ thuật SQL Server, Standard cách đặt câu hỏi chuỗi English sau dịch Query mà thực thi SQL Server Nhưng công cụ cài Developer đặt tách biệt SQL Server Enterprise Analysis Services Phần không bao gồm mặc định Personal phần cài đặt, chúng dạng sản phẩm tự Standand chọn, cơng cụ phân tích OLAP Developer (Online Analytical Proces), sử dụng cho sở liệu lớn Enterprise Replication Những phiên có OLAP đầy đủ chức Desktop Engine Enterprise Developer, ấn Personal cung có số chức OLAP Chức cho Personal phép tái tạo đến SQL Server khác, hệ thống thường dùng cho hệ SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang thống server từ xa hay network, nhằm để làm giảm trao đổi liệu SQL Standard Server với Developer enterprise Data Transform atuion Service Data Transformatuion Service (DTS) Desktop Engine mở rộng phiên SQL Server 2000, bao gồm chức trao đổi liệu giao tiếp sở liệu khác với Presonal nhau, giải pháp lập trình trn standard Visual Basic Developer enterprice Symmetric Multiprocessing (SMP): Dịch vụ hỗ trợ SQL Server 2000, dịch vụ phân phối công việc xử lý trn hệ thống cĩ nhiều vi xử lý để làm cân tiến trình trn CPU Clustering support: cĩ ấn Enterprise v Developer, Clustering cho php hệ thống cn cĩ Server bị dừng hệ thống khc tiếp nhận v xử lý thực chức hai server Windows 2000 Enterprise Windows 2000 Datacenter Cc thnh phần SQL Server 2000 RDBMS SQL Server 2000 chứa đựng nhiều đối tượng bao gồm:  Da tabase: Cơ sở liệu SQL Server  Tập tin log: tập tin lưu trữ chuyển tác SQL SVTH: Nguyễn Văn Hưng Lớp 40TH Trang Đồ án tốt nghiệp  Tables: Bảng liệu  Filegroiups: Tập tin nhĩm  Diagrams: Cơ sở quan hệ  Views: Khung nhìn số liệu dựa trn bảng  Stored Procedure: Thủ tục v hm nội  Users: Người sử dụng sở liệu  Roles: quy định vai trị SQL Server  Rules: Cc gi trị mặc nhin  Full-text catalogs: Tập phn loại liệu text  User-defined data types: Kiểu liệu người dùng định nghĩa Đối tượng sở liệu Cơ sở liệu đối tượng có ảnh hưởng cao bạn làm việc với SQL Server, nhiên đối tượng sở liệu thành phần sở liệu Bản thân SQL Server sở liệu, chúng bao gồm đối tượng như: Database, table, View, stored procedure nêu số sở liệu khác Cơ sở liệu SQL Server sở liệu đa người dùng, với server bạn có hệ quản trị sở liệu muốn có nhiều hệ quản trị sở liệu bạn cần có nhiều server Khi cài đặt xong bạn có sở liệu mặc định SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang  Master  Model  Msdb  Pubs  Northwind  Master: Đây sở liệu để chạy SQL Server Cơ sở liệu chứa trỏ đến file liệu sở sở liệu cài đặt hệ thống, thơng tin dịch vụ Các thơng tin dịch vụ bao gổm mục thông báo lỗi hệ thống, thông tin cập nhật vào, thủ tục lưu trữ hệ thống, máy chủ kết nối hay liên kết Cơ sở liệu Master truy cập lại gặp tình tai hoạ nhờ cc kỹ thuật đặc biệt  Cơ sở liệu Model: Đây sở liệu mẫu bạn tạo sở liệu mới, sở liệu Model chép, sau yêu cầu bạn kích thước thay đổi khác vể sở liệu áp dụng Do đó, đối tượng có sở liệu chép vào sở liệu tạo Ví dụ bạn đặt bảng tên người sử dụng vào sở liệu cài đặt SQL Server Mỗi có sở liệu tạo sau đó, bảng tên người sử dụng xuất sở liệu Cơ sở liệu Model có kích thước 1,5 MB sau cài đặt Vì sở liệu chép để tạo dựng sở liệu nên sở liệu nhỏ sở liệu Model  Cơ sở liệu Msdb : Như ta đ nu, chng ta cĩ hai sở liệu hệ thống Master Model, xoá hai sở liệu hệ thống SQL Server bị lỗi , vớI sở liệu Msdb khc Msdb l SQL Agent lưu trữ tất tác vụ xảy SQL Server  Cơ sở liệu Tempdb: Cơ sở liệu Tempdb sở liệu SQL Server Cơ sở liệu cho phép người sử dụng tạo ứng dụng tham khảo hay thực tập trước bạn bắt đầu với sở liệu thật Cơ sở liệu Tempdb nơi xếp, kết nối hoạt động khác địi hỏi vị trí tạm thời thực sở liệu có kích thước 2,5 MB Nhưng SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 10 Đồ án tốt nghiệp tăng thêm bạn cần thêm khoảng trống Nó khởi tạo lại khí SQL Server khởi động lại  Cơ sở liệu Pubs: Cơ sở liệu Pubs chứa hầu hết nội dung hướng dẫn, trợ giúp sách tham khảo SQL Server, hầu hết tính sở liệu nêu bật qua việc cài đặt chúng vào sở liệu Pubs Cơ sở liệu có kích thước 2MB sau cài đặt Bạn xố sở liệu mà không cần xác nhận với SQL Server  Cơ sở liệu Northwind:Cũng giống sở liệu Pubs cung sở liệu mẫu cho người dùng tham khảo, lập trình Visual Basic hay Access dng để truy cập SQL Server Cơ sở liệu cài đặt phần SQL Server, cần dùng cấu trúc hai sở liệu bạn sử dụng hai file kịch Script mang tn Inspubs.sql v insnwnd.sql  Tập tin chuyển tc log :chứa hoạt độnghay chuyển tác sở liệu theo thời gian Thơng thường tìm cố xẩy với sở liệu, người dùng cần tham khảo tập tin log biết nguyên nhân III GIỚI THIỆU VỀ ĐỐI TƯỢNG CỦA CƠ SỞ DỮ LIỆU Bảng – Table Trong sở liệu, bảng (Table) thành phần chúng Do bảng đối tượng lưu trữ liệu thực, cần giao tiếp với sở liệu khác, bảng đối tượng loại sở liệu nào, chúng coi miền liệu Bảng dùng để lưu trữ tất liệu tổ chức thành nhiều hàng nhiều cột Mỗi cột bảng lưu loại thông tin định gọi kiểu liệu, liệu nhập vào chấp nhận từ chối tuỳ thuộc vào nguyên tắc ràng buộc liệu liệu tương thích hệ thống hay người dùng định nghĩa Khi định nghĩa sở liệu ta cần quan tâm đến thông số sau:  Key: Trường có khố hay khơng  ID: Trường có thuộc tính Indentity hay khơng  Culumn Name: Tên trường SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 71 Ơ ListItem đối tượng Listview có chức hiển thị liệu, đoạn chương trình ta sử dụng phương thức (Set rs = cn.Execute(Str)) để thực câu truy vấn (Câu truy vấn trả Record thông tin table tỉnh)kết trả từ câu truy vấn gán cho rs hiển thị Listview Để thêm tỉnh (thành) ta có mã lệnh sau DE.Sp_NhapTinh MaTinh, TenTinh Trong DE đối tượng Data Environment mà ta nói SP_NhapTinh hàm (hay Stored Procedure) viết lưu sở liệu, câu lệnh truy vấn tạo tỉnh sau: Create proc Sp_NhapTinh @MaTinh nchar(3), MaTinh TenTinh tham số dầu vào @TenTinh char(30) Stored Procedure AS Insert Into tblTINH ( MaTinh, TenTinh ) Values ( @MaTinh,@TenTinh ) GO Tương tự với phương Stored Procedure sửa tên tỉnh Với việc xố tỉnh có khác chút việc xố tỉnh có liên quan đến ràng buộc tồn vẹn Việc xố tỉnh khơng xóa tỉnh đó, việc phải với việc xoá tất huyện xa thuộc tỉnh ngồi ta phải xố tất các bệnh nhân nhân viên (cùng giấy tờ kèm theo) thuộc tỉnh cần xố Mã lệnh có dạng sau: Thủ tục dùng để xoá tỉnh CREATE PROCEDURE Sp_XoaTinh @Matinh nchar(3), ‘Tham số đầu vào Stored Procedure @TenTinh char(30) AS - Xoá khám bệnh úng với bệnh nhân thuộc tỉnh DELETE From tblKhamBenh Where tblKhamBenh.MaBenhNhan in ( Select MaBenhNhan From TblBenhNhan Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) - Xoá khám bệnh úng với nhân viên thuộc tỉnh DELETE From tblkhamBenh SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 72 Where tblKhamBenh.MaNhanVien in ( Select MaNhanVien From TblNhanVien Where tblNhanVien.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) Xóa dùng thuốc ứng với đơn thuốc bệnh nhân DELETE From tblDungThuoc Where tblDungThuoc.MaDonThuoc in (Select MaDonThuoc From tblDonThuoc Where tblDonThuoc.MaBenhNhan in (Select MaBenhNhan From tblBenhNhan Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh)))) Xoá đơn thuốc bệnh nhân thuộc tỉnh DELETE From tblDonThuoc Where tblDonThuoc.MaBenhNhan in (Select MabenhNhan From tblBenhNhan Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) - Xoá tạm ứng bệnh nhân thuộc tỉnh DELETE From tblTamUng Where tblTamUng.MaBenhNhan in ( Select MaBenhNhan From TblBenhNhan Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) - Xoá bệnh án bệnh nhân DELETE From tblBenhAn Where tblBenhAn.MaBenhNhan in ( Select MaBenhNhan From TblBenhNhan SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 73 Đồ án tốt nghiệp Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) -Xoá bệnh nhân thuộc tỉnh DELETE From tblBenhNhan Where tblBenhNhan.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh)) - Xoá dùng thuốc mà nhân viên thuộc tỉnh lập DELETE From tblDungThuoc Where tblDungThuoc.MaDonThuoc in (Select MaDonThuoc From tblDonThuoc Where tblDonThuoc.MaNhanVien in (Select MaNhanVien From tblNhanVien Where tblNhanVien.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh)))) Xoá đơn thuốc mà nhân viên lập DELETE From tblDonThuoc Where tblDonThuoc.MaNhanVien in (Select MaNhanVien From tblNhanVien Where tblNhanVien.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh))) - Xoá bệnh án mà nhân viên lập DELETE From tblBenhAn Where tblBenhAn.MaNhanVien in ( Select MaNhanVien From TblNhanVien Where tblNhanVien.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 74 Đồ án tốt nghiệp Where tblHuyen.MaTinh=@MaTinh)) ) -Xoá tất nhân viên thuộc tỉnh DELETE From tblNhanVien Where tblNhanVien.maXa in (Select MaXa From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh=@MaTinh)) Xoá tất xã thuộc tỉnh -DELETE From tblXa Where tblXa.MaHuyen in (Select MaHuyen From tblHuyen Where tblHuyen.MaTinh = @Matinh) Xoá tất huyện thuộc tỉnh DELETE From tblHuyen Where tblHuyen.Matinh = @Matinh - Xoá tỉnh có mã tỉnh ra-DELETE From tblTinh Where MaTinh=@Matinh GO Đối với thủ tục xoá huyện nhaư xã ta phải xó tất bệnh nhân nhân viên trực thuộc địa danh Trong qúa trình trình bày liệu chúng tơi sử dụng số View để kết nối bảng ví dụ với View địa sau: CREATE VIEW dbo.vwDiaChi AS SELECT dbo.tblTINH.TenTinh, dbo.tblHUYEN.TenHuyen, dbo.tblXA.TenXa, dbo.tblXA.Maxa FROM dbo.tblHUYEN INNER JOIN dbo.tblTINH ON dbo.tblHUYEN.MaTinh = dbo.tblTINH.MaTinh INNER JOIN dbo.tblXA ON dbo.tblHUYEN.MaHuyen = dbo.tblXA.MaHuyen Để tìm kiếm bệnh nhân chúng tơi sử dụng hàm tìm kiếm hàm trả table tiêu chí tìm kiếm tham số đầu vào hàm Ví dụ hàm tìm kiếm bệnh nhân theo họ tên đầy đủ chương trình CREATE FUNCTION udf_TimBenhNhanTheoHoTen (@HoBenhNhan Char(20), @TenBenhNhan char(20)) RETURNS Table - SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 75 AS Return Select * From tblBenhNhan Where (tblBenhNhan.HoBenhNhan= @HoBenhNhan) and (tblBenhNhan.TenBenhNhan= @TenBenhNhan) GO Trọng đoạn chương trình việc tìm bệnh nhân đơn giản Giả sử ta nhớ đầy đủ họ tên đầy đủ bệnh nhân ta tìm theo phương pháp Song nhớ họ tên bệnh nhân thi ta tìm bệnh nhân hàm tìm theo họ, theo tên bệnh nhân, chương trình sử dụng số hàm khác mà không tiện trình bày báo cáo Thoạt tiên ta có cảm giác hàm (Function) giống với View song với View khơng có liệu đầu vào với hàm ngược lại Rõ ràng để truy xuất liệu với hàm linh hoạt với View nhiều SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 76 Đồ án tốt nghiệp CHƯƠNG IV GIỚI THIỆU MỘT SỐ FORM CHÍNH KHI CHẠY CHƯƠNG TRÌNH  Dưới form chương trình, chạy chương trình form ny gọi đầu tiên, từ form ta thực chương trình từ cc form khc như: Tập tin, Nhập liệu, nhn vin, bệnh nhn, thống k, tìm kiếm, bo biểu SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 77  Taị giao diện chương trình nhấn chuột vo nhập liệu, từ chon thông tin cần đăng nhập như: Vị trí khám bệnh, nơi diều trị, bệnh, thuốc  Form đăng nhập vị trí khm bệnh SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 78 Tại thêm vị trí khám bệnh có vị trí khám bệnh thành lập, hay sửa vị trí khám bệnh vị trí khám bệnh thay đổi xố vị trí khám bệnh vị trí khám bệnh khơng cịn Thm nt mới, khơng muốn thực cơng việc ny nhấn nt bỏ qua Tương tự ta xố, sửa ta  Form X: Thực cch nhấn vo địa Tại chọn đăng nhập thông tin cho tỉnh, huyện hay x SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 79 Tại thêm mới, xoá bỏ hay sửa thông tin x x tch hay thơng tin x bị thay đổi xoá bỏ x khơng cịn tồn Thm cch nhấn nt mới, huỷ bỏ cơng việc cch nhấn nt bỏ qua Thay đổi thông tin x cch nhấn nt sửa, huỷ bỏ cơng việc cch nhấn nt bỏ qua, hồn thành cơng việc cách nhấn nút lưu Xố thơng tin x cch nhấn nt xố  Form hồ sơ nhân viên: Khi nhấn nhân viên form chọn số thông tin cần đăng nhập như: Form hồ sơ nhân viên, trình cơng tc SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 80 Tại thêm hồ sơ nhân viên có nhân viên tới công tác bệnh viện, cách nhấn nút mới, hồn thành cơng việc nhấn nút lưu, huỷ bỏ công việc nhấn nút bỏ qua Sửa hồ sơ nhân viên thông tin nhân viên thay đổi, cách nhấn nút sửa, hoàn thành công việc nhấn nút lưu, huỷ bỏ công việc nhấn nút bỏ qua Xố bỏ thơng tin nhn vin nhn vin khơng cịn cơng tc bệnh viện, cch nhấn nt xố SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 81  Form hồ sơ bệnh nhân: Khi nhấn bệnh nhân có thông tin cần quan tâm như: Hồ sơ bệnh nhân, tạm ứng viện phí, bảo hiểm… Tại form hồ sơ nhân viên, thêm có bệnh nhân đến khám chữa bệnh, sửa đổi thông tin bệnh nhân, xố bỏ bệnh nhân bệnh nhân khơng cịn diều trị khoảng thời gian di Ngồi cịn số form khác thơng tin khác tìm kiếm bệnh nhn, tìm kiếm nhn vin, bo biểu, bo co thống k bệnh, danh sch bệnh nhn, danh sch trưởng khoa… SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 82 Đồ án tốt nghiệp CHƯƠNG V KẾT LUẬN HƯỚNG PHÁT TRIỂN ĐỀ TÀI I Kết luận: Xây dựng hệ thống thông tin quản lý không việc lập trình đơn thuần, mà đòi hỏi cách có hệ thống giai đoạn khảo sát, phân tích thiết kế Việc xây dựng hệ thống quản lý phải đáp ứng tất vấn đề đặt từ khâu dặt vấn đề, giải quết toán, thiết kế tốn việc đóng gói sản phẩm đưa thử nghiệm vấn đề đòi hỏi nhiều thời gian công sức Đứng trước xu hướng phát triển công nghệ thông tin vũ bo, việc tin học hố việc quản lý hnh l vơ cng quan trọng v thiết Nĩ gip cho cc quan nhà nước giải công việc nhanh chóng hiệu Ứng dụng sở liệu đ giải vấn đề Với đề tài Quản lý bệnh nhân bệnh viện đa khoa tỉnh Khánh Hồ, chương trình ci đặt chưa hồn thiện chức năng, song có thời gian phát triển hồn thiện chương trình ny cĩ ích nhiều giúp cho nhân viên bệnh viện công việc lưu trữ thống kê bệnh nhân nhân viên quản lý bệnh nhn bệnh viện cch thuận tiện v dễ dng nhiều II Hạn chế: Do thời gian thực đề tài tương đối hạn chế, kinh nghiệm chưa nhiều nên chương trình khơng thể trnh thiếu sót định Bên cạnh chưong trình cị cĩ số chức khơng có đủ thời gian để thực kịp Đồng thời cịn cĩ số form chưa hoàn thành đầy đủ xác ràng buộc liệu chưa đầy đủ Hơn trình vừa viết chương trình vừa tìm hiểu ngơn ngữ SQL Server nn chưa thể tránh khỏi thiếu sót III Hướng phát triển đề tài: Chương trình quản lý bệnh nhân hồn thành góp phần quan trọng việc quản lý cjứng từ sổ sách bệnh nhân bệnh viện Để chương trình cĩ thể hoạt động hiệu cần liệu phải lưu trữ hệ quản trị sở liệu có tính bảo mật Cần có kết hợp song song SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 83 quản lý nhân viên bệnh nhân cách chặt chẽ để việc theo di v quản lý bệnh viện tốt Nếu đưa chương trình quản lý cc thơng tin bệnh nhn ln cc trang Web để giúp cho người thân bệnh nhân có thuận lợi để theo di qu trình điều trị bệnh của người thân cho dù ngồi nhà hay nơi Đồng thời bệnh nhân nằm điều trị bệnh viện, lý mà cần phải chuyển đến bệnh viện khác để điều trị Tại bác sĩ bệnh viện tiếp nhận không cần xem hồ sơ bệnh nhân mà cần lên trang web bệnh viện nơi bệnh nhân chuyển đến để xem biết tồn thơng tin bệnh nhân như: hồ sơ bệnh nhân, bệnh án bệnh nhân… TI LIỆU THAM KHẢO [1] Lập trình sở liệu với Visual Basic 6.0 ( tác giả Nguyễn Thị Ngọc Mai (chủ biên ) Nhà xuất giáo dục 2000) [2] Lập trình ứng dụng chuyn nghiệp SQL SERVER 2000 (NXB nh xuất gio dục, Phạm Hữu Khang chủ bin) [3] Bài giảng Cơ sở liệu & Phn tích thiết kế hệ thống thơng tin quản lý (Nguyễn Hữu Trọng, trung tm ngoại ngữ tin học_trường đại học Thuỷ sản lưu hành nội 10/1999) [4] Lập trình Visual Basic 6.0 21 ngy (Nguyễn Tiến, Ngơ Quốc Việt, Phạm Tuấn Kỳ Nh xuất gio dục 1997) [5] Lập trình sở liệu với Visual Basic 6.0 (Đậu Quang Tuấn Nhà xuất trẻ 2000) [6] Lập trình sở liệu 21 ngày (Nguyễn Đình T chủ bin, tập Nh xuất gio dục 2000) [7] Một số luận văn khoá cũ SVTH: Nguyễn Văn Hưng Lớp 40TH Trang 84 Đồ án tốt nghiệp MỤC LỤC Trang GIỚI THIỆU CHUNG VỀ NHIỆM VỤ …………………………………….…………… Nội dung đề tài …………………………………………………………………………………………… …………………………….… 2 Các bước tiến hành thực đề tài ………….……………………………………………………………………… … Kết đạt …………………………………………………………………… Phần I : TỔNG QUAN VỀ NGÔN NGỮ CÀI ĐẶT Chương I.GIỚI THIỆU VỀ HỆ QUẢN TRỊ CƠ SỞ DƯ LIỆU VÀ SQL SERVER 2000 I.Khái niệm loại sở liệu II.Giới thiệu chung SQL Server 2000 III.Giới thiệu đối tượng sở liệu IV.Kiểu liệu 10 V Các cơng cụ SQL Server 2000 .11 VI.Các phát biểu T-SQL 12 VII.Khái niệm đối tượng SQL cách tạo đối tượng SQL Server 15 Chương II :TỔNG QUAN VỀ VISUAL BASIC VÀ CƠ SỞ DỮ LIỆU TRONG VISUAL BASIC 24 I Mơ hình liệu ADO .24 II.Các thuộc tính ADO dặc biệt 25 Phần II ỨNG DỤNG XÂY DỰNG HỆ THỐNG QUẢN LÝ BỆN NHÂN TẠI BỆN VIỆN 26 Chương I ĐẶC TẢ BÀI TOÁN 26 Chương II PHÂN TÍCH THIẾT KẾ HỆ THỐNG THƠNG TIN .29 I Mơ hình quan niệm liệu 29 II Mơ hình tổ chức liệu 30 III Mơ hình vật lý liệu 31 IV Mơ hình thơng lượng thơng tin 43 V Mơ hình quan niệm xử lý 44 VI Mơ hình tổ chức xử lý 44 VII Mơ hình vật lý xử lý 50 Chương III THỰC HIỆN CÀI ĐẶT CHƯƠNG TRÌNH 60 I Cách kết nối sở liệu 60 II Các phương thức đối tượng ADODB……………………………………………………………………………………… 60 III Một số đoạn chương trình sử dụng phương thức ……………….63 Chương IV : GIỚI THIỆU MỘT SỐ GIAO DIỆN CHÍNH KHI CHẠY CT 69 Chương V : KẾT LUẬN VÀ HƯỚNG PHÁT TRIỂN ĐỀ TÀI 75 I Kết luận 75 II.Hạn chế 75 III Hướng phát triển đề tài .75 TI LIỆU THAM KHẢO 76 SVTH: Nguyễn Văn Hưng Lớp 40TH Đồ án tốt nghiệp Trang 85 NHẬN XÉT CỦA GIÁO VIÊN SVTH: Nguyễn Văn Hưng Lớp 40TH ... chóng Bệnh viện đa khoa tỉnh Khánh Hoà trung tâm khám chữa bệnh lớn tỉnh Khánh Hồ Do đó, nhu cầu ứng dụng việc quản lý tin học vo việc quản lý Bệnh nhn bệnh viện l nhu cầu tất yếu Chính lý ny... dàng Chương trình quản lý bệnh nhân bệnh viện giúp bệnh viện đa khoa tỉnh Khánh Hoà quản lý bệnh nhân cách hiệu Nắm bắt biến động bệnh nhân để có kế hoạch phục vu chữa trị cho bệnh nhân cách tốt... Chương trình cho phép tìm kiếm bệnh nhân theo trật tự giúp bác sĩ người nhà bệnh nhân tìm kiếm thơng tin bệnh nhân cách dễ dàng Chương trình cho phép quản lý hồ sơ bệnh nhân cách linh động theo thời