1. Trang chủ >
  2. Công nghệ thông tin >
  3. Lập trình >

CC CÁC DV HỖ TRỢ

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (500.2 KB, 50 trang )


Thực Tập Chuyên Ngành



III.6. MÔ HÌNH TỔ CHỨC XỬ LÝ

1. Bảng công việc:

STT



TÊN CÔNG VIỆC



NƠI THỰC HIỆN



PHƯƠNG THỨC



1



Đăng ký khám

chữa bệnh



Phòng ghi số



Thủ công



2



Cấp số cho BN



Phòng ghi số



3



Chỉ định Bs KB Phòng cấp số

cho BN



4



Khám bệnh cho

BN



Bs chuyên

khoa KCB



5



Kết quả khám

bệnh của BN



Phòng(Khoa)

của BSKB



6



Lập toa thuốc

cho BN



Bác sĩ KB



7



Thu phí KB



Phòng thanh

toán viện phí



8



Lập lệnh nhập

viện (Trừ BN

điều trị tại nhà)

Tiếp nhận BN

đến chữa trị



Bác sĩ KB



10



Lập BA chi tiết

cho BN



Bác sĩ chuyên

khoa



11



Điều trị cho BN Bác sĩ chuyên

khoa



12



Cung cấp các

DV hỗ trợ điều

trị bệnh

Thu tạm ứng



9



13



Khoa(Khoa)

điều trị



Phòng KHTH

+ Phòng KCB

Phòng TTVP

Trang26



TẦN SUẤT



Bất kỳ

lúc nào

khi cóYC

/ ngày

Thủ công

Khi có

BNYC /

ngày

Thủ công

Khi có

BNYC /

Ngày

Thủ công

Khi BN

đã có số /

Ngày

Thủ công

Khi có

BNKCB /

Ngày

Thủ công

Khi có

BNKCB /

Ngày

Tự động

Khi có

BNKCB /

Ngày

Thủ công

Khi có

BNKCB /

Ngày

Thủ công

Khi có

lệnh nhập

viện /

Ngày

Thủ công

Khi có

BNNViện

/ Ngày

Thủ công + Tự Khi có

động

BNNViện

/ Ngày

Thủ công

Khi có

BN yêu

cầu/Ngày

Tự động

3 ngày /



CHU KỲ



Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày

Hàng

ngày



Hàng

ngày

Hàng

ngày

3 ngày



Thực Tập Chuyên Ngành



14

15



16

17



tiền viện phí

của BN

Thanh toán viện Phòng TTVP

phí

TT toàn bộ viện Phòng TTVP

phí khi XV



Lập DSBN trốn

viện, không

TTVP đầy đủ.

Thanh toán tiền

viện phí với

BHYT



Khoa(Phòng)

điều trị cho

BN

Phòng Thanh

toán viện phí



lần

Tự động

Tự động



Thủ công

Thủ công



3 ngày /

lần

Khi BN

KVB

xong / lần

Khi có

BN trốn

viện / lần

1 lần /

tháng



3 ngày

Khi BN

điều trị

xong

hoàn

toàn.

Khi có

BN trốn

viện

1 tháng



1. Mô hình tổ chức xử lý:

BỆNH PHÒNG

NHÂN CẤP SỐ



KHOA

(P) KCB



PHÒNG BÁC SĨ

KHTH

KCB



Khi có yêu

cầu KCB của

BN



ĐKKCB

YES



Hàn

g

ngày

khi



BN

KCB



DS

BN



YC

KC

B



CẤP SỐ

CHO BN

YES



DSBN đã

được cấp số

(1)



Trang27



PHÒNH

TTVP



BAN

LÃNH

ĐẠO



Thực Tập Chuyên Ngành



(1)

CHỈ ĐỊNH

BSKB-BN

YES

DSBN

đã

được

chỉ

định

BS

KCB



BS-KCB

CHO BN

YES



DSBN

đã

được

BS-KB



KẾT QUẢ

KB BN

YES NO



DSBN phải

nhập viện



LẬP

LỆNH NV

YES



DSBN điều trị

tại nhà



THU PHÍ

KB

YES



DSBN đã

thu phí KB

(2)

(3)



Trang28



Thực Tập Chuyên Ngành



(3)

(2)



(3)



DSBN

đã có

lệnh

nhập

viện



LẬP TOA

THUỐC

YES



TIẾP NHẬN

BNNV

YES



BN tự ĐT

tại nhà



DSBN

đã nhập

viện



LẬP BA

CHI TIẾT

CHO BN

YES



DSBN

đã có

BA



ĐT CHO

BN

YES



DSBN đang

nằm ĐT

bệnh

CUNG CẤP CÁC

DVHTĐTB CHO BN

YES



DSBN

đang ĐT

(4)



Trang29



Thực Tập Chuyên Ngành



(4)

TTVP

CỦA BN

YES

NO



DSBN đã

TT đầy

đủ tiền

VP



DSBN

trốn viện



CẤP GIẤY

XUẤT VIỆN

YES



DSBN đã

xuất viện



LẬP DSBN

CHƯA

TTĐĐVP

YES



DSBN

chưa

TTĐĐVP



LÃNH ĐẠO

XEM XÉT

YES



DSBN

tự xuất

viện



Sau khi tổng kết

BN-SD-TBHYT



THANHTOÁN

VP VỚI BHYT

YES



DSVP của BN có

BHYT đã TT với

BHYT



Trang30



1 tháng

một lần



Thực Tập Chuyên Ngành



HỆ THỐNG

III.7. MÔ HÌNH VẬT LÝ XỬ LÝ

Mô hình tổng thể của hệ thống

BỆNH NHÂN

NHÂN VIÊN



QUẢN TRỊ

VIÊN



BỆNH NHÂN



Thông

tin cần

biết



Đăng

nhập hệ

thống



Xem

thông

tin về

bệnh

viện



Xem hồ

sơ bệnh

án



Xem chi

phí điều

trị



Xem toa

thốc và

cách

dùng

thuốc



NHÂN VIÊN



Đăng

nhập hệ

thống



Thay

đổi mật

khẩu



Tạo toa

Lập

thuốc

DSBN

cho BN

không

thêm,

TTVP +

xoá, sửa

Trang31 DSBN

toa

trốn

thuốc

viện



Tạo bệnh

án chi

tiết cho

BN nhập

viện



Tạo

giấy

xuất

viện cho

bệnh

nhân



Thực Tập Chuyên Ngành



QUẢN TRỊ VIÊN



Đăng

nhập hệ

thống



Thay

đổi mật

khẩu



Thông

tin

chung



Hệ quản





Báo cáo

-in ấn

hồ sơ



THÔNG TIN CHUNG



Thông tin

về liên

tịch bệnh

viện



Thông tin

về số khoa

điều trị

hiện có tại

bệnh KH



Thông tin

về danh

sách các

trưởng

khoa tại

bệnh viện



BÁO CÁO-IN ẤN HỒ SƠ



Danh

sách bệnh

nhân nhập

viện



Danh sách

nhân viên

bệnh viện

Trang32



In Toa

thuốc,

bệnh án



Thực Tập Chuyên Ngành



HỆ THỐNG QUẢN LÝ



Quản lý

hồ sơ

bệnh

nhân



Quản lý

hồ sơ

nhân

viên



Quản lý

bệnh án

bệnh nhân



Từ điển

thông tin

địa chỉ



Từ điển

về thông

tin bệnh

viện



DANH MỤC TỪ ĐIỂN ĐỊA CHỈ



Thêm

dữ liệu

Đường

Thôn Ấp

mới



Xem

Xoá

Sửa

thông

tin

đường

–thôn

ấp



Thêm

dữ liệu



-Phườn

g mới



Thêm

Xoá Sửa

thông tin

Xã Phường



Thêm

thông

tin về

Quận Huyện

mới



Thêm

Xoá

Sửa

thông

tin

Quận Huyện



Thêm

thông

tin về

Tỉnh TP



Thêm

Xoá

Sửa

thông

tin về

Tỉnh TP



DANH MỤC TỪ ĐIỂN TT VỀ BỆNH VIỆN



Thêm

thông

tin về

khoa

điều trị

mới



Thêm

xoá

sửa

thông

tin về

Khoa

điều trị



Thêm

thông

tin về

dịch vụ

mới



Thêm

xoá sửa

thông

tin về

dịch vụ



Thêm

thông

tin về

Nơi

khám

Trang33 bệnh

mới



Thêm

xoá

sửa

thông

tin về

Nơi

khám

bệnh



Thêm

thông

tin về

thuốc

mới



Thêm

xoá

sửa

thông

tin về

thuốc



Thực Tập Chuyên Ngành



CHƯƠNG TRÌNH QUẢN LÝ NHÂN VIÊN



Thêm

thông

tin về

hồ sơ

nhân

viên



Thêm

xoá

sửa

thông

tin về

hồ sơ

nhân

viên



Thêm

thông

tin về

Đơn vị

công

tác

mới



Thêm

xoá sửa

thông

tin về

Đơn vị

công

tác



Thêm

thông

tin về

quá

trình

công

tác

mới



Thêm

xoá

sửa

thông

tin về

quá

trình

CT



Thêm

thông

tin về

Khen

thưởng

- KL

mới



Thêm

xoá

sửa

thông

tin về

Khen

thưởng

- KL



Thêm

thông

tin về

Đối

tượng

bệnh

nhân

mới



Thêm

xoá

sửa

thông

tin về

Đối

tượng

BN



CHƯƠNG TRÌNH QUẢN LÝ BỆNH NHÂN



Thêm

thông

tin về

hồ sơ

bệnh

nhân



Thêm

xoá

sửa

thông

tin về

hồ sơ

bệnh

nhân



Thêm

thông

tin về

Bảo

hiểm y

tế mới



Thêm

xoá sửa

thông

tin về

Bảo

hiểm y

tế



Trang34



Thêm

thông

tin về



quan

công

tác BN

mới



Thêm

xoá

sửa

thông

tin về



quan

CTBN



Thực Tập Chuyên Ngành



Chương IV : HIỆN THỰC CHƯƠNG TRÌNH

Một số thuật toán cài đặt chương trình:

1. Cách tạo kết nối dữ liệu :

Database Access Component

Database Access Component còn gọi là ADO (ActiveX Data Object), các

object của ADO cung cấp cơ chế kết nối (connection) với hầu hết các kiểu database,

cũng như việc truy xuất, cập nhật các database này.

ADO Interface

Các đối tượng trong ADO giao tiếp với database thông qua ODBC (Open

Database Connectivity), chúng có thể được sử dụng với bất kỳ loại database nào nếu

như có ODBC driver hỗ trợ.

Các đối tượng trong ADO :

Gồm : Connection, Recordset và Command. Sử dụng Connection ta có thể thiết

lập sự liên kết với dữ liệu, thông qua đó ta có thể lấy các Record hoặc cập nhật một

record bằng cách sử dụng Command Object. Kết quả thực hiện các query trên database

sẽ được lưu vào đối tượng Recordset, trên đối tượng này có thể duyệt và lấy ra một

hay nhiều record.

Cách kết nối để mở một cơ sở dữ liệu từ Acceess

------------------------------------------------------------------------------------------------



Trang35



Thực Tập Chuyên Ngành

Option Explicit

Public Test_connection As Boolean

Public mahuyen As String

Public cn As New ADODB.Connection

Public ConnectionString As String

Sub open_mdb()

****************************************************************

Dim db_name, str As String

db_name = App.Path & "\QLCNVC_MoiNhat.mdb"

ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &

db_name & ""

DE1.CE1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist

Security Info=False;Data Source=" & db_name & ""

DE1.CE1.Open

cn.Open ConnectionString

Test_connection = True

End Sub

1. Các phương thức đối tượng Connection

- Open method :

Được sử dụng để mở một liên kết với database. Ngay sau tạo instance cho

Connection Object, ta có thể mở một kết nối với Data Soure để truy xuất dữ liệu.

+ Execute method:

Cho phép thực thi một câu lệnh tác động lên Data Soure.

Trong đó CommandText là chuỗi lệnh cần thực hiện, thông quá số option các

giá trị khác nhau quy định loại CommandText.

Giá trị

0

1



Danh hiệu hằng tương

ứng

adCmdUnknown

adCmdText



2



adCmdTable



3



adCmdStoreProc



Loại của CommandText

Mặc định khi định nghĩa

Là một câu lệnh, ví dụ như

là SQL

Tên của table mà ta sẽ tạo

Recordset từ đó

Một Store procedure trong

Data soure



Thông thường các giá trị trên được gán sẵn vào các danh hiệu hằng và được đặt

trong file include có tên adovbs.inc.

- Close method: Đóng các kết nối đã mở.

Trang36



Xem Thêm
Tải bản đầy đủ (.doc) (50 trang)

×