版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
43/49HYPERLINK"/"某小型醫(yī)院信息治理系統(tǒng)的設(shè)計(jì)與開發(fā)摘要本文所介紹的小型醫(yī)院信息治理系統(tǒng)旨在改善某小型醫(yī)院的信息治理,改變醫(yī)院的信息處理差不多還停留在手工方式的狀況,降低勞動(dòng)強(qiáng)度,提高工作效率。本系統(tǒng)不僅適用于醫(yī)院的行政治理業(yè)務(wù),也適用于具體的就診事務(wù)業(yè)務(wù)。本系統(tǒng)能夠使醫(yī)務(wù)人員空出更多的精力和時(shí)刻服務(wù)于病人,同時(shí)保證病人和醫(yī)院的經(jīng)濟(jì)利益,從而使醫(yī)院能夠以少的投入獲得更好的社會(huì)效益與經(jīng)濟(jì)效益。本系統(tǒng)是利用PowerBuilder并結(jié)合醫(yī)院病人治理制度,嚴(yán)格按照軟件生命周期來設(shè)計(jì)的一個(gè)信息治理系統(tǒng)。實(shí)現(xiàn)了一個(gè)包括就診治理、模板處理、數(shù)據(jù)統(tǒng)計(jì)等模塊在內(nèi)的小型醫(yī)院信息治理系統(tǒng),實(shí)現(xiàn)不同職員登錄、病人掛號(hào)就醫(yī)、病人信息查詢、大夫出具處理處方及劃價(jià)、門診收費(fèi)與統(tǒng)計(jì)等功能。本文簡要介紹了醫(yī)院治理系統(tǒng)的項(xiàng)目背景和意義,著重闡述了該系統(tǒng)的開發(fā)實(shí)現(xiàn)過程,從系統(tǒng)目標(biāo),需求分析、總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)、到系統(tǒng)測(cè)試等各個(gè)環(huán)節(jié)都進(jìn)行了詳細(xì)的分析和描述。關(guān)鍵詞:數(shù)據(jù)庫;PowerBuilder;就診TheDesignandImplementationofaSmallScaleHospitalInformationManagementSystemAbstractThesmallscalehospitalinformationmanagementsystemisdesignedforimprovingtheinformationmanagementofsmallhospital,reducingthelaborintensityandenhancingworkingefficiency.Thissystemcansupporttheadministrationofthehospitalandmanagethebusiness.Inaddition,itcanhelpfacilitatethepatient,andbringsocialandeconomicinteresttothehospital.ThissystemusesPowerBuilderasdevelopinglanguage,whichisdesignedaccordingtosoftwarelifecycle.Thesystemcanimplementthepatient’sregistrationbeforehisgoingtoseeadoctor,doctor’sprocessingprescriptionandmanagementofexpense.Thethesisintroducesthesystem’sprojectbackgroundandsignificancebriefly,elaboratesthesystem’simplementationprocess.Italsoanalysesanddescribesallthestagesofthesystem,includingfeasibilitystudy,demandanalysis,outlinedesign,detaileddesignandsystemtest.Keywords:database;PowerBuilder;prescription
目錄論文總頁數(shù):30頁TOC\o"1-3"\h\z\u1 引言 11.1 課題背景 11.2 國內(nèi)外研究現(xiàn)狀 11.3 本課題研究的意義 12 關(guān)鍵技術(shù)介紹 12.1 開發(fā)工具及運(yùn)行環(huán)境 12.1.1 總體開發(fā)工具及環(huán)境 12.1.2 開發(fā)工具簡介 12.2 系統(tǒng)需求分析 22.3 系統(tǒng)功能結(jié)構(gòu)設(shè)計(jì) 32.4 數(shù)據(jù)庫設(shè)計(jì)與實(shí)現(xiàn) 43 本系統(tǒng)功能模塊設(shè)計(jì)與實(shí)現(xiàn) 73.1 應(yīng)用程序?qū)ο笤O(shè)計(jì) 73.2 職工登錄界面 83.3 主界面 93.4 掛號(hào)系統(tǒng)模塊 123.5 就診治理模塊 153.6 模板治理模塊 183.7 數(shù)據(jù)治理模塊 193.8 報(bào)表模塊 224 關(guān)鍵功能點(diǎn)的測(cè)試 234.1 登錄模塊測(cè)試 234.2 用戶密碼修改功能點(diǎn)測(cè)試 244.3 病人費(fèi)用報(bào)表功能測(cè)試 26結(jié)論 27參考文獻(xiàn) 28致謝 29聲明 30更多全套設(shè)計(jì)聯(lián)系QQ:1042897696最新設(shè)計(jì)大全/sf/20100915/3539.html引言課題背景隨著科學(xué)的不斷進(jìn)步,計(jì)算機(jī)應(yīng)用差不多遍布整個(gè)社會(huì)的每個(gè)角落。人們的軀體健康也在不斷受到重視。因此,醫(yī)院進(jìn)行現(xiàn)代化治理就變得尤為重要。目前社會(huì)正處于健保進(jìn)展方興未艾的時(shí)代,各醫(yī)療院所莫不兢兢業(yè)業(yè)地改善本身的體制或治理方式,以因應(yīng)健保越來越嚴(yán)格的規(guī)范。小型醫(yī)院信息治理系統(tǒng)是適應(yīng)時(shí)代進(jìn)展的需要,提高治理的效率而開發(fā)設(shè)計(jì)的。國內(nèi)外研究現(xiàn)狀一個(gè)完整的醫(yī)院信息治理系統(tǒng)應(yīng)該既包括醫(yī)院治理信息系統(tǒng),又包括臨床醫(yī)療信息系統(tǒng),國外研究機(jī)構(gòu)在力求實(shí)現(xiàn)醫(yī)院信息治理系統(tǒng)的完整性。臨床信息治理系統(tǒng)在數(shù)據(jù)處理的實(shí)時(shí)性要求、相應(yīng)速度、安全保密等方面一般要比治理信息系統(tǒng)有更苛刻的要求。而醫(yī)院治理信息系統(tǒng)的計(jì)算機(jī)技術(shù)較為單純和簡單,也由于醫(yī)院治理信息系統(tǒng)以處理文字和數(shù)字類數(shù)據(jù)為主,較少設(shè)計(jì)聲音、圖象、多媒體數(shù)據(jù)的動(dòng)態(tài)傳遞等復(fù)雜要求,實(shí)現(xiàn)起來容易的多。本課題研究的意義本系統(tǒng)通過對(duì)病人信息治理系統(tǒng)方案的設(shè)計(jì)和實(shí)施,提出一種對(duì)病人在就診過程中產(chǎn)生的信息進(jìn)行數(shù)字化治理的技術(shù),為門診建立起信息高速公路,促使醫(yī)院門診逐步形成方便、科學(xué)、合理的治理模式。從全然上改變傳統(tǒng)的依靠文件等信息的傳遞方式,實(shí)現(xiàn)無紙化辦公,簡化就診手續(xù),加快信息流通速度,提高治療效率,差不多實(shí)現(xiàn)醫(yī)院系統(tǒng)的數(shù)字化治理。同時(shí),本系統(tǒng)對(duì)病人既往病史以及用藥記錄存檔,既便于大夫更加準(zhǔn)確的對(duì)當(dāng)前病人的診斷,同時(shí)也有利于大夫?qū)Ω鞣N病例進(jìn)行分析研究。病歷模板的套餐制更具靈活性。關(guān)鍵技術(shù)介紹開發(fā)工具及運(yùn)行環(huán)境總體開發(fā)工具及環(huán)境本系統(tǒng)采納的軟件開發(fā)工具及環(huán)境如下:操作系統(tǒng):WINDOWSXP編程工具:PowerBuilder9.0數(shù)據(jù)庫:ACCESS開發(fā)工具簡介PowerBuilder是一個(gè)圖形化的應(yīng)用程序開發(fā)環(huán)境。使用PowerBuilder開發(fā)的應(yīng)用軟件由窗口構(gòu)成,窗口中不僅能夠包含按鈕、下拉列表框及單選按紐等標(biāo)準(zhǔn)的Windows控件,還能夠有PowerBuilder提供的專門控件。這些專門控件能夠使應(yīng)用軟件更容易使用,使應(yīng)用軟件的開發(fā)效率更高。例如,數(shù)據(jù)窗口確實(shí)是PowerBuilder提供的一個(gè)集成度專門高的控件,使用該控件能夠?qū)iT方便地從數(shù)據(jù)庫中提取數(shù)據(jù),專門簡單地檢索數(shù)據(jù),提供圖形化的數(shù)據(jù)顯示方式,創(chuàng)建統(tǒng)計(jì)功能特不強(qiáng)大的數(shù)據(jù)統(tǒng)計(jì)表。由于數(shù)據(jù)窗口對(duì)數(shù)據(jù)的操作是通過事務(wù)進(jìn)行的,因此對(duì)數(shù)據(jù)的操作有專門強(qiáng)的可靠性。這些都為開發(fā)功能強(qiáng)大的數(shù)據(jù)庫應(yīng)用軟件提供了可靠的保證。商業(yè)化的軟件開發(fā)要求有專門好的移植性。PowerBuilder既能夠跨平臺(tái)開發(fā),也能夠發(fā)行跨平臺(tái)軟件。例如,在Windows95下開發(fā)的程序,能夠不修改源程序而形成UNIX下的執(zhí)行文件或Macintosh下的執(zhí)行文件。在開發(fā)小組中,不同成員能夠使用不同的開發(fā)環(huán)境,但由于PowerBuilder的支持,在不同的開發(fā)環(huán)境下看到的共享PowerBuilder對(duì)象是相同的,因此仍能夠同時(shí)開發(fā)同一個(gè)應(yīng)用程序。隨著軟件技術(shù)的不斷進(jìn)展,PowerBuilder9.0及時(shí)地強(qiáng)化了開發(fā)功能,并提供了一些配套的開發(fā)工具,成為一種易于使用的、可伸縮的并經(jīng)實(shí)踐證明的快速集成開發(fā)環(huán)境。它在給用戶提供一條轉(zhuǎn)移到下一代平臺(tái)的途徑的同時(shí),使用戶仍能夠愛護(hù)和擴(kuò)展現(xiàn)有的技術(shù)和應(yīng)用上的投資。系統(tǒng)需求分析病人在就診過程中,差不多的業(yè)務(wù)流程如圖1所示:圖1業(yè)務(wù)流程圖通過對(duì)病人就診流程及治理的調(diào)查和了解,初步確定了該系統(tǒng)的差不多需求情況:在病人就診之前,必須進(jìn)行掛號(hào),包括病人的最差不多信息,掛號(hào)費(fèi)用,預(yù)存費(fèi)等。在病人進(jìn)行掛號(hào)的同時(shí),能夠自動(dòng)為病人分配病歷號(hào),作為病人在就診過程中的唯一標(biāo)識(shí)。在病人就診時(shí),大夫能夠?qū)Σ∪瞬畈欢嘈畔?包括簡要病史等等)進(jìn)行登記。對(duì)病人每次就醫(yī)的主訴,病歷,處方進(jìn)行輸入,并能夠進(jìn)行查詢和維護(hù)。各種化驗(yàn)檢查信息的輸入、查詢和維護(hù),并能夠進(jìn)行異常提醒。對(duì)病人的預(yù)付款進(jìn)行治理,同時(shí)當(dāng)預(yù)付金額不夠時(shí)能夠提醒補(bǔ)交預(yù)付款。對(duì)病人就診過程中的各種費(fèi)用進(jìn)行治理。能夠打印病人預(yù)付款單據(jù)和費(fèi)用憑單。大夫能夠查詢病人治療情況、化驗(yàn)檢查結(jié)果,以便跟蹤病人病情進(jìn)展情況,同時(shí)也有助于大夫?qū)Ω鞣N病例進(jìn)行分析研究。系統(tǒng)功能結(jié)構(gòu)設(shè)計(jì)本系統(tǒng)劃分為7個(gè)功能模塊,系統(tǒng)功能模塊圖如圖2所示。商業(yè)源代碼,全套計(jì)算機(jī)畢業(yè)設(shè)計(jì)免費(fèi)下載更多全套設(shè)計(jì)聯(lián)系QQ:1042897696最新設(shè)計(jì)大全/sf/20100915/3539.html各模塊如下:職員治理:要緊包括職員登陸,修改密碼,判不用戶級(jí)不功能。病人治理:要緊包括病人的差不多信息登記。要緊包括對(duì)病人差不多信息的錄入、查詢和維護(hù)等操作。病人差不多信息的錄入窗口能夠從就診窗口進(jìn)入,系統(tǒng)能夠經(jīng)歷當(dāng)前就診病人病歷號(hào)以及當(dāng)前錄入員的姓名。就診治理:要緊包括對(duì)病人此次就診病情的錄入,過往病史的查詢及檢查和化驗(yàn)結(jié)果進(jìn)行錄入。模板治理:要緊大夫針對(duì)各種典型病種所開具的主訴、病歷、處方錄入、查詢?;?yàn)檢查治理:要緊包括對(duì)病人每次所做化驗(yàn)和檢查的結(jié)果進(jìn)行錄入、查詢和維護(hù)。費(fèi)用治理:要緊包括預(yù)付款治理和費(fèi)用治理。預(yù)付款治理:要緊包括對(duì)預(yù)付金額進(jìn)行錄入、查詢和維護(hù)等操作。同時(shí)能夠依照支出情況進(jìn)行費(fèi)用統(tǒng)計(jì)、查詢余額和缺鈔票警示。費(fèi)用支出治理:要緊包括對(duì)病人藥費(fèi)、檢查、化驗(yàn)等支出進(jìn)行錄入、查詢和維護(hù)等操作。報(bào)表打?。阂勒招枰筛鞣N報(bào)表,同時(shí)打印出來。數(shù)據(jù)庫設(shè)計(jì)與實(shí)現(xiàn)在認(rèn)真調(diào)查醫(yī)院就診治理過程的基礎(chǔ)上,得到系統(tǒng)所要處理的數(shù)據(jù)流程圖,如圖3所示。圖3數(shù)據(jù)流圖本系統(tǒng)依照上面的設(shè)計(jì)規(guī)劃出的實(shí)體有4個(gè):病人、大夫、化驗(yàn)檢查員、藥品。下面為本系統(tǒng)實(shí)體之間關(guān)系的E-R圖,如圖4所示。圖4實(shí)體關(guān)系E-R圖依照以上的分析設(shè)計(jì)得到實(shí)際數(shù)據(jù)庫模型。數(shù)據(jù)庫設(shè)計(jì)如下:病人差不多情況表(ghdj):就診號(hào)(jzid)、病歷號(hào)(blh),姓名(xm),身份證號(hào)(sfzh),性不(xb),出生日期(sr),婚否
(hf),地址(dz),電話(dh),日期(ryrq),科不(kb),主訴(zs),現(xiàn)病史(xbs),病歷(bl),處方(cf),醫(yī)囑(yz),大夫(ys)。主碼是就診號(hào)(jzid)。此表字段用來保存病人的相關(guān)詳細(xì)信息,包括病人差不多信息和病人在醫(yī)院就診相關(guān)信息。表1ghdj字段名數(shù)據(jù)類型字段大小必填字段jzid文本14是blh文本8是xm文本20否sfzh數(shù)字小數(shù)否xb文本4否sr日期/時(shí)刻短日期否hf文本4否dz文本100否dh文本15否ryrq日期/時(shí)刻短日期否kb文本10否zs文本200否xbs文本200否bl文本200否cf文本200否yz文本200否ygh文本5否掛號(hào)表(ghb):流水號(hào)(id),病歷號(hào)(blh),日期(rq),時(shí)刻(sj),掛號(hào)費(fèi)(ghf),金額(je)。主碼是流水號(hào)(id)。此表字段用來記錄病人在醫(yī)院掛號(hào)就醫(yī)時(shí)產(chǎn)生的相關(guān)數(shù)據(jù)。表2ghb字段名數(shù)據(jù)類型字段大小必填字段id文本9是blh文本8否rq日期/時(shí)刻否sj日期/時(shí)刻否ghf數(shù)字長整型否je數(shù)字長整型否化驗(yàn)檢查表(hyjc):病歷號(hào)(blh),化驗(yàn)日期(hyrq),化驗(yàn)時(shí)刻(hysj),檢驗(yàn)員(jyy),狀態(tài)(zt)等,其中化驗(yàn)檢查中的具體項(xiàng)目由于數(shù)目眾多,在此就不一一列出。主碼是病歷號(hào)(blh),化驗(yàn)日期(hyrq)。此表字段用來記錄病人在院就醫(yī)時(shí)不同狀態(tài)的檢查產(chǎn)生的結(jié)果表3hyjc字段名數(shù)據(jù)類型字段大小必填字段blh文本8是hyrq日期/時(shí)刻是rq日期/時(shí)刻是zt數(shù)字長整型否jyy文本5否費(fèi)用表(fyb):費(fèi)用憑單號(hào)(id),病歷號(hào)(blh),項(xiàng)目內(nèi)容(xmnl),數(shù)量(sl),收費(fèi)科室(sfks)。主碼是費(fèi)用憑單號(hào)(id),項(xiàng)目內(nèi)容(xmnl)。此表字段用來記錄病人在院所做就醫(yī)項(xiàng)目的相關(guān)信息。表4fyb字段名數(shù)據(jù)類型字段大小必填字段id文本14是blh文本8是xmnl文本13是sfks文本20否sl數(shù)字長整型否藥品庫表(ypkb):藥品編號(hào)(ypbh),藥品名(ypm),類不(lb),價(jià)格(jg),包裝規(guī)格(bzgg),單位(dw),藥用字典(yyzd)。主碼是藥品編號(hào)(ypbh)。此表字段用來記錄醫(yī)院各種項(xiàng)目藥品的相關(guān)信息。表5ypkb字段名數(shù)據(jù)類型字段大小必填字段ypbh文本13是ypm文本30是lb文本4否jg數(shù)字小數(shù)否bzgg文本6否dw文本6否yyzd文本100否病歷處方表(blcfb):模板號(hào)(mbh),病癥名稱(bzmc),病歷內(nèi)容(blnr),處方內(nèi)容(cfnr),主訴內(nèi)容(zsnr),開方大夫(ygh)。主碼是模板號(hào)(mbh)。此表字段用來記錄大夫?qū)Σ“Y的研究和描述,方便大夫?qū)νN病癥不同情況進(jìn)行對(duì)比研究,提高大夫的工作效率,關(guān)心大夫進(jìn)行診斷,推斷更為準(zhǔn)確。表6ypkb字段名數(shù)據(jù)類型字段大小必填字段mbh文本14是bzmc文本100否blnr文本200否cfnr文本200否zsnr文本200否ygh文本5否職員表(ygb):職員號(hào)(ygh),職員名(kb),科不(kb),職位(zw),密碼(pwd),等級(jí)(dj)。主碼是職員號(hào)(ygh)。此表字段用來記錄醫(yī)院職員的差不多信息并在登陸時(shí)的依照登記推斷其權(quán)限。表7ypkb字段名數(shù)據(jù)類型字段大小必填字段ygh文本5是ygm文本20否kb文本10否zw文本10否pwd文本10否dj文本10否本系統(tǒng)功能模塊設(shè)計(jì)與實(shí)現(xiàn)應(yīng)用程序?qū)ο笤O(shè)計(jì)PowerBuilder9.0開發(fā)的應(yīng)用程序的入口點(diǎn)是PowerBuilder9.0的應(yīng)用程序?qū)ο螅\(yùn)行是程序從那個(gè)入口點(diǎn)啟動(dòng),因此應(yīng)用程序?qū)ο蟮脑O(shè)計(jì)是應(yīng)用程序設(shè)計(jì)的開始。本應(yīng)用程序?qū)ο笾杏玫絆pen事件,輸入如下程序代碼://Profilemzys2SQLCA.DBMS="ODBC"SQLCA.AutoCommit=FalseSQLCA.DBParm="ConnectString='DSN=mzys2;UID=;PWD='"connect;//打開程序登錄窗口opensheet(w_zhigong,w_zhujiemian,8,original!)首先在應(yīng)用程序?qū)ο蟮淖兞慷x窗口中定義全局變量,如intG_input_time定義的變量是登錄時(shí)輸入用戶名和密碼的次數(shù),stringyg_name定義的是用戶名,stringyg_ygh定義的是職員號(hào),stringg_pwd定義的是密碼,stringg_blh定義病歷號(hào),stringg_jzid定義病人的就診號(hào)等等。職工登錄界面應(yīng)用程序運(yùn)行后第一個(gè)出現(xiàn)的窗口確實(shí)是w_login登陸窗口,界面如圖5所示。圖5職工登陸界面用戶必須通過職工登錄窗口才能夠進(jìn)入主界面。系統(tǒng)登錄窗口要緊實(shí)現(xiàn)功能是確認(rèn)用戶身份及級(jí)不,并依照用戶級(jí)不主界面菜單中該用戶能夠進(jìn)行的操作。本系統(tǒng)依照醫(yī)院具體情況將醫(yī)院職工分為種5種職位,院長、大夫、放射員收費(fèi)員和化驗(yàn)員。其中,院長級(jí)不最高,能夠使用主界面菜單中的任何一種操作,其他各種職位級(jí)不都只能享有各自級(jí)不的權(quán)限。大夫能夠進(jìn)行病人就診的信息錄入、查詢和維護(hù),定義主訴病歷處方模板的定義和查詢,化驗(yàn)檢驗(yàn)結(jié)果的查詢、費(fèi)用的查詢等;收費(fèi)員能夠進(jìn)行掛號(hào)收費(fèi)及統(tǒng)計(jì),預(yù)付費(fèi)用的收繳和統(tǒng)計(jì)等;放射員能夠?qū)Σ∪说母黜?xiàng)檢查結(jié)果進(jìn)行錄入、查詢、維護(hù)等;化驗(yàn)員則是對(duì)病人的各項(xiàng)化驗(yàn)結(jié)果進(jìn)行錄入、查詢、維護(hù)。在登錄界面的OPEN()函數(shù)中定義一個(gè)游標(biāo)declaregusercursor,該游標(biāo)在ygb表中搜索ygm然后添加到職員名的下拉控件中,其代碼如下:stringls_userdeclaregusercursorforselectygmfromygborderbyygh;openguser;ifSQLCA.SQLCode=-1then MessageBox("數(shù)據(jù)錯(cuò)誤",SQLCA.SQLErrText)elsedo ifls_user<>''thenddlb_1.additem(ls_user) fetchguserinto:ls_user; loopwhilesqlca.sqlcode=0 ifsqlca.sqlcode=-1then messageBOX("數(shù)據(jù)錯(cuò)誤",sqlca.sqlerrtext) endifendifcloseguser;ddlb_1.selectitem(0)在“確定”按紐中當(dāng)推斷職員登錄條件正確時(shí)則依照職員的職位推斷那些菜單功能將能被使用。主界面首先設(shè)計(jì)主菜單m_zhujiemian,依照各模塊設(shè)計(jì)好菜單項(xiàng)和各菜單項(xiàng)下面的子菜單項(xiàng),并可添加為用戶登錄和退出以及掛號(hào)Toolbar,提供快捷操作。然后在主窗口w_zhujiemian將menuname中選擇設(shè)計(jì)好的主菜單m_zhujiemian。應(yīng)用程序的要緊功能差不多上在主窗口w_zhujiemian及在其下打開的眾多窗口中完成的。主界面如圖6所示。圖6醫(yī)院治理系統(tǒng)主界面不同用戶登錄后,由于職位級(jí)不不同,主界面也會(huì)有些差異,不能操作的菜單項(xiàng)為灰色,因此,下面我們選用的差不多上“院長”級(jí)不登錄后的主界面,將主窗口的WindowType屬性設(shè)立為mdi型,以便在其下以特定方式打開其他窗口。主界面設(shè)計(jì)中要緊是主菜單m_zhujiemian的設(shè)計(jì),該菜單結(jié)構(gòu)及代碼如下:⑴登錄:用戶登錄:Clicked事件程序代碼:opensheet(w_zhigong,w_zhujiemian,8,original!)退出:Clicked事件程序代碼:close(w_zhujiemian)⑵掛號(hào)系統(tǒng):掛號(hào):Clicked事件程序代碼:opensheet(w_guahao,w_zhujiemian,8,original!)預(yù)付:Clicked事件程序代碼:opensheet(w_yufu,w_zhujiemian,8,original!)⑶就診治理:就診入口:Clicked事件程序代碼:opensheet(w_jiuzhenrukou,w_zhujiemian,8,original!)就診歷史:Clicked事件程序代碼:opensheet(w_lishi,w_zhujiemian,8,original!)檢查報(bào)告:Clicked事件程序代碼:opensheet(w_hyjc_jcbg,w_zhujiemian,8,original!)化驗(yàn):血常規(guī)報(bào)告:Clicked事件程序代碼openSheet(w_hyjc_twd,w_main,8,Layered!)尿常規(guī)報(bào)告:Clicked事件程序代碼opensheet(w_hyjc_ncg,w_zhujiemian,8,original!)生化檢查報(bào)告:Clicked事件程序代碼opensheet(w_hyjc_shjc,w_zhujiemian,8,original!)⑷模板治理:定義完整模板:Clicked事件程序代碼:opensheet(w_jb,w_zhujiemian,8,original!)定義主訴模板:Clicked事件程序代碼:opensheet(w_dingyizs,w_zhujiemian,8,original!)定義病歷模板:Clicked事件程序代碼:opensheet(w_dingyibl,w_zhujiemian,8,original!)定義處方模板:Clicked事件程序代碼:opensheet(w_dingyicf,w_zhujiemian,8,original!)模板查詢:Clicked事件程序代碼:opensheet(w_blzsmb,w_zhujiemian,8,original!)⑸數(shù)據(jù)治理:掛號(hào)人數(shù)統(tǒng)計(jì):Clicked事件程序代碼:opensheet(w_ghtongjilb,w_zhujiemian,8,original!)病人差不多信息查詢:Clicked事件程序代碼:opensheet(w_jbxx_cx,w_zhujiemian,8,original!)預(yù)付款查詢:Clicked事件程序代碼:opensheet(w_yufucx,w_zhujiemian,8,original!)病人血常規(guī)查詢:Clicked事件程序代碼:opensheet(w_hyjc_xcg_cx,w_zhujiemian,8,original!)病人尿常規(guī)查詢:Clicked事件程序代碼:opensheet(w_hyjc_ncg_cx,w_zhujiemian,8,original!)病人生化查詢:Clicked事件程序代碼:opensheet(w_hyjc_shjc_cx,w_zhujiemian,8,original!)病人檢查結(jié)果查詢:Clicked事件程序代碼:opensheet(w_hyjc_jcbg_cx,w_zhujiemian,8,original!)⑹數(shù)據(jù)治理:用戶安全維護(hù):Clicked事件程序代碼:opensheet(w_change,w_zhujiemian,8,original!)常用維護(hù)藥字典維護(hù):Clicked事件程序代碼:opensheet(w_yaodian,w_zhujiemian,8,original!)病人差不多信息維護(hù):Clicked事件程序代碼:opensheet(w_jbxx_wh,w_zhujiemian,8,original!)血常規(guī)檢查結(jié)果維護(hù):Clicked事件程序代碼:opensheet(w_hyjc_xcg_wh,w_zhujiemian,8,original!)尿常規(guī)檢查結(jié)果維護(hù):Clicked事件程序代碼:opensheet(w_hyjc_ncg_wh,w_zhujiemian,8,original!)生化檢查結(jié)果維護(hù):Clicked事件程序代碼:opensheet(w_hyjc_shjc_wh,w_zhujiemian,8,original!)檢查結(jié)果維護(hù):Clicked事件程序代碼:opensheet(w_hyjc_jcbg_wh,w_zhujiemian,8,original!)⑺報(bào)表:病人預(yù)付款報(bào)表:Clicked事件程序代碼:opensheet(w_yufu_bb,w_zhujiemian,8,original!)病人費(fèi)用報(bào)表:Clicked事件程序代碼:opensheet(w_chufangjj_bb,w_zhujiemian,8,original!)⑻窗口:沒有代碼,用來顯示差不多打開的窗口名稱。掛號(hào)系統(tǒng)模塊依照醫(yī)院科室及掛號(hào)類型類設(shè)計(jì)掛號(hào)系統(tǒng),自動(dòng)產(chǎn)生病歷號(hào)。先依照數(shù)據(jù)庫表ghb建立掛號(hào)系統(tǒng)的數(shù)據(jù)窗,然后建立掛號(hào)窗口,并使用該數(shù)據(jù)窗。掛號(hào)病人要進(jìn)入醫(yī)院門診就診的第一步確實(shí)是進(jìn)行掛號(hào),只有進(jìn)行掛號(hào)后才能獲得病歷號(hào),得到其他服務(wù)。掛號(hào)界面如圖7所示:圖7掛號(hào)系統(tǒng)界面要緊實(shí)現(xiàn)功能有自動(dòng)分配病歷號(hào),錄入員無法修改。單擊“保存”按鈕的時(shí)候,如圖8所示:圖8掛號(hào)保存界面“保存”按鈕中的代碼最要緊的通過設(shè)置過濾條件來使數(shù)據(jù)窗口只能顯示當(dāng)前一條記錄。本系統(tǒng)中,需要處理的數(shù)據(jù)繁多,假如僅是靠一般控件來進(jìn)行輸入、查詢和維護(hù)等操作,只能依靠純粹的手寫代碼來進(jìn)行與數(shù)據(jù)庫數(shù)據(jù)之間的交互,將會(huì)帶來極大的不便。為此,采納數(shù)據(jù)窗口來進(jìn)行對(duì)數(shù)據(jù)的處理。通過數(shù)據(jù)窗口,能夠?qū)?shù)據(jù)庫進(jìn)行操作,不但能夠?qū)γ總€(gè)數(shù)據(jù)庫的表進(jìn)行檢索、查詢、插入、刪除和更新,而且還能夠?yàn)閿?shù)據(jù)指定輸入格式、輸出格式和顯示風(fēng)格等。圖7中左邊顯示數(shù)據(jù)的部分既為Grid風(fēng)格的數(shù)據(jù)窗口。本系統(tǒng)中還用到Group風(fēng)格的來制作報(bào)表,將在圖9出現(xiàn)。圖9掛號(hào)打印界面如上圖所示,在單擊了圖7圖中的“打印”之后,系統(tǒng)會(huì)自動(dòng)按照程序中的代碼的要求將自動(dòng)流水號(hào)傳遞到報(bào)表窗口,其中的“預(yù)付款(掛號(hào))單據(jù)”所在的數(shù)據(jù)窗口即為Group窗口應(yīng)用于數(shù)據(jù)報(bào)表的典型。在掛號(hào)過程中,除了會(huì)為病人的分配此次的自動(dòng)流水號(hào)之外,也會(huì)要為病人分配一個(gè)病歷號(hào),由年份(4位)+序列號(hào)(4位)構(gòu)成。每到新的一年,序列號(hào)差不多上從0001開始;假如不是在新的一年,則序列號(hào)是差不多在醫(yī)院就診的病人的人數(shù)加上1構(gòu)成。為此,每次分配病歷號(hào)時(shí),從數(shù)據(jù)庫中掛號(hào)表中提取最大的病歷號(hào),將其中的年份與當(dāng)前計(jì)算機(jī)上的年份相比較,假如相等,則將后4位的序列號(hào)加1,假如是新的一年則直接讓序列號(hào)位0001。具體實(shí)現(xiàn)是在窗口中定義,代碼如下://分配病歷號(hào)stringa,b,d,c,nSELECTmax(ghb.blh)into:aFROMghb;b=left(a,4)d=string(year(today()))c=right(a,4)ifb>dthen messagebox('出錯(cuò)','當(dāng)前系統(tǒng)時(shí)刻有誤,請(qǐng)先調(diào)整系統(tǒng)時(shí)刻',stopsign!,OK!)else ifb=dthen c=string(integer(c)+1) n=fill('0',4-len(c)) c=n+c else c='0001' endif a=d+c blh1=aendif分配病人自動(dòng)流水號(hào),病歷號(hào)的同時(shí),也是要同時(shí)在病人差不多信息表當(dāng)中插入信息,首先也是先為表的主碼“就診號(hào)”分配號(hào)碼。采納自定義的函數(shù)jzh():stringa,b,c,d,e,f,g,h,iSELECTmax(jzid)INTO:aFROMghdj;b=string(year(today()))//當(dāng)前系統(tǒng)日期中年份的后兩位c=string(month(today()))//當(dāng)前系統(tǒng)日期中的月份c=fill('0',2-len(c))+cd=string(Day(today())) //當(dāng)前系統(tǒng)日期中的日期d=fill('0',2-len(d))+de=left(a,8) //表中最大ID的前八位f=right(a,6) //表中最大ID的后六位,表示序列號(hào)g=right(e,4) h=right(e,2) //表中最大ID的七、八位,表示日期g=left(g,2) //表中最大ID的五、六位,表示月份e=left(e,4) //表中最大ID的前四位,表示年份ifb<ethen messagebox("出錯(cuò)","當(dāng)前系統(tǒng)時(shí)刻有誤,請(qǐng)先調(diào)整系統(tǒng)時(shí)刻") returnelseifb>ethen i=b+c+d+'000001'else ifc<gthen messagebox("出錯(cuò)","當(dāng)前系統(tǒng)時(shí)刻有誤,請(qǐng)先調(diào)整系統(tǒng)時(shí)刻") return elseifc>gthen i=b+c+d+'000001' else ifd<hthen messagebox("出錯(cuò)","當(dāng)前系統(tǒng)時(shí)刻有誤,請(qǐng)先調(diào)整系統(tǒng)時(shí)刻") return elseifd>hthen i=b+c+d+'000001' elsef=string(long(f)+1) i=b+c+d+fill('0',6-len(f))+f endif endifendifst_11.text=i就診治理模塊病人在進(jìn)入所掛號(hào)的科室進(jìn)行就診入口的界面如圖10所示。圖10就診入口界面在該界面中兩個(gè)按鈕“簡明信息填寫”和“就診”按鈕提供了強(qiáng)大的病人就診信息的錄入的功能,方便日后大夫的對(duì)病人病史的掌握,日后的臨床科學(xué)研究以及病人對(duì)自己病史的了解。在界面中當(dāng)輸入病人ID(blh),之后按下“簡明信息填寫”按鈕就進(jìn)入病人差不多信息得錄入界面如圖11所示。圖11病人差不多信息錄入界面該界面中使用了創(chuàng)建好的數(shù)據(jù)窗d_jbxx,就診號(hào)和病歷號(hào)是通過圖10界面的“簡明信息填寫”按鈕中的相關(guān)代碼實(shí)現(xiàn)(要緊是利用全局變量來傳遞值):::g_blh=trim(sle_1.text)jzh()::g_jzid=trim(st_2.text)opensheet(w_jbxx,w_zhujiemian,8,original!)同理,在圖10中如按下“就診”按鈕,在進(jìn)入如圖12所示的界面,病人ID號(hào)也將被傳遞。界面中能夠通過“保存”、“新增”等系列按鈕完成對(duì)病人此次就診的記錄工作,同時(shí)大夫也能夠通過“申請(qǐng)”按鈕對(duì)需要進(jìn)行進(jìn)一步詳細(xì)檢查的病人提出檢查申請(qǐng),另外能夠在“處方計(jì)價(jià)”當(dāng)中對(duì)病人的藥方進(jìn)行計(jì)價(jià)。在大夫?qū)Σ∪顺鼍卟v處方的同時(shí)能夠隨時(shí)查閱“病歷處方模板”,以及能夠通過“查看報(bào)告”查看病人的既往檢查化驗(yàn)。圖12就診界面上述的該功能模塊中的相關(guān)功能差不多上“大夫”的權(quán)限范圍,以下將的檢查化驗(yàn)的報(bào)告界面分不屬于“放射員”和“化驗(yàn)員”的職限。圖13病人檢查結(jié)果錄入界面在那個(gè)界面中最要緊的確實(shí)是“增加”、“退出”幾個(gè)按鈕中的相關(guān)代碼完成了對(duì)數(shù)據(jù)的錄入保存://推斷窗體記錄是否需要保存intMCountintupdateornotmcount=dw_hyjc_jcbg.modifiedcount()ifmcount>0then updateornot=messagebox("保存修改","您修改了數(shù)據(jù)窗口中的數(shù)據(jù),現(xiàn)在是否保存?",Question!,YesNoCancel!) ifupdateornot=1then ifupdate(dw_hyjc_jcbg,true,false)=1then dw_hyjc_jcbg.resetupdate() commit; else rollback; messagebox("錯(cuò)誤!!!","數(shù)據(jù)保存失敗") return endifelseifupdateornot=2then rollback; elseifupdateornot=3then return;endifendif模板治理模塊在模板治理模塊設(shè)計(jì)是為了大夫能夠完整的定義主訴病歷處方模板,能夠分不定義主訴、病歷、處方的模板以及在必要的時(shí)候進(jìn)行模板查詢。此模塊將更加方便大夫平常的臨床診斷,為臨床科研提供依據(jù)。首先建立數(shù)據(jù)窗選擇數(shù)據(jù)庫表blcfb中的字段mbh,bzmc,bznr,cfnr,zsnr,ygh。在窗口中運(yùn)用該數(shù)據(jù)窗,通過該數(shù)據(jù)窗可將數(shù)據(jù)保存到數(shù)據(jù)表中。以下的錄入模板設(shè)計(jì)類似此病歷處方模板錄入模板如圖14。圖14完整模板錄入界面在前面提到的模板查詢界面如圖15所示:圖15病歷主訴查詢模板當(dāng)大夫輸入病癥名稱之后,按下“確定”鍵就能夠在數(shù)據(jù)窗口中顯示相似病癥的記錄,假如相似病癥是多條記錄就能夠通過“第一條”、“上一條”、“下一條”、“最后一條”進(jìn)行查詢選擇,代碼如下:⑴“第一條”dw_1.scrolltorow(1)st_4.text="1"⑵“上一條”integerrow_currentrow_current=dw_1.scrollpriorrow()st_4.text=string(row_current)⑶“下一條”integerrow_currentrow_current=dw_1.scrollnextrow()st_4.text=string(row_current)⑷“最后一條”introwrow=dw_1.rowcount()dw_1.scrolltorow(row)st_4.text=string(row)數(shù)據(jù)治理模塊在醫(yī)院門診龐大的日常治理工作中,不可缺少的是對(duì)后臺(tái)數(shù)據(jù)庫中的數(shù)據(jù)進(jìn)行治理,在該功能模塊中就提供了對(duì)數(shù)據(jù)的統(tǒng)計(jì),查詢。⑴對(duì)掛號(hào)人數(shù)的分類統(tǒng)計(jì)(示例如圖16)在主界面中點(diǎn)擊“數(shù)據(jù)治理”下的“掛號(hào)人數(shù)統(tǒng)計(jì)”,則通過如下代碼進(jìn)入統(tǒng)計(jì)方式選擇界面:opensheet(w_ghtongjilb,w_zhujiemian,8,original!)依照不同選擇然后推斷打開何種統(tǒng)計(jì)圖,如圖16所示圖16掛號(hào)科室人數(shù)統(tǒng)計(jì)界面是掛號(hào)人數(shù)按照科室統(tǒng)計(jì)的餅狀圖。該類型統(tǒng)計(jì)先創(chuàng)建一個(gè)依照數(shù)據(jù)表ghdj中的jzid和kb字段來Graph類型的數(shù)據(jù)窗,通過對(duì)kb字段分類然后通過count(jzidforgraph)然后在創(chuàng)建的統(tǒng)計(jì)窗口中使用該數(shù)據(jù)窗來實(shí)現(xiàn)。⑵病人差不多信息查詢?cè)O(shè)計(jì)能夠綜合條件的信息查詢,提高可供選擇的條件,大夫能夠通過組合條件對(duì)所需要的病人差不多信息以及簡要病史進(jìn)行查詢,如圖17所示。圖17病人差不多信息查詢窗口⑶預(yù)付款查詢圖18查詢剩余預(yù)付款界面擁有查詢預(yù)付款權(quán)限的職員進(jìn)入該界面之后,只需要輸入病人的病歷號(hào),點(diǎn)擊“確定”按鈕(該按鈕代碼如下):deca,b,cstringdSELECTblhinto:dFROMghdjWHEREblh=:sle_1.text;if::sqlca.SQLCode=0then SELECTcount(*) INTO:cROMghbWHEREblh=:sle_1.text; ifc>0then SELECTsum(je)INTO:aFROMghbWHEREblh=:sle_1.text; else a=0 messagebox('提示',"病人尚未交付預(yù)付金,請(qǐng)先補(bǔ)交預(yù)付金") return endif SELECTcount(*)INTO:cFROMfybWHEREblh=:sle_1.text; ifc>0then SELECTsum(ypkb.jg*fyb.sl)INTO:bFROMypkb,fyb WHEREfyb.blh=:sle_1.textandfyb.xmnl=ypkb.ypbh; a=a-b endif ifa>=50then d='目前預(yù)付金額還剩'+string(a)+'元' messagebox('剩余金額',d) elseifa>=0then d='目前預(yù)付金額僅剩'+string(a)+'元,請(qǐng)盡快補(bǔ)交預(yù)付金' messagebox('剩余金額',d) else d='目前預(yù)付金額透支'+string(Abs(a))+'元,請(qǐng)盡快補(bǔ)交預(yù)付金' messagebox('剩余金額',d) endif sle_1.setfocus()else messagebox("提示","病歷號(hào)輸入有誤,請(qǐng)檢查后重新輸入")endif報(bào)表模塊由于前面的個(gè)功能模塊中都對(duì)病人的就診各時(shí)期的結(jié)果進(jìn)行查詢,因此在設(shè)計(jì)報(bào)表功能模塊時(shí)要緊考慮對(duì)病人的預(yù)付款項(xiàng)以及病人的費(fèi)用進(jìn)行統(tǒng)計(jì)并呈報(bào)表。首先創(chuàng)建一個(gè)祖先窗口w_preview如圖19所示,它是報(bào)表生成的通用窗口,具有預(yù)覽、放大縮小、打印、保存等功能,能夠用于各個(gè)報(bào)表模塊窗口的繼承。圖19報(bào)表祖先窗口病人預(yù)付報(bào)表窗口是w_preview祖先窗口的繼承窗口,具有w_preview窗口的功能,界面如圖20所示。病人預(yù)付報(bào)表窗口用于生成病人的費(fèi)用憑單,既能夠用來生成病人的所有費(fèi)預(yù)付的款項(xiàng)憑單,也能夠生成其中任何一次預(yù)付憑單。其與w_preview祖先窗口相比,多了一個(gè)顯示功能,能夠通過病歷號(hào)或自動(dòng)流水號(hào)來查詢符合條件的記錄,并顯示在數(shù)據(jù)窗口中。圖20病人預(yù)付款報(bào)表界面此窗口所使用的數(shù)據(jù)窗口采納的是Group分組顯示樣式的,這種顯示風(fēng)格的特點(diǎn)是能夠檢索到的數(shù)據(jù)按某一列分組顯示,并同意為每一組指定一些計(jì)算。本窗口確實(shí)是按自動(dòng)流水號(hào)來分組,分不對(duì)每一個(gè)自動(dòng)流水號(hào)中的金額和整張預(yù)付憑單的金額進(jìn)行統(tǒng)計(jì)。能夠做到清晰明了,便于病人查閱。病人費(fèi)用報(bào)表與預(yù)付憑單報(bào)表風(fēng)格模式上相同,差不多上由w_preview繼承而來。病人費(fèi)用報(bào)表既能夠依照病歷號(hào)生成一個(gè)病人按照費(fèi)用憑單號(hào)來分組的所有費(fèi)用的單據(jù),又能夠依照費(fèi)用憑單號(hào)生成其中一次費(fèi)用的單據(jù)。關(guān)鍵功能點(diǎn)的測(cè)試本章節(jié)介紹該小型醫(yī)院信息治理系統(tǒng)的要緊功能點(diǎn)的測(cè)試,包括:登錄模塊、就診入口模塊、費(fèi)用報(bào)表模塊。登錄模塊測(cè)試預(yù)期結(jié)果:當(dāng)正確輸入與數(shù)據(jù)庫表ygb中數(shù)據(jù)一致的職員名,ID及密碼時(shí)都能登錄系統(tǒng)。當(dāng)輸入的職員ID或密碼與職員名不匹配時(shí)則分不提示何種輸入錯(cuò)誤。依照本系統(tǒng)的健壯性要求對(duì)此進(jìn)行了8次測(cè)試,下面依照測(cè)試的分類列舉了3次測(cè)試結(jié)果。當(dāng)選擇職員名“陳沖”后輸入正確的職員號(hào)“04002”和密碼“cc”登錄進(jìn)該系統(tǒng)可執(zhí)行與他權(quán)限內(nèi)的操作。當(dāng)選擇職員名“陳沖”后輸入錯(cuò)誤的職員號(hào)“04001”和正確密碼“cc”與該出現(xiàn)如下圖21所示的提示框。圖21登錄功能測(cè)試一當(dāng)選擇職員名“陳沖”后輸入正確的職員號(hào)“04002”和錯(cuò)誤密碼“cd”與該出現(xiàn)如下圖22所示的提示框。圖22登錄功能測(cè)試二分析:經(jīng)8次不同類型及各類型的不同種輸入的結(jié)果都與預(yù)期結(jié)果一樣,得出結(jié)論,此功能差不多達(dá)到系統(tǒng)預(yù)期要求。用戶密碼修改功能點(diǎn)測(cè)試預(yù)期結(jié)果:當(dāng)進(jìn)入修改密碼界面時(shí)依照所輸入的正確原密碼與數(shù)據(jù)庫表ygb中pwd字段數(shù)據(jù)一致,且輸入的新密碼和確認(rèn)密碼相同時(shí),則可成功修改密碼。當(dāng)輸入原密碼錯(cuò)誤時(shí)則給出相應(yīng)提示。當(dāng)新密碼與確
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2024石材行業(yè)石材環(huán)保認(rèn)證代理服務(wù)合同3篇
- 2025年粵教滬科版四年級(jí)數(shù)學(xué)下冊(cè)階段測(cè)試試卷含答案
- 2025年度離婚雙方關(guān)于孩子教育問題協(xié)議3篇
- 2025年人教B版九年級(jí)科學(xué)上冊(cè)月考試卷
- 2024藝術(shù)品拍攝及版權(quán)轉(zhuǎn)讓合同
- 2025年魯教版三年級(jí)語文下冊(cè)月考試卷含答案
- 2025年魯教版七年級(jí)科學(xué)上冊(cè)階段測(cè)試試卷
- 2025年教科新版七年級(jí)科學(xué)下冊(cè)月考試卷
- 2025年人教新課標(biāo)一年級(jí)數(shù)學(xué)上冊(cè)月考試卷
- 2025年人教A版七年級(jí)化學(xué)上冊(cè)月考試卷
- 2020年高級(jí)統(tǒng)計(jì)實(shí)務(wù)與案例分析真題及答案
- 新型農(nóng)村集體經(jīng)濟(jì)研究綜述
- 人教版數(shù)學(xué)八年級(jí)上冊(cè)第十一章 三角形 作業(yè)設(shè)計(jì) 教案(含答案)
- 管理人履職工作報(bào)告
- 學(xué)校財(cái)務(wù)整改報(bào)告范文(合集5篇)
- 產(chǎn)品供貨質(zhì)量保障措施
- 宇電溫控器ai 500 501用戶手冊(cè)s 6中文說明書
- 部編版五年級(jí)語文下冊(cè)第四單元整體教學(xué)設(shè)計(jì)
- 股權(quán)激勵(lì)外文文獻(xiàn)
- 【事業(yè)單位考試】2023年04月外交學(xué)院度第二次公開招聘人員沖刺題
- 課外文言文閱讀100篇:經(jīng)典古文名篇100
評(píng)論
0/150
提交評(píng)論