【正文】 =039。.name39。39。39。.=39。39。.TabSequence=039。39。 因為一些按鈕功能可以在其 genaral 屬性中選擇設(shè)定，有些按鈕功能可以從其父類中繼承過來，故不需寫腳 本語言，只需對 “明細 ”和“刪除”按鈕寫腳本語言。 event clicked() else gf_msg ( 修改口令需要輸入兩次，并 且兩次相同 ， 111) end if else gf_msg ( 您沒有權(quán)限修改口令！ ， 211 ) end if 醫(yī)療費用審批 — 異地人員審批界面設(shè)計 圖 異地人員審批界面設(shè)計 醫(yī)療費用審批主要實現(xiàn)的功能是將報銷登記生成的就診資料信息和處方明細信息進行審批操作，沒有審批的報銷登記信息不允許進行報銷。 () ( ， 1522 ) end if “確定”按鈕腳本語言如下： 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 22 string ls_password， ls_str if wf_cert () 0 then if = then ls_str = ls_password=gf_encrypt_string ( ， len( ) ) update t_OperatorInfo set password = :ls_password where Upper(login_name) = Upper(:)。 () ( ， 1060 ) else = 放棄修改 =39。) “修改口令”按鈕腳本語言如下： if 1062 then = 修改口令 =39。 CloseWithReturn(Parent， 39。正在退出系統(tǒng) 39。用戶口令驗證失敗 39。OK39。|39。|39。|39。正在登錄系統(tǒng)主應(yīng)用 39。用戶口令驗證成功 39。正在驗證用戶口令 39。39。 Next ⑥ 在 uo_button_base 基礎(chǔ)上創(chuàng)建該按鈕，命名為 uo_button_save，腳本為 integer i il_Val = 0 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 19 for i=1 to upperbound(idw) If IsValid ( idw[i] ) Then il_Val=idw[i].dynamic event ue_Update () If il_Val 0 Then Return il_Val End If End if。 next ③ 在 uo_button_base 基礎(chǔ)上創(chuàng)建該按鈕，命名為 uo_button_insert，腳本為 integer i //數(shù)組下標 for i=1 to upperbound(idw) If IsValid ( idw[i] ) Then idw[i].dynamic event ue_insert_row () End if。 Return end if open(w_main) 其中“ w_main”是我們設(shè)計的主窗口的名稱。 connect using sqlca。 注意的是：當連接數(shù)據(jù)庫時，要雙擊打開 Application 對象，如我們上面新建的 myarticle 對象，雙擊它，編寫 Open 腳本程序，如下： = MSS Microsoft SQL Server = DBSample = . = sa = False = CommitOnDisconnect=39。 | local | | …… Login ID： sa | 其他合法用戶名 Password： (不填 ) Database： (你數(shù)據(jù)庫的名字，不要有空格減號中文等字符） Commit on disconnect： (不選 ) 在 System 頁中 的 PowerBuilder Catalog table Owner 處填寫與 Login ID 處相同的用戶名。 第六步：在主窗口中設(shè)計界面時，需要建立 PowerBuilder 與數(shù)據(jù)庫的連接，具體步驟如下： 點擊 PowerBuilder 菜單上的圖標，如下圖的紅圈處。 第三步：選擇 File→ New→ Target→ Application→ OK 新建一個應(yīng)用對象， 將彈出一個對話框，如下圖 圖 創(chuàng)建 application 在 ApplicationName 欄中輸入應(yīng)用對象的名稱 ， 如 myarticle，點擊 Finish 第四步 ： 選擇 File→ New→ PB Object→ Window→ OK， 新建一個主窗口 ， 將彈出主窗口界面 ， 如下圖 ： 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 15 圖 創(chuàng)建 layout 畫板 至此，就可以在主窗口中設(shè)計界面了。 系統(tǒng)的第二層設(shè)計－－客戶服務(wù)層設(shè)計 醫(yī)療管理系統(tǒng)的各界面設(shè)計前 第一步 ： 啟動 PowerBuilder 第二步 ： 選擇 File→ New→ Workspace→ OK， 新建一個工作空間 ， 創(chuàng)建應(yīng)用對象前 ， 必須先創(chuàng)建它。同時，服務(wù)器的安全性還通過登陸時在配置文件中設(shè)置的用戶名和密碼來保證。 在本系統(tǒng)中，主要防范沒有權(quán)限的用戶修改數(shù)據(jù)。對于不合法數(shù)據(jù)，系統(tǒng)拒絕操作，并給予提示，同時對于延遲操作，則拒絕整個事務(wù)，將數(shù)據(jù)庫恢復(fù)到事務(wù)執(zhí)行前狀態(tài)。為保證數(shù)據(jù)的完整性，對于前者，重要信息在 輸入時進行檢查，而某些對程序運行沒有重要影響的信息則在使用時進行檢查；對于金額信息，絕大多數(shù)條件下在輸入時即進行有效性檢查。為維護數(shù)據(jù)庫的完整性，系統(tǒng)將提供一種機制來檢查數(shù)據(jù)庫中的數(shù)據(jù)，使其滿足完整性約束條件，這些條件將作為模式的一部分存入數(shù)據(jù)庫中。 AAE200 刪除標識： AAE200=1 表示記錄刪除， AAE200=0 表示記錄沒刪除 AKC260_LJ 累計報銷金額：所有報銷金額的累計。 AAE117 結(jié)算標志： AAE117=1 表示此人以報銷本年度不能在報銷， AAE117=0表示此人本年度沒有進行報銷。 AAE001 年度：報銷年度不能為空。 錄入數(shù)據(jù)庫數(shù)據(jù)； ④ 運行各種與數(shù)據(jù)庫相關(guān)的應(yīng)用程序 ， 以確認和修正數(shù)據(jù)庫的內(nèi)容。 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 11 系統(tǒng)的第一層設(shè)計－數(shù)據(jù)服務(wù)層設(shè)計― 數(shù)據(jù)庫設(shè)計主要是實現(xiàn)以下的功能： ① 根據(jù)應(yīng)用程序使用的環(huán)境平臺 ， 選擇適宜的 DBMS(如 Oracle)和開發(fā)工具 (如PB)； ② 設(shè)計數(shù)據(jù)庫 ， 編寫定義數(shù)據(jù)庫模式的 SQL 程序 。 通用性：系統(tǒng)設(shè)計要具有易移植性，便于推廣使用。 可靠性：系統(tǒng)中的各個子系統(tǒng)功能齊全，結(jié)構(gòu)聯(lián)系緊密 。 正確性：系統(tǒng)中應(yīng)做到各種數(shù)據(jù)完整真實和標準。 建立計算機網(wǎng)絡(luò)和數(shù)據(jù)庫的維護機制。 支持醫(yī)療和管理的窗口服務(wù)，完成醫(yī)院各部門之間的信息傳遞。 系統(tǒng)的功能 介紹 建立全院計算機網(wǎng)絡(luò)，實現(xiàn)信息資源共享。 協(xié)助醫(yī)療質(zhì)量檢測和控制。 人、財、物規(guī)范化管理。 防瀉堵漏，減少病人欠費現(xiàn)象，以保證醫(yī)院的經(jīng)濟收入。 《社會保險計算機管理信息系統(tǒng)》的系統(tǒng)要求與結(jié)構(gòu) 表 性能要求 項目要求 社會保險系統(tǒng)要求 體系結(jié)構(gòu)特點 Client/Server 數(shù)據(jù)庫特點 Oracle 開放性 容納新技術(shù) 滿足 滿足 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 2 系統(tǒng)設(shè)計需求分析 9 符合工業(yè)標準 滿足 滿足 硬件透明性 滿足 滿足 標準化 邏輯視圖與規(guī)范化協(xié)議 滿足 標準化的數(shù)據(jù)通訊協(xié)議 滿足 滿足 可靠性 運行可靠性 滿足 滿足 安全性 數(shù)據(jù)恢復(fù)能力 滿足 數(shù)據(jù)傳輸安全性 滿足 滿足 擴展性 規(guī)模平滑過渡 滿足 滿足 高低端產(chǎn)品一致 滿足 實用性 面向用戶 滿足 滿足 保護投資 基礎(chǔ)數(shù)據(jù)庫轉(zhuǎn)換 滿足 系統(tǒng)運行的硬件平臺 系統(tǒng)運行的硬件平臺的可選型如下： 服務(wù)器端： 硬件：小型機： IBM、 SUN、 HP 、 DEC UNIX 服務(wù)器： SUN 、 DEC、 HP、 SGI、 IBM 微機服務(wù)器： CAMPAQ、 HP、 IBM、 DEC 軟件：支持所有的操作系統(tǒng) 客戶機端： 硬件： IBM PC 386/486 以上 軟件： 、 WINDOW9 OS/ NETWARE 重慶大學(xué)本科學(xué)生畢業(yè)設(shè)計 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 10 3 醫(yī)療管理子系統(tǒng)的設(shè)計過程 醫(yī) 療 管理信息 子 系統(tǒng)的總體設(shè)計 系統(tǒng)設(shè)計的目的 醫(yī)院管理信息系統(tǒng)是為了適應(yīng)醫(yī)院綜合管理的需求，改變醫(yī)院管理的傳統(tǒng)模式，加速醫(yī)院管理的自動化、標準化和科學(xué)化，為醫(yī)院管理決策部門和主管部門制定醫(yī)院管理決策提供可靠的信息依據(jù)，為提高醫(yī)院的社會效益和經(jīng)濟效益服務(wù)。 系統(tǒng)運行環(huán)境 《社會保險計算機管理信息系統(tǒng)》的系統(tǒng)要求與結(jié)構(gòu) 如表 21 所示 ， 采用 Client/Server 系統(tǒng)結(jié)構(gòu)的 Oracle 數(shù)據(jù)庫完全可以滿足社會保險系統(tǒng)的要求。 其實現(xiàn)過程為，客戶機向服務(wù)器提出服務(wù)請求，服務(wù)器響應(yīng)并處理這些請求，然后將結(jié)果返回給客戶機。 在以 Oracle 為數(shù)據(jù)庫管理系統(tǒng)、 PowerBuilder8 為開發(fā)工具的環(huán)境中， PB可以完成的任務(wù)是：設(shè)計窗口和窗口中的控件，生成菜單，通過數(shù)據(jù)窗口或SQL 語句操縱數(shù)據(jù)庫，同種或異種數(shù)據(jù)庫數(shù)據(jù)的拷貝和轉(zhuǎn)換等工作； Oracle主要完成對數(shù)據(jù)庫對象 (如表、視圖、存儲過程、函數(shù)、觸發(fā)器、用戶、角色、序號、同義詞等 )的存儲和管理，接收、執(zhí)行客戶機或 Web 服務(wù)器上傳送來的SQL 指令并將其執(zhí)行結(jié)果返回給客戶機或 Web 服務(wù)器，進行優(yōu)化查詢、事務(wù)處理、并發(fā)處理、恢復(fù)與備份等工作。 PB 與 Oracle 的結(jié)合 在客戶 /服務(wù)器管理信息系統(tǒng)中，數(shù)據(jù)庫服務(wù)器是整個應(yīng)用系統(tǒng)的核心，主要完成數(shù)據(jù)庫數(shù)據(jù)的存儲管理、安全管理、并發(fā)控制、事務(wù)管理、完整性維護、優(yōu)化查詢等工作。語言集成于數(shù)據(jù)庫服務(wù)器中， PL/SQL 代碼可以對數(shù)據(jù)進行快速高效的處理。 數(shù)據(jù)庫接口語言 PL/SQL 語言 SQL 是一種靈活高效的查詢語言，其主要功能是對關(guān)系數(shù)據(jù)庫中的數(shù)據(jù)進行操作和處理。 Oracle 數(shù)據(jù)庫有如下特點：支持多用戶、大事物量的 事務(wù)處理；數(shù)據(jù)安全性和完整性控制；提供對于數(shù)據(jù)庫操作的接口；支持分布式數(shù)據(jù)處理；可移植性、可兼容性、可連接性等。 Power Builder 支持嵌入式 SQL 語句、動態(tài)語句。同時， Power Builder 支持多種關(guān)系數(shù)據(jù)庫管理系統(tǒng)， Power Builder 提供了多種接口，應(yīng)用程序可通過 ODBC 接口訪問本地多種數(shù)據(jù)庫，如 Fox Pro、 X Base。 Power Builder 是面向?qū)ο蟮目焖匍_發(fā)工具。 系統(tǒng)開發(fā)應(yīng)用技術(shù) 軟件開發(fā)工具 PowerBuilder Power Builder 是基于 windows 的專業(yè)的客戶 /服務(wù)器開發(fā)工具 ， 是客戶 /服務(wù)器體系結(jié)構(gòu)下開發(fā)客戶程序的開發(fā)工具。結(jié)轉(zhuǎn)時間為每年 12 月 31 日。 醫(yī)?？ü芾? 醫(yī)保卡管理要求能夠?qū)崿F(xiàn)醫(yī)?？ǖ膾焓?、解掛、注銷和補發(fā)等功能。 ③ 對查詢出的信息可以進行修改或刪除，并保存。設(shè)計主要完成以下功能： ① 可新增一個藥品信息，在錄入時，對藥品單價等需要合法性校驗的數(shù)據(jù)項會自動校驗。本設(shè)計以藥品 目錄信息維護為例進行設(shè)計。 ② 根據(jù)扣款費用和相關(guān)政策對醫(yī)保患者在定點醫(yī)療機構(gòu)指定月份的醫(yī)療費用進行結(jié)算。每月定點醫(yī)療機構(gòu)和醫(yī)保經(jīng)辦機構(gòu)提供《醫(yī)療保險 ____年 ____月定點醫(yī)療機構(gòu)醫(yī)療費結(jié)算表》，根據(jù)定點醫(yī)療機構(gòu)和藥店發(fā)生的記帳 費用，每月對審核過的費用信息進行統(tǒng)計，將應(yīng)該支付給定點醫(yī)療機構(gòu)和藥店的記帳費用及時支付；然后給財務(wù)送費用明細的時候，直接傳實際發(fā)生的費用。 定點醫(yī)療機構(gòu)結(jié)算 定點醫(yī)療機構(gòu)結(jié)算主要包括：定點醫(yī)療機構(gòu)月結(jié)算和定點醫(yī)療機構(gòu)年結(jié)算，定點醫(yī)療機構(gòu)結(jié)算信息查詢。 ④ 選擇錄入處方明細、還是收費類別方式錄入。 ② 選擇醫(yī)療類別為門診慢性病超定額，錄入病種信 息。對門診慢性病超出定額個人自付的費用統(tǒng)計出來，可以錄入，