【正文】 理、權(quán)限管理等。使用者可通過每個(gè)模塊界面上的操作、查看、查詢等功能，方便快捷地完成所需工作。 4 系統(tǒng)設(shè)計(jì) 設(shè)計(jì)思想及流程 基本設(shè)計(jì)思想：未注冊(cè)用戶需要注冊(cè)并且通過系統(tǒng)管理 員審核后才能登錄該系統(tǒng)，登錄系統(tǒng)后可以進(jìn)行資產(chǎn)注冊(cè)，并根據(jù)注冊(cè)的資產(chǎn)進(jìn)行報(bào)修登記，查詢報(bào)修信息，還能方便快捷地使用系統(tǒng)自帶的電子郵箱進(jìn)行實(shí)時(shí)通訊。系統(tǒng)功能結(jié)構(gòu)如圖 42 所示： 注冊(cè)用戶修改密碼登錄失敗故障查詢電子郵箱 資產(chǎn)注冊(cè)審核報(bào)修登記失敗注冊(cè)未注冊(cè)用戶失敗審核成功成功查看資產(chǎn)成功退出系統(tǒng)退出系統(tǒng)第 5 頁(yè) 共 24 頁(yè) 圖 42 系統(tǒng)功能 結(jié)構(gòu) 圖 系統(tǒng)體系架構(gòu) 該故障報(bào)修系統(tǒng)是基于 Lotus Domino 平臺(tái)開發(fā)的，前 臺(tái)采用瀏覽器實(shí)現(xiàn)，后臺(tái)采用 Lotus Domino Server 實(shí)現(xiàn)，其體系架構(gòu)如圖 43 所示： 圖 43 系統(tǒng)體系架構(gòu) 圖 Domino/Notes 數(shù)據(jù)庫(kù)設(shè)計(jì) Lotus Domino/Notes 中的數(shù)據(jù)庫(kù)與一般的關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)中的數(shù)據(jù)庫(kù) 存在一定 區(qū)別 。在故障報(bào)修系統(tǒng)中有 、 、 、 等數(shù)據(jù)庫(kù)，并在各個(gè)數(shù)據(jù)庫(kù)中設(shè)置相應(yīng)的必需的文檔、視圖、頁(yè)面、表單、域、文件夾以及導(dǎo)航器和各個(gè)頁(yè)面的大綱，其中各個(gè)數(shù)據(jù)庫(kù)中的頁(yè)面和表單是設(shè)計(jì)的重點(diǎn)。 表 41 用戶注冊(cè)信息表單（ userregist） 編號(hào) 域 名 域類型 類型 說明 1 loginName 文本 可編輯 用戶登錄名 2 password 口令 可編輯 用戶密碼 3 name 文本 可編輯 用戶姓名 4 sex 對(duì)話列表框 可編輯 用戶性別 5 birthday 日期 /時(shí)間 可編輯 用戶生日 6 idcard 文本 可編輯 用戶身份證號(hào) 7 phone 文本 可編輯 用戶聯(lián)系電話 8 文本 可編輯 用戶 EMail 9 address 文本 可編輯 用戶地址 10 prompt 文本 可編輯 取回密碼問題提示 11 answer 文本 可編輯 取回密碼問題答案 12 $$Return 文本 顯示時(shí)計(jì)算 返回路徑 13 validate 文本 計(jì)算 審核驗(yàn)證字 第 7 頁(yè) 共 24 頁(yè) 表 42 資產(chǎn)注冊(cè)信息表單（ weathregist） 編號(hào) 域名 域類型 類型 說明 1 eqpsort 對(duì)話列表框 可編輯 設(shè)備種類 2 eqpname 文本 可編輯 設(shè)備名稱 3 eqpmodel 文本 可編輯 設(shè)備型號(hào) 4 img 文本 顯示時(shí)計(jì)算 設(shè)備圖片 5 factory 文本 可編輯 廠家 6 producingarea 文本 可編輯 產(chǎn)地 7 provide 文本 可編輯 供應(yīng)商 8 lefttime 日期 /時(shí)間 可編輯 出廠時(shí)間 9 buytime 日期 /時(shí)間 可編輯 購(gòu)買時(shí)間 10 repairlog 文本 計(jì)算 維修記錄 11 workfrequency 對(duì)話框列表 可編輯 工作頻率 12 affect RTF 文本 可編輯 影響工作頻率因素 13 nowstate 文本 計(jì)算 當(dāng)前狀態(tài) 14 free 文本 計(jì)算 是否保修期內(nèi) 15 $$Return 文本 顯示時(shí)計(jì)算 返回路徑 16 $V2AttachmentOptions 文本 顯示時(shí)計(jì)算 附件是否顯示 17 validation 文本 計(jì)算 審核驗(yàn)證字 表 43 留言信息表單（ note） 編號(hào) 域 名 域類型 類型 說明 1 name 文本 創(chuàng)建時(shí)計(jì)算 發(fā)貼人 2 Title 對(duì)話列表框 可編輯 帖子標(biāo)題 3 contentment 單選按鈕 可編輯 服務(wù)滿意度 4 Time 日期 /時(shí)間 創(chuàng)建時(shí)計(jì)算 發(fā)表時(shí)間 5 Content RTF 文本 可編輯 內(nèi)容 6 $$Return 文本 顯示時(shí)計(jì)算 返回路徑 7 Ref 文本 顯示時(shí)計(jì)算 當(dāng)前文檔 ID 8 Servicename 文本 計(jì)算 回復(fù)人名字 9 title_1 文本 計(jì)算 回復(fù)標(biāo)題 10 content_1 文本 計(jì)算 回復(fù)內(nèi)容 11 date 日期 /時(shí)間 計(jì)算 回復(fù)時(shí)間 第 8 頁(yè) 共 24 頁(yè) 表 44 故障信息表單（ faultrefer） 編號(hào) 域名 域類型 類型 說明 1 name 文本 計(jì)算 報(bào)修人姓名 2 eqpsort 文本 計(jì)算 報(bào)修設(shè)備類型 3 Eqpname 文本 計(jì)算 報(bào)修設(shè)備名稱 4 phone 文本 計(jì)算 報(bào)修人聯(lián)系電話 5 Free 文本 計(jì)算 報(bào)修設(shè)備是否保修期內(nèi) 6 Time 日期 /時(shí)間 創(chuàng)建時(shí)計(jì)算 提交時(shí)間 7 booktime 文本 可編輯 報(bào)修預(yù)約時(shí)間 8 Faultdescribe RTF 文本 可編輯 故障信息描述 9 $$Return 文本 顯示時(shí)計(jì)算 返回路徑 10 Def 文本 顯示時(shí)計(jì)算 當(dāng)前文檔 ID 11 ID 文本 顯示時(shí)計(jì)算 報(bào)修設(shè)備文檔 ID 12 servicename 文本 計(jì)算 維修人員名字 13 state 文本 計(jì)算 處理狀態(tài) 14 rtime 日期 /時(shí)間 計(jì)算 處理時(shí)間 15 serviceinfo 文本 計(jì)算 維修反饋信息 表 45 系統(tǒng)公告表單（ newinfo） 編號(hào) 域名 域類型 類型 說明 1 newtitle 文本 可編輯 公告標(biāo)題 2 time 日期 /時(shí)間 創(chuàng)建時(shí)計(jì)算 公告發(fā)布時(shí)間 3 newcontent RTF 文本 可編輯 公告內(nèi)容 4 $$Return 文本 顯示時(shí)計(jì)算 返回路徑 創(chuàng)建視圖 視圖的作用在于按照不同的關(guān)鍵字對(duì)文檔進(jìn)行分類，它是對(duì)存儲(chǔ)在數(shù)據(jù)庫(kù)中的數(shù)據(jù)進(jìn)行訪問的入口。 只有填寫真實(shí)信息并且通過管理員審核之后才能夠注冊(cè)成功 登錄故障報(bào)修 系統(tǒng)。=)| loginname=Evaluate(macro,doc) Set userdoc=(loginname(0),True) Print Contenttype: text/xml If Not userdoc Is Nothing Then Print 1 Else Print 0 End If 用戶審核 (1)功能描述：為了防止用戶惡意報(bào)修，影響服務(wù)質(zhì)量，用戶在注冊(cè)后必須通過管理員審核后才能登錄本系統(tǒng)。管理員可以點(diǎn)擊用戶文檔可進(jìn)行查看，通過按鈕 （ Command([EditDocument])） 對(duì)用戶信息進(jìn)行編輯，在用戶信息列表中通過復(fù)選框可以對(duì)選中文檔進(jìn)行批量刪除。之后再輸入新密碼并且再次確認(rèn)后 即 可修改密碼 。 (2)修改密碼頁(yè)面如圖 54 所示： 圖 54 修改密碼頁(yè)面 找回密碼 (1)功能描述：用戶 不會(huì)因?yàn)橥浢艽a而必須重新注冊(cè)或者去辦理相應(yīng)的手續(xù)，可以直接通過回答 取回 密碼 的 問題，設(shè)置自己的新密碼 。為了保證密碼強(qiáng)度，輸入密碼最小長(zhǎng)度為 6 個(gè)字符，并且必須包含有大寫字母、小寫字母、符號(hào)、數(shù)字中的至少兩種。資產(chǎn)注冊(cè)基本信息包括：設(shè)備類型、設(shè)備名稱、設(shè)備型號(hào)、設(shè)備圖片、廠家、產(chǎn)地、供應(yīng)商、出廠時(shí)間、購(gòu)買時(shí)間、保修期限、工作頻率、影響工作頻率因素。 (2) 資產(chǎn)注冊(cè)功能頁(yè)面如圖 57 所示 ： 第 13 頁(yè) 共 24 頁(yè) 圖 57 資產(chǎn)注冊(cè)頁(yè)面 資產(chǎn)審核 (1)功能描述：資產(chǎn)審核成功后，用戶才能使用該資產(chǎn)進(jìn)行報(bào)修登記；如何審核失敗的話，系統(tǒng)會(huì)發(fā)送郵件通知用戶，并且審核失敗的文檔也會(huì)被后臺(tái)每天定時(shí)執(zhí)行的代理刪除。用戶在提交報(bào)修登記的時(shí)候，只能選擇自己已注冊(cè)的資產(chǎn)進(jìn)行報(bào)修，報(bào)修登記成功后，系統(tǒng)自動(dòng)改變其報(bào)修資產(chǎn)的狀態(tài)為“故障”。:。 NameLookup([NoUpdate]。shortname)。 DbLookup(:。weathinfo。UserName。3)) ‘在 數(shù)據(jù)庫(kù)中根據(jù)用戶名在視圖（ usercheck）中查找其聯(lián)系電話 If(IsError(DbLookup(:。usercheck。UserName。4))。:oa/。 NameLookup([NoUpdate]。shortname)。 第 15 頁(yè) 共 24 頁(yè) (2)功能實(shí)現(xiàn)如圖 510 所示： 圖 510 故障處理頁(yè)面 (3)故障處理結(jié)果發(fā) 布的代碼： If (0)=已維修 Then =(0)+(0)++(0)++(0)+ | =正常 End If Call (True,True) Set maildoc = New NotesDocument( db ) = Memo =(0) =(0)++(0)++(0) Call ( False) 處理 結(jié)果發(fā)布 (1)功能實(shí)現(xiàn)：維修人員對(duì)故障進(jìn)行處理后，系統(tǒng)根據(jù)其處理情況自動(dòng)發(fā)布處理結(jié)果。公告輸入框采用 Java Applet，使界面更加人性化，管理員可以通過按鈕 （ Command([EditDocument ])） 對(duì)公告進(jìn)行編輯，按鈕（ Command([EditClear])）對(duì)公告進(jìn)行刪除。 (2)權(quán)限管理頁(yè)面如圖 514 所示： 圖 514 權(quán)限管理頁(yè)面 (3)保存 ACL 的代碼： If Not (0)= Then Set entry=((0)) If entry Is Nothing Then Set entry=((0),0) End If 第 18 頁(yè) 共 24 頁(yè) Set item=(rolelist) Forall role In Forall v In If v=role Then Call (v) Exit Forall End If Call (role) End Forall End Forall =Cint((0)) =Cint((0)) Call End If 故障查詢 (1)功能描述： 故障信息查詢模塊包括：查詢方式、查詢條件 。 (2)查詢頁(yè)面如圖 515 所示： 圖 515 故障信息查詢頁(yè)面 (3)多條件查詢的 LotusFormula： 根據(jù)查詢條件進(jìn)行查詢，在域（ Query）里存放查詢條件的信息： wsep:=If(AnyAll=1。 OR )。([booktime]=+startdate+)。 第 19 頁(yè) 共 24 頁(yè) end := If(enddate!=。)。end!=。start=amp。start+end+wsep)。([rtime]=+startdate_1+)。 e := If(enddate_1!=。)。e!=。s=amp。s+e+wsep)。([name]contains+name+)+wsep。([state]contains+state+)+wsep。([eqpsort]contains+eqpsort+)+wsep。([epqname]contains+epqname+)+wsep。([servicename] contains +servicename+)+wsep。date。d。wsep) 在域（ $$Return）里面存放查詢方式： DBName:=ReplaceSubstring(Subset(DbName。\\。 [[/+dbname+/repairinfo?Searchviewamp。Start=+ Text(Start)+amp。SearchMax=+ Text(MaxResults)+amp。FALSE。SearchFuzzy=+ If(ExactMatch=。FALSE)+]] 電子郵件 (1)功能描述： 電子郵件是 Domino 最 強(qiáng)大的功能之一，在使用上界面友好，操作簡(jiǎn)便，用戶與系統(tǒng)和外界的交流大部分將通過郵件來(lái)完成。 (2)用戶電子郵箱截圖如 516 所示： 圖 516 用戶電子郵箱截圖 第 20 頁(yè) 共 24 頁(yè) (3)系統(tǒng)自動(dòng)發(fā)送郵件通知的代碼： While Not ( doc Is Nothing ) tmpdate = Evaluate(|date(now)|,doc) tmprepairexpect = Evaluate(|text(repairexpect)|,doc) If tmpdate(0)=(0) Then =否 Call (True,True) Set maildoc = New NotesDocument( db ) = Memo =(0) =admin =(0)+的 +(0)+已超出保修期限 Call ( False) End If Set