Trong giai đoạn hiện nay, cùng với sự phát triển vượt bậc của các ngành Điện tử ,Công nghệ thông tin.... là sự phát triển nhanh chóng của ngành Bưu Điện nhằm tăng nhanh số lượng thuê bao điện thoại cũng như chất lượng phục vụ khách hàng.Với phương châm “ Đi tắt , đón đầu công nghệ” nghành Bưu điện rất chú trọng vấn đề áp dụng các kỹ thuật mới , đặc biệt lĩnh vực Công nghệ thông tin đ• được nghành áp dụng triệt để trong khoa học kỹ thuật ,công tác quản lý , khai thác và điều hành sản xuất kinh doanh.
Lời Mở đầu Trong giai đoạn nay, với phát triển vợt bậc ngành Điện tử ,Công nghệ thông tin phát triển nhanh chóng ngành Bu Điện nhằm tăng nhanh số lợng thuê bao điện thoại nh chất lợng phục vụ khách hàng.Với phơng châm Đi tắt , đón đầu công nghệ nghành Bu điện trọng vấn đề áp dụng kỹ thuật , đặc biệt lĩnh vực Công nghệ thông tin đợc nghành áp dụng triệt để khoa học kỹ thuật ,công tác quản lý , khai thác điều hành sản xuất kinh doanh Tuy nhiên, với phát triển nhanh chóng số lợng thuê bao điện thoại , Bu điện tỉnh, thành phải đối mặt trớc vấn đề khó khăn làm để đảm bảo chất lợng thông tin trì liên tục thông tin cho khách hàng Một nghiệp vụ quan trọng đặt việc quản lý, đo thử sửa chữa thuê bao Kết hợp kiến thức thực tế nghiệp vụ Bu điện có đợc qua thời gian tìm hiểu Đài Tự động Nha Trang Đài đo thử 119 trung tâm với kiến thức Tin Học học, xin mạnh dạn đề xuất xây dựng phơng pháp để đo thử đa định loại hỏng máy điện thoại gọi Hệ hổ trợ chẩn đoán loại hỏng máy điện thoại cách ứng dụng lý thuyết tập mờ lập luận mờ để chẩn đoán loại hỏng máy điện thoại dựa thông số trạng thái kỹ thuật đờng dây thuê bao mà tổng đài đo đợc Lý thuyết tập mờ đợc mở rộng sở lý thuyết tập hợp, cung cấp cho công cụ mạnh xử lý thông tin mang tính chất không xác không chắn Các hệ hổ trợ định dựa sở lý thuyết mờ đợc áp dụng nhiều lĩnh vực : chẩn đoán, nhận dạng, dự báo, giảng dạy, tự động hóa Hệ hổ trợ chẩn đoán loại hỏng máy điện thoại trình bày luận văn thử nghiệm ứng dụng lý thuyết tập mờ lập luận mờ, góp phần đẩy mạnh công tác nghiên cứu khoa học, bớc tin học hóa việc khai thác, quản lý điều hành sản xuất kinh doanh dịch vụ Bu viễn thông cách có hiệu quả, đặc biệt tự động hóa số dịch vụ để tăng cờng tính xác giảm chi phí sản xuất(nhân công, công cụ) Hệ chơng trình đợc cài đặt môi trờng Windows, hệ quản trị sở liệu SQL Server ngôn ngữ lập trình Visual Basic -1- Giới thiệu toán Lý nghiên cứu đề tài: Bài toán Hệ hổ trợ chẩn đoán loại hỏng máy điện thoại dựa thông tin thông số kỹ thuật đờng dây thuê bao thu nhận đợc từ Tổng đài toán có ý nghĩa thặc tế, giúp cho công nhân dây máy biết thực việc khắc phục máy hỏng khách hàng cách nhanh chóng Việc tiến hành xử lý máy điện thoại hỏng phải đợc tiến hành khoảng thời gian ngắn đợc chủ trơng chung Ngành Bu Điện Để đáp ứng đợc phần yêu cầu nhằm góp phần vào việc phát triển chung Ngành xây dựng niềm tin khách hàng sử dụng dịch vụ Bu viễn thông chọn đề tài Hệ hổ trợ chẩn đoán loại hỏng máy điện thoại nhằm phục vụ tốt cho công tác xử lý máy điện thoại hỏng Bu Điện thành phố Nha trang cách có hiệu Trong thực tế, cảm nhận ngời vật tợng xung quanh đóng vai trò quan trọng, cho ta kinh nghiệm quý báu công tác quản lý điều hành Nhng với phát triển nhanh chóng mạng viễn thông ngày việc xác định loại hỏng máy điện thoại sở cảm nhận Điện thoại viên không đảm bảo tính xác thờng thời gian Ngày nay,Công nghệ thông tin có bớc tiến mạnh mẽ đóng vai trò quan trọng lĩnh vực hoạt động ngời Trong năm qua có nhiều lý thuyết đời bớc đợc áp dụng vào thực tế phục vụ cho nhu cầu lợi ích ngời Để hổ trợ đợc việc định chẩn đoán loại hỏng máy điện thoại dựa nhiều sở lý thuyết khác Với kiến thức Công nghệ thông tin đợc trang bị theo gợi ý thầy giáo hớng dẫn, anh em đồng nghiệp nhận thấy sở lý thuyết mờ hệ chuyên gia công cụ hổ trợ mạnh hiệu cho đề tài 2.Mục tiêu, nhiệm vụ nội dung luận án: 2.1 Mục tiêu: Nghiên cứu phơng pháp suy diễn mờ dựa độ đo giá trị tham số kỹ thuật thực tế nhằm giải vấn đề toán Từ thiết kế xây dựng hệ hổ trợ định chẩn đoán loại hỏng máy điện thoại thuê bao sở lý thuyết đa nghiên cứu 2.2 Nhiệm vụ: Tìm hiểu nhiệm vụ, trình thực việc nhận xử lý máy hỏng Đài 119 Bu Điện TP Nha Trang Nghiên cứu xây dựng lại hệ thống tự động số công đoạn mà máy tính đảm nhận Nghiên cứu lý thuyết mờ, phơng pháp suy diễn mờ Nghiên cứu khả áp dụng lý thuyết mờ công tác hổ trợ định loại hỏng máy điện thoại Xây dựng mô hình, hệ luật trợ giúp chẩn đoán loại hỏng máy điện thoại dựa lý thuyết mờ Xây dựng hệ hổ trợ định chẩn đoán loại hỏng máy điện thoại thuê bao -2- 2.3 Nội dung luận án: Với mục tiêu nhiệm vụ đề cần giải nội dung luận án bao gồm nội dung sau: Chơng 1: Giới thiệu hệ thống báo xử lý máy hỏng Đài 119 Bu Điện TP Nha Trang tại, đề xuất hệ thống Chơng 2: Thu nhận biễu diễn tri thức Chơng 3: Lý thuyết tập mờ hệ hổ trợ định Chơng 4: Suy diễn mờ Chơng 5: Xây dựng hệ hổ trợ định trạng thái hỏng máy điện thoại Chơng 6: Phân tích thiết kế hệ thống, xây dựng hệ chơng trình cài đặt -3- Chơng Giới thiệu hệ thống báo xử lý máy hỏng Đài 119 Bu Điện TP Nha Trang tại, đề xuất hệ thống 1.1 Sơ lợc mạng viễn thông thành phố Nha Trang Sau 10 năm đổi với kế hoạch tăng tốc ngành Bu Điện , nói chất lợng mạng lới viễn thông nớc ta ngang tầm với nớc khu vực bớc tiếp cận với nớc tiên tiến giới Tại thành phố Nha Trang, năm 1993 có khoảng 3000 máy điện thoại hoạt động với kỹ thuật lạc hậu , dịch vụ hạn chế, với sách đổi thay đổi công nghệ từ kỹ thuật Analog sang Digital làm tốc độ mạng lới phát triển nhanh chóng kèm dịch vụ gia tăng tổng đài điện tử đem lại nhiều tiện ích cho khách hàng, đến sau gần 10 năm phát triển, tổng số máy có toàn mạng 40000 máy, tăng 13 lần so với năm 1993 tỷ lệ đạt gần 10máy/100 dân Hiện nay, mạng lới viễn thông thành phố Nha Trang đợc số hoá 100%, kết cấu bao gồm 02 tổng đài trung tâm (OCB : Organization Center Basic) 10 trạm vệ tinh (CSND : Center Satellite Numberic Distance) đợc phân bố rộng khắp toàn địa bàn thành phố có khả phát triển đến 200000 máy điện thoại thuê bao Tốc độ phát triển máy điện thoại thành phố Nha Trang khoảng 5000 máy / năm, với phát triển sở hạ tầng sách đổi thành phố , chắn số lợng máy điện thoại thành phố tiếp tục tăng nhanh năm tới -4- CấU HìNH MạNG VIễN THôNG THàNH PHố NHA TRANG đếN NăM 2003 Tổng Đài liên tỉnh Hồ Chí Minh OFC CSND Phú Vinh OFC CSND Ngô Gia Tự OFC OFC OCB Tổng Đài liên tỉnh Đà Nẳng OFC CSND Lê Hồng Phong OFC CSND Vĩnh Nguyên OFC CSNT Đồng Đế OFC CSND Hòn Khô OFC CSND Vĩnh Phương Trung tâm FETEX-150 OFC CSND Phước Đồng OFC CSNR Hòn Rớ OFC CSND Vĩnh Lương OFC OCB Bình Tân Siemen OFC : Optics Fiber Cable - Cáp quang -5- 1.2 Tổ chức hoạt động dịch vụ nhận xử lý máy điện thoại hỏng tại: 1.2.1 Hoạt động dịch vụ 119 : Khi khách hàng có máy điện thoại bị hỏng gọi số 119 (từ máy điện thoại ) , nhân viên đài 119 tiếp nhận điện thoại ghi lại số máy bị hỏng, sau thực phép đo đồng hồ, đợc đo trực tiếp đờng dây thuê bao Căn giá trị điện áp trả qua mạch vòng đờng dây thuê bao đồng hồ đo, qua kinh nghiệm thực tế, ngời khai thác viên phán đoán loại hỏng(đứt, chập dây, hỏng máy ) tiến hành cập nhật máy loại hỏng vào mạng máy tính Công ty Các đội sửa chữa dây máy thờng xuyên kiểm tra số liệu mạng để xác định số lợng máy hỏng thuộc khu vực phụ trách phân công nhân viên sửa chữa kịp thời Khi khắc phục xong, nhân viên xử lý gọi điện thông báo lại cho đài 119 kiểm tra lại cập nhật số liệu để phục vụ cho công việc báo cáo theo dõi quản lý 1.2.2 Ưu nhợc điểm hệ thống : Ưu điểm: - Khi dịch vụ số liệu quản lý tập trung thuận lợi công tác điều hành sản xuất, khách hàng hài lòng với thời gian chất lợng khắc phục máy hỏng - Khách hàng làm quen với số máy 119 để báo hỏng - Trao đổi số liệu đài 119 đội sửa chữa qua mạng máy tính Công ty nên thống mặt số liệu, báo cáo thống kê đợc thực cách dể dàng xác, giải khiếu nại khách hàng đợc nhanh chóng xác Nhợc điểm : - Nhân viên phán đoán trạng thái hỏng máy điện thoại mang tính thụ động, phụ thuộc vào kinh nghiệm nên kết cha chắn,nên đôi lúc kéo dài thời gian sửa chữa - Nhân viên đài 119 phải thao tác qua nhiều công đoạn :Tiếp nhận máy hỏng, đo thử, xác định trạng thái h hỏng, cập nhật vào hệ thống, số lợng máy điện thoại hỏng nhiều khó đáp ứng kịp thời -6- 1.3 Xây dựng hoạt động dịch vụ 119 tự động 1.3.1 Nhu cầu có hệ thống mới: Do nhu cầu phát triển mạnh hệ thống viễn thông, số lợng máy điện thoại ngày gia tăng nhanh, lỗi thời sai sót hệ thống khai thác quản lý cũ chắn không phù hợp Cho nên cần phải xây dựng lại hệ thống khai thác dịch vụ 119 để phục vụ nhu cầu khách hàng với thời gian ngắn đợc điều quan trọng giảm bớt số công đoạn làm việc căng thẳng cho nhân viên Đài 119, tránh sai sót, cáu gắt với khách hàng nhân viên xử lý số lợng máy hỏng nhiều Trong dịch vụ này, khó khăn thực chẩn đoán loại hỏng máy điện thoaị thuê bao thời gian chờ lấy số liệu từ tổng đài lâu (hơn phút cho máy ) , đôi lúc bị nghẽn thực nhanh đợc, thời gian ma bão Ngoài phải thực công đoạn máy tính tự giao tiếp với tổng đài trung tâm thực phép đo, xây dựng hệ hổ trợ định chẩn đoán loại hỏng máy điện thoại từ kết đo Nếu thực thành công đề tài đợc ứng dụng thực tế tiết kiệm đợc chi phí nhân công ( từ 10 ngời giảm xuống ngời), giảm thời gian xử lý tăng thêm niềm tin khách hàng với ngành Bu Điện 1.3.2 Giới thiệu hệ thống dịch vụ 119 mới: Hệ thống cần phải khắc phục đợc nhợc điểm hệ thống cũ, tăng đợc suất lao động, giảm chi phí, tạo đợc niềm tin uy tín khách hàng Khi máy điện thoại bị hỏng, khách hàng cần gọi 119 thông báo số máy hỏng, nhân viên đài 119 tiếp nhận thực nhập số máy hỏng vào kho liệu chung Tất công đoạn từ việc kết nối tổng đài thực phép đo định trạng thái hỏng hoàn toàn máy tính thực thay cho nhân viên MÔ HìNH Hệ THốNG BáO Và Xử Lý MáY HỏNG Tự ĐộNG 119 -7- CSDN OCB Trung tâm CSDN OCB Bình Tân OFC RS 232C Máy tính liên kết Đài 119 Máy tính liên kết HUB Máy tính đơn vị Mạng Máy tính Công ty Máy tính đội sửa chữa Máy tính lãnh đạo 1.3.3 Hoạt động dịch vụ 119 tự động: Khi máy hỏng ,ở đâu hay lúc khách hàng cần gọi 119 có nhân viên trực tiếp nhận gọi đa thông tin số máy hỏng vào máy tính (số liệu báo hỏng cập nhật vào kho liệu) Máy tính giao tiếp với tổng đài trung tâm bắt đầu thực phép đo lấy thông số kỹ thuật ,đồng thời kết hợp với thông tin lu trữ thực suy diễn ,chẩn đoán loại hỏng máy điện thoại cập nhật kho thông tin Nhiệm vụ thực tiếp nhận số liệu, thực đo hệ hổ trợ định máy tiếp giao tiếp với tổng đài trung tâm thực Số liệu đợc lu trữ kho thông tin chung mạng máy tính công ty Các đội xử lý có quản lý máy điện thoại thuê bao,sẽ định kỳ kết nối mạng lấy số liệu máy hỏng thuộc đơn vị , thực in xử lý cho khách hàng Sau thực -8- xử lý xong cập nhật lại báo cho hệ thống thực ,máy tính giao tiếp tổng đài thực đo kiểm tra có đủ điều kiện kỹ thuật cha Nếu cha đủ điều kiện thông tin máy hỏng đa cho đơn vị quản lý,ngợc lại xử lý tốt kết thông báo hoàn thành Tất thông tin hệ thống báo xử lý máy hỏng đợc thực báo cáo qua mạng máy tính công ty ,do lãnh đạo phòng ban chức nắm đợc thông tin Qua đạo điều hành xử lý máy hỏng Bu điện Thành phố Nha Trang thuận lợi nhanh chóng ,góp phần hoàn thành tiêu kế hoạch giảm nhẹ chi phí hoạt động sản xuất NGUYÊN Lý HOạT ĐộNG CủA Hệ THốNG Khách hàng báo hỏng Nhận báo hỏng Lọc máy hỏng Đo thử Hợp lệ Suy diễn Đi sửa Báo sửa Hỏng Tình trạng hỏng Tốt Báo kết Nhận kết Kết thúc 1.3.4 Vai trò chuyên gia hệ thống -9- Trong hệ thống hoạt động dịch vụ báo xử lý máy hỏng 119 chuyên gia đóng vai trò quan trọng định loại hỏng số máy điện thoại thuê bao, góp phần việc xử lý hỏng nhanh hay chậm công nhân kỹ thuật dây máy Vai trò chuyên gia hệ thống từ thông số kỹ thuật từ tổng đài trung tâm đa ra, qua kinh nghiệm thực tế định trạng thái hỏng máy điện thoại thuê bao tiến hành gởi thông tin cho công nhân đờng dây thực khắc phục cố Trong thực tế, đa định loại hỏng máy điện thoại thuê bao, chuyên gia thờng sử dụng đánh giá chủ quan hay trực giác ,đôi họ giải thích đợc họ đa kết luận nh Nếu chuyên gia có nhiều kinh nghiệm phán đoán xác ngợc lại chuyên gia kinh nghiệm phán đoán dễ bị sai Một máy điện thoại thuê bao kết nối với tổng đài địa phơng (local exchange) đôi dây (A&B), dộ dài tối đa khoảng7 km (là tốt nhất).Trạng thái hoạt động máy điện thoại dựa vào thông số kỹ thuật sau : - Điện áp xoay chiều dây A đất ( V) : L1 (Ký hiệu) - Điện áp xoay chiều dây B đất ( V) : L2 - Điện áp chiều dây A đất ( V) : L3 - Điện áp chiều dây B đất ( V) : L4 - Điện trở kháng dây A đất ( Kohm) : L5 - Điện trở kháng dây B đất ( Kohm) : L6 - Điện trở kháng dây A dây B( Kohm) : L7 - Điện dung đôi dây A B qua thiết bị đầu cuối : L8 (Máy điện thoại, Fax, Trung kế Tổng đài nội bộ, Internet ) Những trạng thái hỏng máy điện thoại là: - Dây A chập đất - Dây B chập đất - Hai dây A B chập - Hỏng thiết bị đầu cuối - Hỏng thiết bị tổng đài - Đứt ( hai dây không thông nhau) - Không xác định Chơng Thu nhận biễu diễn tri thức - 10 - Do_chinh_xac = Do_chinh_xac & "M3*" Else Fields(6).Value = End If If Me.chkR_A_B.Value = Then Fields(7).Value = Do_chinh_xac = Do_chinh_xac & "M3*" Else Fields(7).Value = End If If Me.ChkF_AB.Value = Then Fields(8).Value = Do_chinh_xac = Do_chinh_xac & "M3*" Else Fields(8).Value = End If If Me.chkLoai_TB.Value = Then Fields(9).Value = Do_chinh_xac = Do_chinh_xac & "M3*" Else Fields(9).Value = End If Update Requery ' -Dien cac gia tri vao form -Me.lblSo_luat.Caption = RecordCount MoveLast Me.lblLuat_thu.Caption = Fields(0).Value Do_chinh_xac = Do_chinh_xac & Fields(11).Value Me.txtDo_chinh_xac.text = Do_chinh_xac End With End If ' -Neu dang sua luat If Sua Then ' -Cap nhat cac gia tri -With Luat_suy_dien Fields(10).Value = Loai_hong2.Fields(0).Value Fields(11).Value = Me.txtDo_chinh_xac.text If Me.chkAC_A_dat.Value = Then Fields(1).Value = Else Fields(1).Value = End If If Me.ChkAC_B_dat.Value = Then Fields(2).Value = Else Fields(2).Value = - 102 - End If If Me.ChkDc_A_dat.Value = Then Fields(3).Value = Else Fields(3).Value = End If If Me.chkDc_B_dat.Value = Then Fields(4).Value = Else Fields(4).Value = End If If Me.chkR_a_dat.Value = Then Fields(5).Value = Else Fields(5).Value = End If If Me.chkR_B_dat.Value = Then Fields(6).Value = Else Fields(6).Value = End If If Me.chkR_A_B.Value = Then Fields(7).Value = Else Fields(7).Value = End If If Me.ChkF_AB.Value = Then Fields(8).Value = Else Fields(8).Value = End If If Me.chkLoai_TB.Value = Then Fields(9).Value = Else Fields(9).Value = End If Update Requery End With End If ' Khoa cac nut lenh Me.chkAC_A_dat.Enabled = False Me.ChkAC_B_dat.Enabled = False Me.ChkDc_A_dat.Enabled = False Me.chkDc_B_dat.Enabled = False Me.chkR_a_dat.Enabled = False - 103 - Me.chkR_B_dat.Enabled = False Me.chkR_A_B.Enabled = False Me.ChkF_AB.Enabled = False Me.chkLoai_TB.Enabled = False Me.cbmKet_luan.Enabled = False Me.txtDo_chinh_xac.Enabled = False Me.cmdThem.Enabled = True Me.cmdXoa.Enabled = True Me.cmdSua.Enabled = True Me.cmdFirst.Enabled = True Me.cmdLast.Enabled = True Me.cmdToi.Enabled = True Me.cmdLui.Enabled = True Me.cmdDong_y_them.Enabled = False Me.cmdBo_qua_them.Enabled = False ' Xoa che them hoac sua du lieu Them = False Sua = False End Sub Private Sub cmdFirst_Click() ' Xoa cac checkbox Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = Luat_suy_dien.MoveFirst ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = - 104 - Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value ' -Neu sua thi chi hien so -If Sua Then Do_chinh_xac = Luat_suy_dien.Fields(11).Value End If Me.txtDo_chinh_xac.text = Do_chinh_xac Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value End Sub Private Sub cmdLast_Click() Luat_suy_dien.MoveLast ' Xoa cac checkbox - - 105 - Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then - 106 - Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value ' -Neu sua thi chi hien so -If Sua Then Do_chinh_xac = Luat_suy_dien.Fields(11).Value End If Me.txtDo_chinh_xac.text = Do_chinh_xac Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value End Sub Private Sub cmdLui_Click() On Error GoTo thoat If Not (Luat_suy_dien.EOF) Then Luat_suy_dien.MoveNext If Luat_suy_dien.EOF Then Luat_suy_dien.MovePrevious End If ' Xoa cac checkbox Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = 'If Luat_suy_dien.BOF = False Then 'End If ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" - 107 - If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value ' -Neu sua thi chi hien so -If Sua Then Do_chinh_xac = Luat_suy_dien.Fields(11).Value End If Me.txtDo_chinh_xac.text = Do_chinh_xac Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset - 108 - Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value End If thoat: End Sub Private Sub cmdSua_Click() On Error GoTo thoat ' -Bao cho chuong trinh biet dang sua Du lieu -Sua = True Me.txtDo_chinh_xac.text = Luat_suy_dien.Fields(11).Value Me.chkAC_A_dat.Enabled = True Me.ChkAC_B_dat.Enabled = True Me.ChkDc_A_dat.Enabled = True Me.chkDc_B_dat.Enabled = True Me.chkR_a_dat.Enabled = True Me.chkR_B_dat.Enabled = True Me.chkR_A_B.Enabled = True Me.ChkF_AB.Enabled = True Me.chkLoai_TB.Enabled = True Me.cbmKet_luan.Enabled = True Me.txtDo_chinh_xac.Enabled = True Me.cmdDong_y_them.Enabled = True Me.cmdBo_qua_them.Enabled = True ' -Khoa cac nut lenh Me.cmdThem.Enabled = False Me.cmdXoa.Enabled = False Me.cmdSua.Enabled = False ' Bao cho chuong trinh biet dang them luat -Sua = True ' Tao du lieu cho Combobox Ket luan -Dim Loai_hong1 As ADODB.Recordset Set Loai_hong1 = New ADODB.Recordset Loai_hong1.Source = "Select Trang_thai_hong from tblLoaihong " Loai_hong1.ActiveConnection = TL Loai_hong1.Open Loai_hong1.MoveFirst Do Until Loai_hong1.EOF Me.cbmKet_luan.AddItem Loai_hong1.Fields(0).Value Loai_hong1.MoveNext - 109 - Loop Me.cbmKet_luan.ListIndex = -1 thoat: End Sub Private Sub cmdThem_Click() ' -Mo cac checkbox -Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = Me.cbmKet_luan.text = "" Me.txtDo_chinh_xac.text = "" Me.lblLuat_thu.Caption = "" Me.chkAC_A_dat.Enabled = True Me.ChkAC_B_dat.Enabled = True Me.ChkDc_A_dat.Enabled = True Me.chkDc_B_dat.Enabled = True Me.chkR_a_dat.Enabled = True Me.chkR_B_dat.Enabled = True Me.chkR_A_B.Enabled = True Me.ChkF_AB.Enabled = True Me.chkLoai_TB.Enabled = True Me.cbmKet_luan.Enabled = True Me.txtDo_chinh_xac.Enabled = True Me.cmdDong_y_them.Enabled = True Me.cmdBo_qua_them.Enabled = True ' -Khoa cac nut lenh Me.cmdThem.Enabled = False Me.cmdXoa.Enabled = False Me.cmdSua.Enabled = False Me.cmdFirst.Enabled = False Me.cmdLast.Enabled = False Me.cmdToi.Enabled = False Me.cmdLui.Enabled = False ' Bao cho chuong trinh biet dang them luat -Them = True ' Tao du lieu cho Combobox Ket luan -Dim Loai_hong1 As ADODB.Recordset Set Loai_hong1 = New ADODB.Recordset Loai_hong1.Source = "Select Trang_thai_hong from tblLoaihong " Loai_hong1.ActiveConnection = TL - 110 - Loai_hong1.Open Loai_hong1.MoveFirst Do Until Loai_hong1.EOF Me.cbmKet_luan.AddItem Loai_hong1.Fields(0).Value Loai_hong1.MoveNext Loop Me.cbmKet_luan.ListIndex = -1 End Sub Private Sub cmdToi_Click() On Error GoTo thoat If Not (Luat_suy_dien.BOF) Then Luat_suy_dien.MovePrevious If Luat_suy_dien.BOF Then Luat_suy_dien.MoveNext End If ' Xoa cac checkbox Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" - 111 - End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value ' -Neu sua thi chi hien so -If Sua Then Do_chinh_xac = Luat_suy_dien.Fields(11).Value End If Me.txtDo_chinh_xac.text = Do_chinh_xac Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value ' -Tim thu tu luat Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value End If thoat: End Sub Private Sub cmdXoa_Click() If MsgBox("Bạn chắn muốn xóa luật ?", vbCritical + vbYesNo, " Chú ý ") = vbYes Then ' -xoa luat -Luat_suy_dien.Delete - 112 - Luat_suy_dien.Update ' Sua lai cac Ma Luat Luat_suy_dien.MoveFirst Dim Ma_luat_xoa As Byte Ma_luat_xoa = Do Ma_luat_xoa = Ma_luat_xoa + If Len(Trim(Str(Ma_luat_xoa))) = Then Luat_suy_dien.Fields(0).Value = Trim(0 & Trim(Str(Ma_luat_xoa))) Else Luat_suy_dien.Fields(0).Value = Trim(Str(Ma_luat_xoa)) End If Luat_suy_dien.Update Luat_suy_dien.MoveNext Loop Until Luat_suy_dien.EOF Luat_suy_dien.Requery ' Dien cac gia tri vao form -If Not (Luat_suy_dien.BOF) Then Luat_suy_dien.MovePrevious If Luat_suy_dien.BOF Then Luat_suy_dien.MoveNext End If Me.lblSo_luat.Caption = Luat_suy_dien.RecordCount ' Xoa cac checkbox Me.chkAC_A_dat.Value = Me.ChkAC_B_dat.Value = Me.ChkDc_A_dat.Value = Me.chkDc_B_dat.Value = Me.chkR_a_dat.Value = Me.chkR_B_dat.Value = Me.chkR_A_B.Value = Me.ChkF_AB.Value = Me.chkLoai_TB.Value = ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" - 113 - End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value ' -Tim thu tu luat Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value End If End If thoat: End Sub Private Sub Form_Load() - 114 - Them = False Sua = False Set TL = New ADODB.Connection TL.Provider = "SQLOLEDB.1" TL.ConnectionString = "Persist Security Info=False;User ID=sa;Initial Catalog=DULIEU;Data Source=sam" TL.Open Set Luat_suy_dien = New ADODB.Recordset Luat_suy_dien.LockType = adLockOptimistic Luat_suy_dien.CursorType = adOpenKeyset Luat_suy_dien.Source = "Select * from tblTapluat order by Ma_luat" Luat_suy_dien.ActiveConnection = TL Luat_suy_dien.Open Luat_suy_dien.MoveFirst ' -Dien gia tri vao cac Checkbox Dim Ma_Loai_hong As String Dim Do_chinh_xac As String Do_chinh_xac = "" If Luat_suy_dien.Fields(1).Value = Then Me.chkAC_A_dat.Value = Do_chinh_xac = "M1*" End If If Luat_suy_dien.Fields(2).Value = Then Me.ChkAC_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M2*" End If If Luat_suy_dien.Fields(3).Value = Then Me.ChkDc_A_dat.Value = Do_chinh_xac = Do_chinh_xac & "M3*" End If If Luat_suy_dien.Fields(4).Value = Then Me.chkDc_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M4*" End If If Luat_suy_dien.Fields(5).Value = Then Me.chkR_a_dat.Value = Do_chinh_xac = Do_chinh_xac & "M5*" End If If Luat_suy_dien.Fields(6).Value = Then Me.chkR_B_dat.Value = Do_chinh_xac = Do_chinh_xac & "M6*" End If If Luat_suy_dien.Fields(7).Value = Then Me.chkR_A_B.Value = Do_chinh_xac = Do_chinh_xac & "M7*" - 115 - End If If Luat_suy_dien.Fields(8).Value = Then Me.ChkF_AB.Value = Do_chinh_xac = Do_chinh_xac & "M8*" End If If Luat_suy_dien.Fields(9).Value = Then Me.chkLoai_TB.Value = Do_chinh_xac = Do_chinh_xac & "M9*" End If Do_chinh_xac = Do_chinh_xac & Luat_suy_dien.Fields(11).Value Me.txtDo_chinh_xac.text = Do_chinh_xac Ma_Loai_hong = Luat_suy_dien.Fields(10).Value ' Tim ket luan -Set Loai_hong = New ADODB.Recordset Loai_hong.Source = "Select Trang_thai_hong from tblLoaihong where Ma_loai_hong='" & Ma_Loai_hong & "'" Loai_hong.ActiveConnection = TL Loai_hong.Open Me.cbmKet_luan.text = Loai_hong.Fields(0).Value Me.lblLuat_thu.Caption = Luat_suy_dien.Fields(0).Value Me.lblSo_luat.Caption = Luat_suy_dien.RecordCount ' -Khoa du lieu Me.chkAC_A_dat.Enabled = False Me.ChkAC_B_dat.Enabled = False Me.ChkDc_A_dat.Enabled = False Me.chkDc_B_dat.Enabled = False Me.chkR_a_dat.Enabled = False Me.chkR_B_dat.Enabled = False Me.chkR_A_B.Enabled = False Me.ChkF_AB.Enabled = False Me.chkLoai_TB.Enabled = False Me.cbmKet_luan.Enabled = False Me.txtDo_chinh_xac.Enabled = False Me.cmdDong_y_them.Enabled = False Me.cmdBo_qua_them.Enabled = False Them = False Sua = False End Sub - 116 - [...]... những yêu cầu mới và sự cải tiến hệ thống dẫn đến việc học thêm , trong quá trình cải tiến và phát triển liên tục của DSS 12 Những ngời sử dụng cuối cùng phải tự mình xây dựng đợc những hệ thống đơn giản Các hệ thống lớn hơn có thể đợc xây dựng trong các tổ chức với sự góp mặt từ các hệ thống thông tin nhỏ hơn 13 Một DSS thờng xuyên tập hợp các mô hình cho việc phân tích các tình huống quyết định Khả... định trên Un Y là tập biến mờ xác định trên V B, B' là tập mờ xác định trên V - 30 - Có hai cách tiếp cận để giải quyết bài toán này: Cách 1: Bớc 1: Xây dựng mối quan hệ mờ R(A1 , A2 , , An ; B) xác định trên tập tích Đề các (U1 x U2 x x Un xV) Bớc 2 : Xây dựng kết quả : B'=( A'1 A'2 A'n ) 0 R(A1 , A2 An ; B) Cách 2: Phân tích thành các bài toán con: Nếu Xi=Ai thì Y=B Cho Xi=A'i Tính Y=B'i i= 1 ,... tham chiếu V Bài toán : Nếu X= A1 thì Y= B1 Nếu X= A2 thì Y= B2 Nếu X= Ak thì Y= Bk Cho X=A0 Tính Y=B0 Cách tiếp cận: + Tính các Ri(Ai , Bi) + Xây dựng quan hệ chung mở rộng : R= Ri(Ai , Bi) i= 1 , n hoặc B'= Ri(Ai , Bi) i= 1 , n + Tính B0=A0 o R - 31 - Chơng 5 Xây dựng hệ hổ trợ quyết định trạng thái hỏng máy điện thoại Thực hiện việc nhận báo hỏng và xử lý máy điện thoại thuê bao hỏng là một trong... sự phát triển của hệ thống và các thành phần sử dụng nó" Kết quả của các định nghĩa này là một quần thể các hệ thống mà từng tác giả một sẽ xác định nh là một DSS Ví dụ Keen sẽ loại trừ các hệ thống xây dựng không có chiến lợc ớc lợng, Moore và Chang loại trừ loaị trừ các hệ thống sử dụng tại khoảng thời gian - 22 - định trớc, theo qui tắc để hổ trợ quyết định về các hoạt động hiện tại Các định nghĩa... thực hiện điều này, ta cần phải hiểu rõ các dạng tri thức và các kỹ thuật biễu diễn tri thức có thể biễu diễn tốt nhất các dạng tri thức đó - 11 - 2.2.1 Các dạng tri thức: Các nhà tâm lý học nhận thức đã xây dựng một số lý thuyết để giải thích cách giải quyết vấn đề của các chuyên gia con ngời Các lý thuyết này đã đa ra một số dạng tri thức chung mà con ngời thờng sử dụng trong quá trình t duy, phơng pháp... diễn các kinh nghiệm chuyên gia dới dạng các luật mở và vận dụng trong hệ chuyên gia mờ có thể xem là một giải pháp thích hợp Nghiên cứu bài toán báo và xử lý máy hỏng tự động 119 ,chúng tôi đề xuất xây dựng hệ chuyên gia giải quyết bài toán dựa trên những thông tin mang tính định lợng và mô phỏng quá trình phán đoán của chuyên gia mang tính định tính ,chẳng hạn :máy thuê bao 822540 có lẽ đứt ,có... phụ thuộc rất nhiều vào phơng thức biễu diễn tri thức và không có một phơng pháp suy diễn duy nhất cho mọi loại tri thức Trong chơng này, sẽ đề cập đến một số cơ chế suy diễn thờng hay đợc áp dụng khi xây dựng hệ chuyên gia trên cơ sở các luật sản xuất Đặc biệt , các cơ chế suy diễn này có hiệu quả trong trờng hợp tri thức không đầy đủ, bất định và không chính xác vốn là đặc trng của hệ chuyên gia mờ... Tính Y= B' Trong đó : + X,Y là các biến mờ + A,A' là các tập mờ trên không gian tham chiếu U + B,B' là các tập mờ trên không gian tham chiếu V Cách giải có thể tóm tắt nh sau: - Từ mệnh đề IF - THEN , xây dựng quan hệ R(A,B) trên không gian tham chiếu U xV Có rất nhiều cách định nghĩa quan hệ R nh : RC , RS , RB , RA , RM , - Kết quả B' đợc tính bằng phép hợp thành : B'=A' O R(A,B) + Một số quan hệ... thờng hay sử dụng phép max-min và max-product Do có nhiều cách định nghĩa quan hệ R , cũng nh các cách lựa chọn phép Tnorm , T-conorm khác nhau khi thực hiện phép hợp thành , cho nên có rất nhiều cách xây dựng phơng pháp suy diễn nhiều khi mang lại các kết quả trái ngợc nhau Vì vậy trong ứng dụng, ngời ta thờng phải thử nghiệm để đa ra các lựa chọn thích hợp nhất Có thể đặt ra các tiêu chuẩn suy diễn... chắn thông qua việc sử dụng các biến ngôn ngữ để phản ánh Một trong những cách đánh giá và xử lý dạng biễu diễn thông tin thu đợc những kết quả rất tốt đó là cách tiếp cận mờ Từ năm 1965, L.A.Zadeh đã xây dựng lý thuyết tập mờ, tạo ra một cơ sở toán học cho việc tiếp cận lập luận tính toán của con ngời ý tởng của ông là mở rộng tập logic cổ điển (logic Boole), làm tăng thêm khả năng suy luận của con ... mờ công tác hổ trợ định loại hỏng máy điện thoại Xây dựng mô hình, hệ luật trợ giúp chẩn đoán loại hỏng máy điện thoại dựa lý thuyết mờ Xây dựng hệ hổ trợ định chẩn đoán loại hỏng máy điện... tập mờ hệ hổ trợ định Chơng 4: Suy diễn mờ Chơng 5: Xây dựng hệ hổ trợ định trạng thái hỏng máy điện thoại Chơng 6: Phân tích thiết kế hệ thống, xây dựng hệ chơng trình cài đặt -3- Chơng Giới thiệu... trình cải tiến phát triển liên tục DSS 12 Những ngời sử dụng cuối phải tự xây dựng đợc hệ thống đơn giản Các hệ thống lớn đợc xây dựng tổ chức với góp mặt từ hệ thống thông tin nhỏ 13 Một DSS thờng