20091213? out_invoice 中 加入病人類別
1.out_invoice 表中增加一字段 Brlb char(10)
2.pOut_Chg_RecipeSettl3
add 變量@brlb varchar(10)
out-iinvoice中插入值
3. Recipesettlfrm 中
? 1. spRecipeSettl3 中 params 設置 (增加@brlb varchar(10 ))
?? 2.添加控件 panBrlb
?? 3.全局變量gBrlb
? GetPatientInfo 中讀取
4.if SysDM.GetSysParam(pkOut_IsUniteRecipe)=2 then //多張處方合并成一張發票
賦值
ParamByName('@brlb').AsString:=panBrlb.Caption;
退票中的處理;
RetChargeFrm /GetInvoiceInfo
1.QryInvoice 的SQL 中加入 BRLB? 150046983
2.panBrlb.Caption :=sysdm.GetBrlbMC(fieldbyname('brlb').asstring);
普通退費 pOut_Chg_RetCharge3
insert into Out_Invoice? 中加入brlb
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索:z360901061

微信掃一掃加我為好友
QQ號聯系: 360901061
您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。
【本文對您有幫助就好】元
