BSHIS2.2詳細(xì)設(shè)計(jì)說明書
(門診收費(fèi)管理系統(tǒng))
一. 概述
門診系統(tǒng)提供給用戶各種選擇以滿足用戶的各種要求,充分體現(xiàn)了正確性,靈活性及易修 改的特性。
該門診系統(tǒng)可支持多個(gè)門診系統(tǒng)(如門診,急診等),由MS_MZLB表描述
MS_MZLB包括兩個(gè)字段MZLB,MZMC,門診類別不同表示是不同的門診系統(tǒng), 門診名稱為相應(yīng)的門診系統(tǒng)的名稱(如門診,急診等),在一般的模塊中不同門診類別的門診的各項(xiàng)數(shù)量可分開查詢,使用和統(tǒng)計(jì)。
門診收費(fèi)系統(tǒng)主要功能有:
建立門診病人檔案
掛號(hào)收費(fèi)(包括預(yù)約掛號(hào))
退號(hào)
轉(zhuǎn)科
掛號(hào)員掛號(hào)日?qǐng)?bào)表。
劃價(jià)收費(fèi)
發(fā)票作廢
退費(fèi)處理
統(tǒng)計(jì)個(gè)人門診收費(fèi)日?qǐng)?bào)表
門診收費(fèi)匯總?cè)請(qǐng)?bào)。
查詢:可按掛號(hào)號(hào)表、掛號(hào)分類和收款發(fā)票檢索等多種方式進(jìn)行掛號(hào)與發(fā)票查詢。
報(bào)表:提供多種方式的匯總表、統(tǒng)計(jì)表和核算表。
系統(tǒng):提供用戶及權(quán)限設(shè)置、門診號(hào)設(shè)置和初始化等功能。
維護(hù):對(duì)病人性質(zhì)、掛號(hào)科室、醫(yī)師排班、報(bào)表格式等進(jìn)行維護(hù)管理。
二. 模塊設(shè)計(jì)說明書
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 門診病人檔案管理 編號(hào) 5.11
功
能
描
述 檔案管理主界面
初始時(shí)未列出病人的檔案信息,操作員可通過門診號(hào)碼或病人姓名調(diào)出相關(guān)病人信息,列出的病人信息包括門診號(hào)碼,姓名,性別,性質(zhì),醫(yī)療證號(hào),出生年月 ,婚姻,民族,職業(yè) 當(dāng)操作員通過門診號(hào)碼調(diào)出病人信息時(shí),病人檔案列表按門診號(hào)排序,當(dāng)操作員通過病人姓名調(diào)出病人信息時(shí),病人檔案列表按病人姓名排序,并且操作員還可點(diǎn)擊某個(gè)字段名處,已使病人檔案列表按該字段排序
該模塊還可新建,修改病人檔案,當(dāng)系統(tǒng)參數(shù)中選擇了打印病歷,則在該模塊中還可打印病歷,否則打印病歷按鈕變灰不可使用
新建或修改病人檔案
由系統(tǒng)參數(shù)輸入病人檔案格式?jīng)Q定新建或修改病人檔案的格式,共有三種格式簡(jiǎn)單格式,戶口地址格式,自定義格式,其中簡(jiǎn)單格式包括門診號(hào),病人性質(zhì),醫(yī)療證號(hào),病人姓名,性別,年齡,戶口地址格式比自定義格式多一項(xiàng)戶口地址,自定義格式包括病人檔案的所有項(xiàng),在客戶化程序時(shí),由客戶化人員根據(jù)用戶需求通過修改程序自由設(shè)定輸入項(xiàng)
三、打印病歷
根據(jù)系統(tǒng)參數(shù)中設(shè)置的病歷打印使用打印機(jī)名,往該打印機(jī)上打印病歷
程
序
描
述 一、檔案管理主界面
在dw_1中顯示病人檔案列表,使用的datawindow為d_dagl_list (檔案管理列表)d_dagl_list中內(nèi)容取自表MS_BRDA(病人檔案),并且不分門診類別,即不管哪個(gè)收費(fèi)處錄入的病人檔案都能顯示
二、 新建或修改病人檔案
簡(jiǎn)單格式使用的datawindow為d_dagl_simple,
戶口地址格式使用的datawindow為d_dagl_hkdz,
自定義格式使用的datawindow為d_dagl_custom
1、 門診號(hào)碼,新建病人檔案時(shí)通過員工票據(jù)管類u_ygpjgl來得到新的門診號(hào)碼,修改病人檔案時(shí),門診號(hào)碼由外部作為參數(shù)傳入
2、 病人性質(zhì),病人性質(zhì)表中mzsy(門診使用)=1的非上級(jí)性質(zhì)(無下級(jí)性質(zhì)的性質(zhì))
3、 病人性別,1-男 2-女
4、 病人年齡,有兩種輸入 第一種為輸入數(shù)字,表示年齡,第二種為輸入出生年月
系統(tǒng)通過uo_brxx來實(shí)現(xiàn)年齡和出生年月的轉(zhuǎn)化,在MS_BRDA表中保存的為出生年月
5、輸入完畢后保存入MS_BRDA中
三、打印病歷
根據(jù)系統(tǒng)參數(shù)中設(shè)置的病歷打印使用打印機(jī)名,往該打印機(jī)上打印病歷
該按鈕將數(shù)據(jù)準(zhǔn)備到數(shù)組ls_mzxx中,并傳遞給gf_bldy,由gf_bldy()實(shí)現(xiàn)病歷打印,gf_bldy由客戶化人員維護(hù)
數(shù)據(jù)窗口 D_dagl_list,dd_brxz_mz,d_hyzk_dm,d_mzdm_dm,d_zydm_dm
引用表 MS_BRDA、GY_BRXZ、GY_DMZD、MS_CYDW、MS_CYDZ
操作表 MS_BRDA
編制 梅芝雨、鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 掛號(hào)處理 編號(hào) 5.12
功
能
描
述 1、 初始化員工票據(jù)管理, 自動(dòng)產(chǎn)生門診號(hào), 取就診號(hào)碼, 判斷是否可進(jìn)行預(yù)約
2、 預(yù)約掛號(hào)、調(diào)入預(yù)約
3、 掛號(hào):通過輸入門診號(hào)碼或就診號(hào)碼調(diào)出病人信息(可在此調(diào)用病人檔案輸入),輸入掛號(hào)科室的代碼,選擇某一科室,選擇是否收病歷費(fèi),然后,根據(jù)掛號(hào)費(fèi)、診療費(fèi)、病人自付比例,進(jìn)行收費(fèi)。
4、 選擇代碼輸入方式:拼音、五筆、角型、其它
可根據(jù)就診號(hào)碼進(jìn)行退號(hào)、轉(zhuǎn)科
程
序
描
述 一、掛號(hào)初始準(zhǔn)備
1、 u_ygpjgl.set_czgh(base_info.userid) 初始化員工票據(jù)管理
2、 gf_zdcsmzh() 自動(dòng)產(chǎn)生門診號(hào)
3、 判斷是否可進(jìn)行掛號(hào)預(yù)約
4、 取就診號(hào)碼:wf_getjzhm()
5、 根據(jù)時(shí)間判斷早中班ii_zblb
6、 根據(jù)日期清已掛人數(shù)(YGRS):更新MS_GHKS表;將過期的預(yù)約掛號(hào)置標(biāo)志2:MS_YYGH表,GHBZ = 2
7、 取掛號(hào)科室信息dw_ghks.retrieve(gi_mz_code,ldt_begin,ldt_end)
8、 取專家醫(yī)生信息dw_ghys.retrieve(ii_zblb,ldt_begin,ldt_end)
9、 取每個(gè)科室的預(yù)約掛號(hào)人數(shù)(從MS_YYGH表中)
10、 準(zhǔn)備病人信息和掛號(hào)信息,等待輸入dw_brxx 、dw_ghxx
11、 取打印病歷標(biāo)志,病歷費(fèi)記帳標(biāo)志、取病歷單價(jià)、取掛號(hào)費(fèi)項(xiàng)目,診療費(fèi)項(xiàng)目,專家費(fèi)項(xiàng)目、取收費(fèi)精度和收費(fèi)金額格式
二、掛號(hào)操作
1、預(yù)約:從MS_YYGH表中取出預(yù)約信息,取掛號(hào)費(fèi)及診療費(fèi)(取自負(fù)比例wf_get_percent()),再調(diào)用繳款處理wf_jkcl()
2、 調(diào)入預(yù)約:open(w_xzyygh)選擇預(yù)約掛號(hào)窗口,再從MS_YYGH表中取該次調(diào)入預(yù)約掛號(hào)的信息,通過MS_GHKS、MS_YSPB表判斷所選擇的預(yù)約掛號(hào)科室及醫(yī)生是否今天可以掛號(hào),取掛號(hào)費(fèi)及診療費(fèi)(取自負(fù)比例wf_get_percent()),取掛號(hào)病歷費(fèi),計(jì)算專家費(fèi)用、自負(fù)專家費(fèi),再調(diào)用繳款處理wf_jkcl()
3、 新建檔案:d_dagl_custom
判斷新產(chǎn)生的門診號(hào)是否已被使用,是否需要輸入證號(hào),判斷信息輸入完整性,然后新病人產(chǎn)生新的ID號(hào)并更新信息。
4、 掛號(hào):
語音發(fā)聲控制gf_talk(1,0)
輸入門診號(hào):回車判斷,若未輸入門診號(hào)打開新建檔案窗口open(w_ghcl_new)并返回門診號(hào)碼;若輸入了門診號(hào),判斷該門診號(hào)是否存在,判斷病人是否為老病人(是否收病歷費(fèi)),判斷該病人是否有帳戶,有則gf_readaccount()讀入病人帳戶
選擇掛號(hào)科室:在dw_ghxx中找到相應(yīng)行, 判斷是否超過科室掛號(hào)限額(dw_ghks的ygrs),取掛號(hào)費(fèi)及診療費(fèi)(dw_ghks的ghf),wf_get_percent
取自負(fù)比例,取(dw_ghks的zlf)診療費(fèi),得到自負(fù)掛號(hào)費(fèi)和自負(fù)診療費(fèi),取病歷費(fèi),得自負(fù)病歷費(fèi)。若預(yù)約掛號(hào)狀態(tài),則wf_yyqr()預(yù)約確認(rèn),若為掛號(hào)狀態(tài),則wf_jkcl()繳款處理。
5、 退號(hào)處理:先判斷MZLB表看是否為本門診部的掛號(hào),若是,則更新MS_GHMX SET THBZ=1,INSERT INTO MS_THMX(SBXH,CZGH,MZLB),UPDATE MS_YSPB SET YGRS=YGRS-1,更新 MS_BRZH的LJFY和ZHYE
6、 轉(zhuǎn)科處理:先判斷MZLB表看是否為本門診部的掛號(hào),費(fèi)用與轉(zhuǎn)科前是否一致,若是,則UPDATE MS_GHKS,UPDATE MS_GHMX
數(shù)據(jù)窗口 d_gh_ghks、d_gh_ghys、d_ghcl_brxx、d_gh_ghrb_brxz
d_gh_thmx、d_gh_thcl等
引用表 MS_YYGH, MS_GHKS、MS_YSPB、MS_BRDA 、MS_ZHLB、MS_BRZH、MS_YGPJ
操作表 MS_BRDA、MS_SZMX、MS_GHMX、MS_YYGH、MS_THMX
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 掛號(hào)日?qǐng)?bào) 編號(hào) 5.13
功
能
描
述 操作員每天操作結(jié)束進(jìn)行掛號(hào)統(tǒng)計(jì),產(chǎn)生掛號(hào)日?qǐng)?bào),進(jìn)行結(jié)帳處理(可結(jié)帳多次)。結(jié)帳后,可進(jìn)行日?qǐng)?bào)查詢(包括明細(xì)查詢:掛號(hào)明細(xì)、退號(hào)明細(xì))。
程
序
描
述 某操作員掛號(hào)日?qǐng)?bào):統(tǒng)計(jì)——"d_gh_ghrb_brxz"(MS_BRDA,MS_GHMX表中的GHCS、GHJE、ZFJE、BLJE、ZJJE、BRXZ字段)檢索出各性質(zhì)人數(shù)和金額,在日?qǐng)?bào)中減去作廢數(shù)據(jù)( MS_GHMX.SBXH 在 MS_THMX中MS_THMX.JZRQ is null)寫就診號(hào)碼,wf_cacl_cfhm(),在報(bào)表中寫退號(hào)號(hào)碼,寫大寫的收款總計(jì)gf_dxzh(收費(fèi)總計(jì)),寫現(xiàn)金合計(jì)(MS_GHMX)等。結(jié)帳——UPDATE MS_GHMX SET JZRQ,UPDATE MS_THMX SET JZRQ。查詢——SELECT distinct MS_GHMX.JZRQ,打開w_gh_rbxz,選擇某一次日?qǐng)?bào)。由d_gh_ghrb_brxz_history檢索出數(shù)據(jù),在日?qǐng)?bào)中減去作廢數(shù)據(jù),寫就診號(hào)碼、退號(hào)號(hào)碼,其他應(yīng)收款等。掛號(hào)明細(xì)——open(w_gh_ghmx),“d_gh_ghmx”。退號(hào)明細(xì)——open(w_gh_ghmx),“d_gh_thmx”。
數(shù)據(jù)窗口 d_gh_ghrb_brxz、d_gh_ghrb_brxz_history、d_gh_ghmx、d_gh_thmx等。
引用表 MS_GHMX,MS_THMX、MS_GHKS、MS_BRDA等
操作表 MS_GHMX、MS_THMX
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 收費(fèi)結(jié)算 編號(hào) 5.21
功
能
描
述 一、 收費(fèi)準(zhǔn)備 : 取初始參數(shù),初始化界面,初始化調(diào)入處方單和醫(yī)技單的選擇處方窗口 ,初始化收費(fèi)環(huán)境,用于開始一張新的收費(fèi)發(fā)票
二、 收費(fèi)操作
1、 取發(fā)票號(hào)碼,輸入掛號(hào)產(chǎn)生的門診號(hào)(或IC卡號(hào)),調(diào)出病人信息及帳戶信息進(jìn)行收費(fèi)。如果不輸門診號(hào),則錄入性質(zhì)和姓名進(jìn)行劃價(jià)收費(fèi).
2、 如果該ID號(hào)病人在處方庫及醫(yī)技庫中有自己的未收費(fèi)的單據(jù)(醫(yī)生站或藥房開的單據(jù)),則調(diào)入未收費(fèi)單據(jù),計(jì)算出收費(fèi)明細(xì)金額及總金額.
3、 如果無醫(yī)生站開的單據(jù)則根據(jù)單據(jù)優(yōu)先標(biāo)志則產(chǎn)生第一張單據(jù)
4、 根據(jù)用戶的按鍵情況執(zhí)行相應(yīng)的功能。F2:增加檢查單 F3:增加西藥方 F4:增加中藥方 F5:增加草藥方F6/F7:查看上下單據(jù).錄入項(xiàng)目代碼可根據(jù)參數(shù)設(shè)置定為固定模式及光標(biāo)跟隨兩種模式 F8:根據(jù)處方號(hào)碼或特檢號(hào)碼調(diào)入處方單或醫(yī)技單 F12:取消當(dāng)前錄入的信息,從新?lián)Q病人收費(fèi)
5、 F8實(shí)現(xiàn)發(fā)票復(fù)制功能(主要針對(duì)發(fā)票作廢后重打,完全復(fù)制).
6、 F9對(duì)當(dāng)前的單據(jù)進(jìn)行結(jié)算,顯示應(yīng)收合計(jì),錄入交款金額,提示找回金額,收取現(xiàn)金或支票,如果繳款方式為帳戶,則調(diào)用外掛的寫帳戶的函數(shù),保存所有單據(jù),打印發(fā)票后,進(jìn)行新病人的收費(fèi)。如果不錄入繳款金額,則表示保存當(dāng)前單據(jù),打印發(fā)票,累計(jì)總計(jì)費(fèi)用,繼續(xù)該病人其他單據(jù)的劃價(jià)收費(fèi).對(duì)發(fā)票號(hào)碼進(jìn)行遞加。
三、 查詢
可根據(jù)發(fā)票號(hào)碼、病人性質(zhì)、收費(fèi)日期、單位名稱、病人證號(hào)、門診號(hào)碼、病人姓名、收款員條件檢索出發(fā)票信息。
程
序
描
述 一、收費(fèi)準(zhǔn)備
用Wf_initpara 初始參數(shù)
1、 取輸入碼方式的名稱gl_inputmode
2、 取西藥費(fèi)、中藥費(fèi)、草藥費(fèi)序號(hào)
3、 取參數(shù)“是否允許不掛號(hào)開處方0.不允許 1.允許”、“優(yōu)先標(biāo)志1.檢查單優(yōu)先2.處方優(yōu)先”、“代碼錄入方式1.固定模式2.光標(biāo)跟隨”、“處方號(hào)碼默認(rèn)模式1.空 2.取門診號(hào) 3.取發(fā)票號(hào)”、“最大收費(fèi)項(xiàng)目數(shù)”
4、 取收費(fèi)精度和收費(fèi)金額格式
5、 取各標(biāo)志:修改當(dāng)前發(fā)票標(biāo)志、藥品套餐使用標(biāo)志、費(fèi)用套餐使用標(biāo)志
6、 取藥品過濾方式 0.不過濾 1.過濾庫存大于0的藥品
7、 初始化藥品輸入:u_sele_yp.init(藥品套餐使用標(biāo)志, 西藥費(fèi)、中藥費(fèi)、草藥費(fèi)序號(hào),藥品過濾方式,"ue_cf_clicked")若某序號(hào)為0則不能使用某類藥品。
8、 初始化費(fèi)用輸入:u_sele_fy.init(1, 費(fèi)用套餐標(biāo)志,"ue_yj_clicked")
9、 取藥房庫存方式 1.取最大庫存2.取滿足所需庫存的最大庫存3.取最小庫存4.取滿足所需庫存的最小庫存
10、 初始化員工票據(jù)管理u_ygpjgl.set_czgh(base_info.userid)、 u_get_zfbl.initialize(sqlca,false)
11、 創(chuàng)建單一藥品管理對(duì)象u_ypxx和單一費(fèi)用管理對(duì)象u_fyxx
12、 初始化調(diào)入處方單和醫(yī)技單的選擇處方窗口u_select_cfsb.initialize、uo_select_yjxh.initialize
初始化收費(fèi)環(huán)境,用于開始一張新的收費(fèi)發(fā)票
wf_getmzxx(類型1.換新病人0.繼續(xù)操作原病人)
13、 清空數(shù)據(jù)窗口
14、 設(shè)置發(fā)票號(hào)碼u_ygpjgl.get_fphm()
15、 如果新病人則總費(fèi)用清空open(w_hjsf_mzxx),wf_close()
16、 寫門診信息dw_mzxx
17、 判斷病人是否有帳戶gf_checkaccount(id),若該病人有帳戶讀帳戶余額及累計(jì)費(fèi)用gf_readaccount(id)
18、 當(dāng)門診號(hào)碼有效且該病人收費(fèi)的第一張發(fā)票則調(diào)入醫(yī)生開的處方和醫(yī)技單wf_load(id)
處方優(yōu)先且非掛號(hào)病人可開處方則先新增一處方,wf_add_cf(1),否則新增一單據(jù)wf_add_yj()
a) 收費(fèi)操作
1、W_hjsf_mzxx的說明
若掛號(hào)使用,則停在輸入門診號(hào)碼處(若"收費(fèi)使用號(hào)碼類型”為就診號(hào)碼,則停在輸入就診號(hào)碼處),否則不輸入門診號(hào)碼(或就診號(hào)碼),停在輸入病人性質(zhì)處,并調(diào)出默認(rèn)的病人性質(zhì)
輸入門診號(hào)碼,當(dāng)輸入的門診號(hào)碼為空時(shí),停到輸入病人性質(zhì)處,否則調(diào)用函數(shù)wf_brxx_mzhm 設(shè)置病人信息
輸入病人性質(zhì)后,根據(jù)證號(hào)判別,將光標(biāo)停到輸入病人證號(hào)處或輸入病人姓名處輸入病人證號(hào),若未輸入病人證號(hào),則需輸入病人單位
2、發(fā)票查詢w_fpjs的說明
從d_fpcxtj的輸入中得到查詢條件,拼接SQL語句,設(shè)置d_fpcx的SQL語法,再從MS_MZXX中檢索出數(shù)據(jù)。
3、w_hjsf_main的說明
①selectsfsb:調(diào)入處方單(dw_cf02)
②selectyjxh:調(diào)入醫(yī)技單(dw_yj02)
③ue_cf_clicked: wf_fixdata_yp_1()判斷是否為套餐u_sele_yp.gettcbz(),判斷是否為最后一行,是則u_sele_yp.getypxh()并wf_set_cf02(),否則①u_sele_yp.clear_tcbz()清套餐標(biāo)志(不可輸入)
④ue_yj_clicked: wf_fixdata_fy_1()類似于wf_fixdata_yp_1()
⑤dw_cf02的keydown事件中,按數(shù)字鍵選擇藥品wf_fixdata_yp(),KeyEnter時(shí),當(dāng)藥品選擇窗口可見時(shí)wf_fixdata_yp(u_sele_yp.il_pagerow),當(dāng)不可見時(shí)調(diào)用uo_ypxx.setypxx(ll_ypxh)和uo_ypxx.setyfkc(), u_sele_yp.settype(li_type)、u_sele_yp.Reflush(ls_code)、u_sele_yp.getypxh(),判斷輸入的是否為套餐
⑥輸入醫(yī)生,若需科室核算(ifkshs=1),則必須輸入醫(yī)生
5、 關(guān)于快捷鍵的說明:
F2:增加檢查單wf_add_yj()
F3:增加西藥方wf_add_cf(1)
F4:增加中藥方wf_add_cf(2)
F5:增加草藥方wf_add_cf(3)
F8:根據(jù)處方號(hào)碼或特檢號(hào)碼調(diào)入處方單或醫(yī)技單 wf_fetch()
F9:結(jié)算開票 open(w_sh_hjsf_jscl)
F12: 取消 wf_getmzxx(1) 初始化環(huán)境變量,重新開始輸入病人
6、 輸入費(fèi)用的部分事件說明
editchanged:若為固定模式且費(fèi)用名稱窗口已打開或?yàn)楦S模式, 則會(huì)調(diào)用窗口w_sele_fy顯示費(fèi)用,keydown: fymc列:輸入數(shù)字則選擇某行,輸入回車,則返回選中行; ylsl列:輸入0,則刪除該行,并新加一行 , 調(diào)用w_calc_sfmx填收費(fèi)明細(xì)dw_sfmx,在輸入費(fèi)用名稱時(shí)默認(rèn),數(shù)量為1
程
序
描
述 7、 復(fù)制說明:w_hjsf_copy
根據(jù)輸入的發(fā)票號(hào)碼得到各信息填到w_hjsf_copy,dw_mzxx, dw_cf01, dw_cf02,dw_yj01,dw_yj02中,并寫入w_hjsf_main中
8、結(jié)算說明:
判斷收費(fèi)項(xiàng)目是否大于規(guī)定項(xiàng)數(shù)dw_sfmx.rowcount() > ii_max_sfxms
wf_save保存單據(jù)
根據(jù)精度調(diào)整dw_sfmx中的zfje和zjje
取現(xiàn)金金額、帳戶自負(fù)金額、支票金額、帳戶金額、其它應(yīng)收等
刪除dw_yj02中空行,刪除dw_yj01中無明細(xì)的行,刪除dw_cf02中空行,刪除dw_cf01中無明細(xì)的行
update dw_sfmx,dw_yj01,dw_yj02,dw_cf01,dw_cf02
累加發(fā)票號(hào)碼
wf_create_fp 打印
數(shù)據(jù)窗口 D_mzxx,d_cf01,d_cf02,d_yj01,d_yj02,d_sfmx,d_uo_ypxx_yf_kcmx
引用表 Yk_ypbm,yk_typk,yf_kcmx,yk_ypcd,gy_ylsf,gy_sfxm,gy_ygdm,gy_zfbl,gy_fyjy,gy_fybm,gy_ypjy等
操作表 Ms_mzxx,ms_sfmx,ms_cf01,ms_cf02,ms_yj01,ms_yj02,ms_ygpj
編制 鐘華 日期 2000.05.16
塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 發(fā)票作廢 編號(hào) 5.22
功
能
描
述 1.數(shù)據(jù)窗口中列出未結(jié)帳的本操作員的作廢發(fā)票
2.雙擊:調(diào)用取消作廢按鈕
3.作廢按鈕:彈出輸入框,輸入發(fā)票,顯示發(fā)票內(nèi)容框,此時(shí)可顯示發(fā)票內(nèi)容或作廢該發(fā)票
4.作廢發(fā)票時(shí)必須:未作廢該發(fā)票中項(xiàng)目未執(zhí)行該發(fā)票中處方未發(fā)藥
該發(fā)票未退費(fèi),若已退費(fèi),則只能做全退處理
5.取消作廢:顯示發(fā)票內(nèi)容框,可進(jìn)行取消處理。
程
序
描
述 1.dw_1中列出ms_zffp中jzrq為空的本操作員的發(fā)票
2.取消作廢
取消作廢描述:
判斷病人是否有帳戶gf_checkaccount(id),該病人有帳戶,則gf_readaccount(id),并寫病人帳戶gf_writeaccount(id,brzh)
ms_mzxx,ms_yj01,ms_cf01中,set ZFPB=0
刪除 MS_ZFFP的相關(guān)記錄
3. 作廢按鈕:
作廢操作描述:
若mzxx中qtje<>0,則需進(jìn)行帳戶操作
ms_mzxx,ms_yj01,ms_cf01中,set zfpb = 1
在ms_zffp中加入該發(fā)票
4.單據(jù)按鈕:打開w_djcx窗口由發(fā)票號(hào)碼檢索出發(fā)票信息
數(shù)據(jù)窗口 d_zffp,d_fpnr,d_list,d_cf02_copy,d_yj01_copy
引用表 ms_cf02,ms_yj02等
操作表 ms_mzxx,ms_cf01,ms_yj01,ms_zffp
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 退費(fèi)處理 編號(hào) 5.23
功
能
描
述 1.輸入需退費(fèi)發(fā)票號(hào)碼后在費(fèi)用窗口中顯示所有可退費(fèi)用,在藥品窗口中顯示所有可退藥品及藥房的退藥情況
2.輸入退費(fèi)數(shù)量
3.執(zhí)行退費(fèi)即結(jié)算
程
序
描
述 a) 輸入的發(fā)票號(hào)碼從MS_MZXX中取出該發(fā)票記錄,要求
該發(fā)票號(hào)未作廢 無退費(fèi)發(fā)票和該發(fā)票相關(guān)聯(lián)
尚未日結(jié),才能進(jìn)行重打作費(fèi)發(fā)票操作 未發(fā)藥,未執(zhí)行
b) 根據(jù)退費(fèi)發(fā)票號(hào)碼查原始發(fā)票號(hào)碼wf_get_first_fphm(tffphm),并根據(jù)原始發(fā)票號(hào)碼得到發(fā)票內(nèi)容wf_get_fpnr_via_fphm(fphm)
c) dw_list中列出處方單,dw_cf01、dw_cf01_save、dw_cf02、dw_cf02_save中列出處方情況,dw_yj02,dw_yj02_save,dw_yj01,dw_yj01_save中列出費(fèi)用情況,dw_sfmx, dw_sfmx_total中列出收費(fèi)情況
d) 點(diǎn)擊dw_list,調(diào)用wf_display(djlx, sbxh)切換單據(jù)
e) dw_mzxx中列出該發(fā)票抬頭情況
根據(jù)退藥情況填中dw_cf02中退藥數(shù)量(若某處方的cfgl關(guān)聯(lián)到屬于發(fā)票is_fphm 的處方(cfsb),則該處方為有關(guān)的退藥處方)
根據(jù)退藥情況填dw_yj02中退費(fèi)數(shù)量(若某醫(yī)技單的yjgl關(guān)聯(lián)到屬于發(fā)票is_fphm 的醫(yī)技單(yjxh),則該醫(yī)技單為有關(guān)的退費(fèi)單)
f) 對(duì)存儲(chǔ)準(zhǔn)備wf_save_prepare()的說明
保存數(shù)據(jù)使用的各項(xiàng)數(shù)據(jù)窗口的初始化wf_save_reset()
取原始發(fā)票的收費(fèi)明細(xì)dw_sfmx_total.retrieve(fphm)
從原始發(fā)票的收費(fèi)明細(xì)中扣除已退費(fèi)部分的費(fèi)用明細(xì),剩余部分為進(jìn)行該次退費(fèi)操作前費(fèi)用明細(xì)wf_cacl_sfmx_ytf()
拷貝使dw_sfmx,dw_sfmx_total中保存的收費(fèi)明細(xì)均為進(jìn)行該次退費(fèi)操作前費(fèi)用明細(xì)dw_sfmx_total.rowscopy()
從dw_sfmx_total中扣除該次退費(fèi)的各項(xiàng)收費(fèi)明細(xì)wf_cacl_sfmx_tf()
準(zhǔn)備dw_mzxx的數(shù)據(jù)wf_prepare_mzxx("tf")并
產(chǎn)生dw_sfmx(用于保存的datawindow) wf_save_prepare_print()
g) w_tfcl_js的說明:
根據(jù)精度調(diào)整dw_sfmx中的zfje和zjje并取現(xiàn)金、支票、帳戶和其它應(yīng)收
用wf_save保存單據(jù)
dw_cf01_save.update()、dw_cf02_save.update()、dw_yj01_save.update()
dw_yj02_save.update()、dw_mzxx.update()、dw_sfmx.update()
update MS_MZXX set THPB = 1
update MS_CF01 set ZFPB = 1(sybz = 1 and fybz = 0)
update MS_CF01 set FPHM = :ls_fphm(sybz = 1 and fybz = 3)
update MS_YJ01 set ZFPB = 1(sybz = 1)
累加發(fā)票號(hào)碼uo_ygpjgl.add_one(new fphm)
更新員工票據(jù)庫的使用號(hào)碼uo_ygpjgl. update_fphm(fphm)
更新藥房錄入的退藥單,填發(fā)票號(hào)碼
w_tfcl.wf_create_fp()生成發(fā)票信息并打印
數(shù)據(jù)窗口 d_mzxx,d_sfmx, d_ms_cf01_tf,d_ms_yj01_tf,d_ms_cf02_tf,d_ms_yj02_tf
d_uo_yj02_ms_yj02,d_uo_sfmx_ms_sfmx,d_uo_cf02_ms_cf02,d_uo_yj01_ms_yj01
d_uo_cf01_ms_cf01
引用表 Ms_cf02,ms_yj02等
操作表 Ms_mzxx,ms_sfmx,ms_cf01,ms_yj01,ms_yj02,ms_cf02
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 操作員收費(fèi)日?qǐng)?bào)表 編號(hào) 5.24
功
能
描
述 1. 根據(jù)參數(shù)設(shè)置收費(fèi)日?qǐng)?bào)模式
2. 產(chǎn)生按鈕用于產(chǎn)生當(dāng)日收款日?qǐng)?bào)
3.結(jié)帳按鈕用于保存當(dāng)日收款日?qǐng)?bào),結(jié)帳時(shí)時(shí)間為結(jié)帳日期
4.查詢按鈕用于查詢某一結(jié)帳日期的收款日?qǐng)?bào)
5.明細(xì)按鈕用于查詢和該日?qǐng)?bào)有關(guān)的收費(fèi)明細(xì)
程
序
描
述 1. 收費(fèi)日?qǐng)?bào)模式:1為open(w_skrb_sfxm)—d_skrb_fylb ;2 為open(w_skrb_brxz) —d_skrb_brxz
2. 該模塊中以結(jié)帳日期(jzrq)區(qū)分每一次結(jié)帳,無結(jié)帳日期則表示未結(jié)帳
該結(jié)帳日期用于ms_mzxx及ms_zffp兩個(gè)表中
3. 表中的各費(fèi)用項(xiàng)目及現(xiàn)金金額,支票金額,帳戶金額(即ms_mzxx中的qtje)
均為全部的某項(xiàng)金額減去相應(yīng)的作廢發(fā)票金額
4. 其它應(yīng)收款=收入合計(jì)-現(xiàn)金金額-支票金額-帳戶金額
5. 作廢發(fā)票序列為ms_zffp庫中各發(fā)票號(hào)碼
6. 退票為做過退費(fèi)處理的發(fā)票序列
7. 產(chǎn)生操作說明:
計(jì)算按費(fèi)用分類的收費(fèi)情況wf_cacl_sfxm(dw_1)
計(jì)算按病人性質(zhì)分類的收費(fèi)情況wf_cacl_brxz(dw_1)
產(chǎn)生使用發(fā)票序列wf_cacl_fpxl()
產(chǎn)生作廢發(fā)票序列,張數(shù),作廢發(fā)票總金額wf_proc_zffpxl()
產(chǎn)生退費(fèi)發(fā)票序列,張數(shù),退費(fèi)發(fā)票總金額wf_proc_tffpxl()
取今日各項(xiàng)合計(jì)金額wf_cacl_hjje()
計(jì)算按費(fèi)用類別分類的收費(fèi)情況wf_cacl_sfxm(dw_2)
計(jì)算按收費(fèi)項(xiàng)目的收費(fèi)情況wf_cacl_brxz(dw_2)
8. 查詢操作說明:open(w_rbrq)選擇某一次日?qǐng)?bào)
調(diào)用wf_cx("d_rbcx_brxz") or wf_cx("d_rbcx_sfxm")
8. 結(jié)帳操作說明:
寫匯總?cè)請(qǐng)?bào)表wf_write_hzrb(ldt_jzrq)
寫性質(zhì)明細(xì)表(MS_XZMX) wf_write_xzmx(dw_1,ldt_jzrq)
寫日?qǐng)?bào)明細(xì)表(MS_XZMX) wf_write_rbmx(dw_1,ldt_jzrq)
ms_rbmx 在該表中記錄每一費(fèi)用類別的費(fèi)用(sfxm實(shí)際為fylb
寫門診收費(fèi)表及發(fā)票作廢表中的結(jié)帳日期wf_write_jzrq(ldt_jzrq)
在ms_mzxx及ms_zffp中將該操作員的為結(jié)帳的記錄寫入結(jié)帳日期
數(shù)據(jù)窗口 d_skrb_fylb、d_skrb_brxz
引用表 Ms_sfmx等
操作表 Ms_mzxx,ms_zffp,ms_hzrb,ms_rbmx
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 門診收費(fèi)匯總?cè)請(qǐng)?bào)表 編號(hào) 5.25
功
能
描
述 1.該表為各收費(fèi)員所收費(fèi)用按費(fèi)用類別分類的表(已做過收款日?qǐng)?bào))
2.產(chǎn)生按鈕用于將未匯總的收款日?qǐng)?bào)按收款員匯總顯示
3.結(jié)帳按鈕用于作匯總,寫入?yún)R總?cè)掌?br />
查詢按鈕用于將匯總?cè)掌谠诮o定日期段的匯總?cè)請(qǐng)?bào)匯總顯示
程
序
描
述 掛號(hào)收費(fèi)匯總dw_hzrb、項(xiàng)目分類匯總dw_xmhz
A.產(chǎn)生
1. 按收款員進(jìn)行掛號(hào)匯總MS_GHMX
2. 按收款員進(jìn)行退號(hào)匯總MS_THMX
3. 填入掛號(hào)日?qǐng)?bào)信息:現(xiàn)金、帳戶、其他應(yīng)收
4. 減去退號(hào)部分
5. 計(jì)算掛號(hào)作廢和掛號(hào)退號(hào)數(shù)
6. 計(jì)算作廢發(fā)票和退費(fèi)發(fā)票數(shù)
B.查詢
根據(jù)日期檢索數(shù)據(jù),方法與產(chǎn)生相同
C.結(jié)帳
更新匯總?cè)請(qǐng)?bào)update MS_HZRB set HZRQ
更新掛號(hào)明細(xì)UPDATE MS_GHMX SET HZRQ
更新退號(hào)明細(xì)UPDATE MS_THMX SET HZRQ
更新門診信息UPDATE MS_MZXX SET HZRQ
更新作廢發(fā)票UPDATE MS_ZFFP SET HZRQ
ms_hzrb中的HZRQ為該收款日?qǐng)?bào)是否做過匯總的標(biāo)記
結(jié)帳操作即是將ms_hzrb中的HZRQ寫入?yún)R總的日期,若該日期為空,
表示未做過匯總
根據(jù)日期檢索數(shù)據(jù),方法與產(chǎn)生相同
數(shù)據(jù)窗口 d_mz_xmhz、d_mz_hzrb
引用表 Ms_sfmx等
操作表 Ms_mzxx,ms_zffp,ms_hzrb,ms_rbmx
編制 鐘華 日期 2000.05.16
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 病人性質(zhì)報(bào)表 編號(hào) 5.31
功
能
描
述 1.當(dāng)選擇的病人性質(zhì)有下級(jí)性質(zhì)時(shí),產(chǎn)生按其下級(jí)性質(zhì)歸并的報(bào)表
2.當(dāng)選擇的病人性質(zhì)無下級(jí)性質(zhì)時(shí)
當(dāng)方式為明細(xì)時(shí):產(chǎn)生該性質(zhì)病人的每次明細(xì)的報(bào)表
當(dāng)方式為匯總時(shí):產(chǎn)生該按該性質(zhì)病人匯總的報(bào)表
程
序
描
述 見5.7 病人單位性質(zhì)報(bào)表
數(shù)據(jù)窗口 d_mz_brfy_1(明細(xì))d_mz_brfy_2(匯總)
引用表 Gy_brxz,gy_fydw,ms_mzxx,ms_sfmx
操作表
編制 鐘華 日期 2000.05.17
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 病人性質(zhì)單位報(bào)表 編號(hào) 5.32
功
能
描
述 1.當(dāng)選擇的病人性質(zhì)有下級(jí)性質(zhì)且需考慮其下級(jí)性質(zhì)時(shí),產(chǎn)生按其下級(jí)性質(zhì)歸并的報(bào)表
2.當(dāng)選擇的病人性質(zhì)無下級(jí)性質(zhì)或有下級(jí)性質(zhì)但不需考慮其下級(jí)性質(zhì)時(shí)
當(dāng)方式為明細(xì)時(shí):產(chǎn)生該性質(zhì)病人的每次明細(xì)的報(bào)表
當(dāng)方式為匯總時(shí):產(chǎn)生該按該性質(zhì)病人匯總的報(bào)表
3.當(dāng)選擇的病人性質(zhì)有所屬單位時(shí),產(chǎn)生按所屬單位匯總的報(bào)表
4.當(dāng)選擇的為單位時(shí)
當(dāng)方式為明細(xì)時(shí):產(chǎn)生該單位病人的每次明細(xì)的報(bào)表
當(dāng)方式為匯總時(shí):產(chǎn)生該按該單位病人匯總的報(bào)表
程
序
描
述 1. 報(bào)表窗口由w_bbfather窗口繼承
2. 在cb_2.clicked中,if為葉結(jié)點(diǎn) and if為明細(xì)報(bào)表,則is_data = "d_mz_dwfy_1",否則為"d_mz_dwfy_2",if 非葉結(jié)點(diǎn),則is_data = "d_mz_dwfy"
3. 初始化wf_initial():明細(xì)wf_brdw_mx();匯總wf_brdw_hz();根結(jié)點(diǎn)wf_brxz()
方法:將報(bào)表字段放入報(bào)表表頭結(jié)構(gòu)數(shù)組s_reportcol中
(colname, colcode, colleen, colgroup, coldata, coltype, coldatatype)
coltype 類型(1.信息,2.數(shù)據(jù)); coldatatype類型(1-string 2-number 3-date)
4. 將'd_xmgb'中紀(jì)錄整理到結(jié)構(gòu)中,gf_getreportcolparm(報(bào)表編號(hào),結(jié)構(gòu), 是否分組, 是否分組合計(jì), 開始列, 長(zhǎng)度),設(shè)置colgroup項(xiàng)
5. 將報(bào)表首尾部分放入報(bào)表名稱,臺(tái)頭,附注結(jié)構(gòu)s_reporttabel中,(title1,title2,title3,title4,footer1,footer2,printp),其中,title1為報(bào)表標(biāo)題,title2為報(bào)表副題(此處寫病人單位),title3為報(bào)表日期,title4為報(bào)表注(此處為‘單位:元’),footer1,footer2為腳注,printp為是否打印頁號(hào)(T.是,F.否)
6. 將報(bào)表性質(zhì)部分放入報(bào)表中行字段,列字段,值字段,數(shù)據(jù)源以及字體結(jié)構(gòu)s_reporttablesys中(rowfield, rowtype, colfield, valfield, datastore,
tfont,hfont, dfont, colcount)
7. uo_1.initial(s_reportcol [],s_reporttabel [],s_reporttablesys [])
8. w_bbfather控件說明:
cb_2 根據(jù)類型選擇il_selecttype
s_exchange.longparm[1] = 1 可選全部
s_exchange.longparm[2] = 2 門診性質(zhì) =1 全部性質(zhì)
1為科室,打開w_ksdm_sele;2為全部病人性質(zhì),4為門診病人性質(zhì),5為住院病人性質(zhì),打開w_brxz_sele;3為全部單位性質(zhì),6為門診單位性質(zhì),7為住院?jiǎn)挝恍再|(zhì),打開w_fydw_sele。
uo_1 繼承于 vu_reportcomp
cb_tj 進(jìn)行統(tǒng)計(jì)
在wf_getdata()中設(shè)置存儲(chǔ)過程,DataObject = is_data,并取數(shù)據(jù)
wf_refreshdata(時(shí)間),更新uo_1控件數(shù)據(jù)
打印調(diào)用uo_1.printreport()
9. Vu_reportcomp說明:
數(shù)據(jù)窗口為dw_reportdisp(d_reportbbsign) 欄調(diào)整調(diào)用uf_column()
結(jié)構(gòu)s_reportpage(zls總列數(shù),xxl信息列數(shù),sjl 數(shù)據(jù)列數(shù),fy分頁數(shù),
fyl分頁列數(shù),zys 總頁數(shù))其它結(jié)構(gòu)已在上面說明。
getrowval() 取得當(dāng)前行唯一標(biāo)示值
initial(stru_col[],stru_table[],stru_tablesys[])初始化表結(jié)構(gòu)
printreport() 打印報(bào)表
數(shù)據(jù)窗口 d_reportsfxm(gy_sfxm)、d_reportxmgb(gy_xmgb)、
引用表 Gy_brxz,gy_fydw,ms_mzxx,ms_sfmx
操作表
編制 鐘華 日期 2000.05.17
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 掛號(hào)分科統(tǒng)計(jì)表 編號(hào) 5.33
功
能
描
述 按科室進(jìn)行掛號(hào)統(tǒng)計(jì)
程
序
描
述 Dw_1掛號(hào)數(shù)據(jù)減去dw_2退號(hào)數(shù)據(jù)顯示結(jié)果在dw_1 中
數(shù)據(jù)窗口 d_gh_kshz, d_gh_kshz_th
引用表 MS_GHMX,MS_GHKS,MS_THMX
操作表
編制 鐘華 日期 2000.05.17
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 醫(yī)生掛號(hào)統(tǒng)計(jì)表 編號(hào) 5.34
功
能
描
述 按醫(yī)生進(jìn)行掛號(hào)統(tǒng)計(jì)
程
序
描
述 Dw_1掛號(hào)數(shù)據(jù)減去dw_2退號(hào)數(shù)據(jù)顯示結(jié)果在dw_1 中
數(shù)據(jù)窗口 d_gh_yshz, d_gh_yshz_th
引用表 MS_GHMX,MS_GHKS,MS_THMX
操作表
編制 鐘華 日期 2000.05.17
模 塊 說 明 書
產(chǎn)品名稱 門診掛號(hào)收費(fèi)系統(tǒng) 模塊名稱 科室醫(yī)生核算報(bào)表 編號(hào) 5.35
功
能
描
述 1.按開單科室,開單醫(yī)生,執(zhí)行科室,執(zhí)行醫(yī)生四種方式進(jìn)行核算
2.可實(shí)現(xiàn)一次統(tǒng)計(jì),多次查詢
程
序
描
述 1.選擇科室:若選擇開單is_data = "d_mz_kdks",否則is_data = "d_mz_zxks"
選擇醫(yī)生:若選擇開單is_data = "d_mz_kdys",否則is_data = "d_mz_zxys"
2.后臺(tái)統(tǒng)計(jì):若該時(shí)間段內(nèi)已做過統(tǒng)計(jì),是否覆蓋,若覆蓋則
delete MS_MZMX、MS_MZHS、MS_YJMX、MS_YJHS表內(nèi)S_MZMX.GZRQ >= :ldt_begin and MS_MZMX.GZRQ <= :ldt_end的記錄
wf_tj_mzhs(ldt_begin,ldt_end) 統(tǒng)計(jì)門診核算表
進(jìn)行門診開單核算(填MS_MZHS表)dw_mzhs
處方統(tǒng)計(jì)d_mz_cftj_kdzs
扣除處方作廢d_mz_cftj_kdzs_zf
醫(yī)技統(tǒng)計(jì)d_mz_yjtj_kdzs
扣除醫(yī)技作廢d_mz_yjtj_kdzs_zf
wf_tj_mzmx(ldt_begin,ldt_end) 統(tǒng)計(jì)門診明細(xì)表dw_mzmx
進(jìn)行門診開單核算wf_tj_je(dw_mzmx,"d_mz_cftj_kdje",adt_begin,adt_end)
進(jìn)行門診作廢核算wf_tj_je(dw_mzmx,"d_mz_cftj_kdje_zf",adt_begin,adt_end)
進(jìn)行醫(yī)技開單核算wf_tj_je(dw_mzmx,"d_mz_yjtj_kdje",adt_begin,adt_end)
進(jìn)行醫(yī)技作廢核算wf_tj_je(dw_mzmx,"d_mz_yjtj_kdje_zf",adt_begin,adt_end)
wf_tj_yjhs(ldt_begin,ldt_end) 統(tǒng)計(jì)醫(yī)技(執(zhí)行)核算表
進(jìn)行門診執(zhí)行核算(填MS_YJHS表) dw_yjhs
執(zhí)行統(tǒng)計(jì)d_mz_yjtj_zxzs
wf_tj_yjmx(ldt_begin,ldt_end) 統(tǒng)計(jì)醫(yī)技(執(zhí)行)明細(xì)表dw_yjmx
醫(yī)技執(zhí)行金額核算wf_tj_je(dw_yjmx,"d_mz_yjtj_zxje",adt_begin,adt_end)
3.統(tǒng)計(jì)操作同病人性質(zhì)單位報(bào)表
數(shù)據(jù)窗口 d_mz_kdks, d_mz_zxks,d_mz_kdys, d_mz_zxys,
d_mz_cftj_kdzs,d_mz_cftj_kdzs_zf, d_mz_yjtj_kdzs, d_mz_yjtj_kdzs_zf
d_mz_cftj_kdje, d_mz_cftj_kdje_zf, d_mz_yjtj_kdje, d_mz_yjtj_kdje_zf
d_mz_yjtj_zxzs, d_mz_yjtj_zxje
引用表 ms_mzxx,ms_sfmx,ms_cf01,ms_cf02,ms_yj01,ms_yj02
操作表 Ms_mzhs,ms_mzmx,ms_yjhs,ms_yjmx
編制 鐘華 日期 2000.05.17
三. 界面設(shè)計(jì)描述
界面名稱:病人檔案維護(hù)
界面圖示:
圖1
圖2
|
|