承志医疗管理系统技术解析住院发药与退药（七）

最新推荐文章于 2015-06-04 14:33:36 发布
原创 最新推荐文章于 2015-06-04 14:33:36 发布 · 2k 阅读 · 0 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#WCF #医疗

每天护士提交医嘱了以后才可以对病人发药。每天只对病人发药一次，数据库每天会自动更新作业。

如果病人吃了几次药后。医生发现病人已经好转了，可以不用再吃药的情况下，可以进行病人的退药。退还相应的药费：如下图



数据库表和关系

 住院发药



住院退药


表1发药表

列名

数据类型

说明

SendOutMedicineID

int - Identity

发药ID

MedicineName

nchar (20)

药品名称

Gross

decimal (18, 2)

总量

UserFrequency

nchar (20)

用药频率

UserMethod

nchar (30)

用法

Specification

nchar (50)

规格

Unit

nchar (10)

单位

UnitPrice

decimal (18, 2)

单价

Money

decimal (18, 2)

金额

ParturitionManufacturers

nchar (50)

生产厂家

OnceDose

nchar (30)

单剂量

Content

nchar (20)

含量

SendOutMedicineDate

date

发药日期

SendOutMedicineNo

bit

发药否

RegisterInhospitalID

int

住院登记ID

表2：库存表

dbo.KC_StockList

Primary Key(s):  StockID

列名

数据类型

说明

StockID

int - Identity

库存ID

StoreroomID

int

(库房表)库房ID

MedicineID

int

(药品表)药品ID

StockNumber

decimal (18)

库存数

StockUpperLimit

decimal (18)

库存上限

StockLowerLimit

decimal (18)

库存下限

表3：库房表

dbo.KC_StoreroomList

Primary Key(s):  StoreroomID

列名

数据类型

说明

StoreroomID

int - Identity

库房ID

StoreroomName

nchar (20)

库房名称

表4：药品表

dbo.KC_MedicineList

Primary Key(s):  MedicineID

列名

数据类型

说明

MedicineID

int - Identity

药品ID

MedicineName

nchar (50)

药品名称

CommonalityName

nchar (30)

通用名

SpellCode

nchar (20)

拼音码

Specification

nchar (20)

规格

ParturitionManufacturers

nchar (50)

生产厂家

PackUnitID

int

包装单位ID

DoseSortID

int

剂型类别ID

BatchNumber

nchar (50)

批号

EffectiveDate

nchar (10)

有效期

Encoding

nchar (20)

编码

RetailPrice

decimal (18, 2)

零售价（包装）

Content

nchar (20)

含量

MeteringUnitID

Int

计量单位ID

StopUseNo

bit

停用否

MedicinalTypeID

int

药品类型ID

Dosage

nchar (50)

用量

BadnessReaction

nchar (300)

不良反应

AttentionItems

nchar (300)

注意事项

Performance

nchar (300)

性能

RetailPrice_J

decimal (18, 4)

零售价_j（单个）

ManageStockNo

bit

管库存否

ProducingArea

nchar (10)

产地

RatifyNumber

nchar (30)

批准文号

IdentifyingSign

nchar (30)

标识符号

YiJiNo

bit

医技否

ImportNo

bit

进口否

RecentlyEnterPrice

decimal (18, 4)

最近进价

StorageCondition

nchar (10)

存储条件

QualityStandard

nchar (30)

质量标准

BarCode

nchar (30)

条形码

Manufacturer

nchar (30)

厂商

Taboo

nchar (100)

禁忌

CheckoutMethod

nchar (200)

检验方法

RegisterIdNumber

nchar (30)

注册证号

RightSymptom

nchar (200)

适应症

FinitudeMoney

decimal (18, 2)

限额

SpecificMedicinalID

Int

特殊药品

UseMethod

nchar (200)

用法

UpperLimit

nchar (10)

上限

LowerLimit

nchar (10)

下限

BaoNeiFuo

bit

保内否



打开界面，显示的是对应某个病人的药品，实现的功能代码；

数据库存储过程

  if @Type='Frm_ZhuYuanFaYao_SelectYaoPing'
   begin
SELECT     AttributeMingXiList.AttributeMingXiName AS Office, AttributeMingXiList_1.AttributeMingXiName AS Usage, AttributeMingXiList_2.AttributeMingXiName AS UseMedicineFrequency, 
                      AttributeMingXiList_3.AttributeMingXiName AS AtEverturnDse, MZ_PrescriptionBillsMingXiList.PrescriptionBillsMingXiID, MZ_PrescriptionBillsMingXiList.SendOutMedicineNo, 
                      MZ_PrescriptionBillsMingXiList.AtEveryTurnNumber, KC_MedicineList.Specification, AttributeMingXiList_4.AttributeMingXiName AS Unit, KC_MedicineList.RetailPrice_J, 
                      KC_MedicineList.ParturitionManufacturers, AttributeMingXiList_5.AttributeMingXiName AS SkinTest, KC_MedicineList.[Content], ISNULL(MZ_PrescriptionBillsMingXiList.RetreatMedicineNumber, 0) 
                      AS RetreatMedicineNumber, KC_MedicineList.MedicineName, MZ_PrescriptionBillsMingXiList.Number, MZ_PrescriptionBillsMingXiList.MedicineID
FROM         AttributeMingXiList AS AttributeMingXiList_5 INNER JOIN
                      MZ_PrescriptionBillsMingXiList INNER JOIN
                      AttributeMingXiList ON MZ_PrescriptionBillsMingXiList.OfficeID = AttributeMingXiList.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_1 ON MZ_PrescriptionBillsMingXiList.UsageID = AttributeMingXiList_1.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_2 ON MZ_PrescriptionBillsMingXiList.UseMedicineFrequencyID = AttributeMingXiList_2.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_3 ON MZ_PrescriptionBillsMingXiList.AtEveryTurnDoseID = AttributeMingXiList_3.AttributeMingXiID ON 
                      AttributeMingXiList_5.AttributeMingXiID = MZ_PrescriptionBillsMingXiList.SkinTestID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_4 INNER JOIN
                      KC_MedicineList ON AttributeMingXiList_4.AttributeMingXiID = KC_MedicineList.MeteringUnitID ON MZ_PrescriptionBillsMingXiList.MedicineID = KC_MedicineList.MedicineID               where MZ_PrescriptionBillsMingXiList.InhospitalNo=1 and MZ_PrescriptionBillsMingXiList.PrescriptionBillsID=@PrescriptionBillsID and
                       MZ_PrescriptionBillsMingXiList.SendOutMedicineNo=@SendOutMedicineNo
   end
逻辑层代码 

  [OperationContract]
        public DataSet Frm_ZhuYuanFaYao_SelectYaoPing(int PrescriptionBillsID, bool SendOutMedicineNo)
        {
            SqlParameter[] mySqlParameters = {
                                               new SqlParameter ("@Type",SqlDbType .Char),
                                               new SqlParameter ("@PrescriptionBillsID",SqlDbType.Int),
                                                new SqlParameter ("@SendOutMedicineNo",SqlDbType.Bit),
                                                                                    
                                           };
            mySqlParameters[0].Value = "Frm_ZhuYuanFaYao_SelectYaoPing";
            mySqlParameters[1].Value = PrescriptionBillsID;
            mySqlParameters[2].Value = SendOutMedicineNo;
            DataTable dt = myDALMethod.QueryDataTable("住院登记_Frm_ZhuYuanFaYao", mySqlParameters);
            DataSet ds = new DataSet();
            ds.Tables.Add(dt);
            return ds;
        }

界面层

private void dgSickInformation_CellClick(object sender, DataGridViewCellEventArgs e)
        {
            try
            {  //表格单击时获取病人住院ID
                ZhuYuanID = Convert.ToInt32(dgSickInformation.CurrentRow.Cells["RegisterInhospitalID"].Value);
                //根据ID来绑定对应的药品
                dgMedicinalInformation.DataSource = myFrm_ZhuYuanFaYaoClient.Frm_ZhuYuanFaYao_SelectYaoPing(ZhuYuanID, false).Tables[0];
                JiSuJinE();
            }
            catch { }
        }

住院发药，针对每天提交医嘱的病人进行发药，可以一键全选，可以取消一键全选，实现的功能和代码如下；

一键全选的实现

private void btnSelecttAll_Click(object sender, EventArgs e)
        {    //遍历每一行
            foreach (DataGridViewRow dgv in dgMedicinalInformation.Rows)
           {  //如果“确认”的单元格的值为假
               if(Convert.ToBoolean( dgv.Cells["确认"].Value)==false)
               {   //就赋值为ture
                    dgv.Cells["确认"].Value= true;
               }
           }
        }
一键取消的实现
        private void btnCancelAllSelect_Click(object sender, EventArgs e)
        { //遍历每一行
            foreach (DataGridViewRow dgv in dgMedicinalInformation.Rows)
            {//如果“确认”的单元格的值为真
                if (Convert.ToBoolean(dgv.Cells["确认"].Value) == true)
                { //就赋值为fale
                    dgv.Cells["确认"].Value = false;
                }
            }

        }

选好了以后，点击发药处置。完成发药。功能代码实现；

数据库存储过程

 if @Type='Frm_ZhuYuanFaYao_InsertSendOutMedicineList'
   begin
    insert       ZY_SendOutMedicineList( MedicineName, Gross, UserFrequency,
                 UserMethod, Specification, Unit, UnitPrice, Money, 
                 ParturitionManufacturers, OnceDose, [Content], 
                 SendOutMedicineDate, SendOutMedicineNo, RegisterInhospitalID)
       values (@MedicineName, @Gross, @UserFrequency, @UserMethod,
               @Specification, @Unit, @UnitPrice, @Money, @ParturitionManufacturers,
               @OnceDose, @Content, @SendOutMedicineDate, @SendOutMedicineNo, @RegisterInhospitalID)
   end

逻辑层

 [OperationContract]
        public int Frm_ZhuYuanFaYao_InsertSendOutMedicineList(string MedicineName, decimal Gross,
              string UserFrequency, string UserMethod,string Specification,string Unit ,decimal  UnitPrice,
              decimal Money,string ParturitionManufacturers,string  OnceDose,string  Content,
              DateTime SendOutMedicineDate,bool SendOutMedicineNo,int RegisterInhospitalID)
        {
            SqlParameter[] mySqlParameters = {
                                                new SqlParameter ("@Type",SqlDbType .Char),
                                                new SqlParameter ("@MedicineName",SqlDbType.Char),
                                                new SqlParameter ("@Gross",SqlDbType.Decimal),
                                                new SqlParameter ("@UserFrequency",SqlDbType.Char),
                                                new SqlParameter ("@UserMethod",SqlDbType.Char),
                                                new SqlParameter ("@Specification",SqlDbType.Char),
                                                new SqlParameter ("@Unit",SqlDbType.Char),
                                                new SqlParameter ("@UnitPrice",SqlDbType.Decimal),
                                                new SqlParameter ("@Money",SqlDbType.Decimal),
                                                new SqlParameter ("@ParturitionManufacturers",SqlDbType.Char),
                                                new SqlParameter ("@OnceDose",SqlDbType.Char),
                                                new SqlParameter ("@Content",SqlDbType.Char),
                                                new SqlParameter ("@SendOutMedicineDate",SqlDbType.DateTime),
                                                new SqlParameter ("@SendOutMedicineNo",SqlDbType.Bit),
                                                new SqlParameter ("@RegisterInhospitalID",SqlDbType.Int),
                                                                                    
                                           };
            mySqlParameters[0].Value = "Frm_ZhuYuanFaYao_InsertSendOutMedicineList";
            mySqlParameters[1].Value = MedicineName;
            mySqlParameters[2].Value = Gross;
            mySqlParameters[3].Value = UserFrequency;
            mySqlParameters[4].Value = UserMethod;
            mySqlParameters[5].Value = Specification;
            mySqlParameters[6].Value = Unit;
            mySqlParameters[7].Value = UnitPrice;
            mySqlParameters[8].Value = Money;
            mySqlParameters[9].Value = ParturitionManufacturers;
            mySqlParameters[10].Value = OnceDose;
            mySqlParameters[11].Value = Content;
            mySqlParameters[12].Value = SendOutMedicineDate;
            mySqlParameters[13].Value = SendOutMedicineNo;
            mySqlParameters[14].Value = RegisterInhospitalID;
           
            return myDALMethod.UpdateData("住院登记_Frm_ZhuYuanFaYao", mySqlParameters);
         
        }

界面层

    /// <summary>
        /// foreach遍历获取值，遍历一行一行的新增
        /// </summary>
        int ChengGong;
        int i;
        private void btnFaYaoChuZhi_Click(object sender, EventArgs e)
        {
            foreach (DataGridViewRow dgv in dgMedicinalInformation.Rows)
            {
                if (Convert.ToBoolean(dgv.Cells["确认"].Value))
                {
                    string MedicineNam = Convert.ToString(dgv.Cells["MedicineName"].Value);
                    decimal Gross = Convert.ToDecimal(dgv.Cells["Number"].Value);
                    string UserFrequency = Convert.ToString(dgv.Cells["UseMedicineFrequency"].Value);
                    string UserMethod = Convert.ToString(dgv.Cells["Usage"].Value);
                    string Specification = Convert.ToString(dgv.Cells["Specification"].Value);
                    string Unit = Convert.ToString(dgv.Cells["Unit"].Value);
                    decimal UnitPrice = Convert.ToDecimal(dgv.Cells["RetailPrice_J"].Value);
                    decimal Money = Convert.ToDecimal(dgv.Cells["SumMoney"].Value);
                    string ParturitionManufacturers = Convert.ToString(dgv.Cells["ParturitionManufacturers"].Value);
                    string OnceDose = Convert.ToString(dgv.Cells["AtEverturnDse"].Value);
                    string Content = Convert.ToString(dgv.Cells["Content"].Value);
                    DateTime SendOutMedicineDate = DateTime.Now;
                    bool SendOutMedicineNo = true;
                    int RegisterInhospitalID = ZhuYuanID;
                    int FaYaoDanID = Convert.ToInt32(dgv.Cells["PrescriptionBillsMingXiID"].Value);
                    ChengGong = myFrm_ZhuYuanFaYaoClient.Frm_ZhuYuanFaYao_InsertSendOutMedicineList(MedicineNam, Gross, UserFrequency, UserMethod,
                     Specification, Unit, UnitPrice, Money, ParturitionManufacturers, OnceDose,
                     Content, SendOutMedicineDate, SendOutMedicineNo, RegisterInhospitalID);
                    i = myFrm_ZhuYuanFaYaoClient.Frm_ZhuYuanFaYao_UpdateSendOutMedicineNo(FaYaoDanID);
                }
            }
            if (ChengGong > 0 && i > 0)
            {
                MessageBox.Show("发药成功");
                try
                {
                    //保存成功后刷新
                    ZhuYuanID = Convert.ToInt32(dgSickInformation.CurrentRow.Cells["RegisterInhospitalID"].Value);
                    dgMedicinalInformation.DataSource = myFrm_ZhuYuanFaYaoClient.Frm_ZhuYuanFaYao_SelectYaoPing(ZhuYuanID, false).Tables[0];
                    JiSuJinE();
                }
                catch { }
            }
        }

除了发药还可以进行病人的退药处理，退药时会对病人开药时的费用进行退还，填写对应的退药数量，根据病人的医疗性质，进行对应的费用合计，退还。

根据对应的退药数量计算退款。功能实现

/// <summary>
        /// 单元格编辑事件，计算退款
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
         private void dgMedicinalInformation_CellEndEdit(object sender, DataGridViewCellEventArgs e)
         {
             JiSuJinE();//调用计算退款方法
             //遍历每个输入数量是否大于总数量
             foreach (DataGridViewRow dgv in dgMedicinalInformation.Rows)
             {
                 decimal ShuRuShuLiang = Convert.ToDecimal(dgv.Cells["TuYaoShuLiang"].Value);
                 if (ShuRuShuLiang >Convert.ToDecimal (dgv.Cells["Number"].Value))
               {
                   MessageBox.Show("输入数量已经过总数量！请重新输入退药数量");
               }
             }
         }
         #region 计算退药金额
         void JiSuJinE()
         {

             decimal DanJia = 0;
             decimal ShuLiang = 0;
             decimal TuYaoShuLiang = 0;

             decimal tuikuang = 0;
             for (int i = 0; i < dgMedicinalInformation.Rows.Count; i++)
             {
                 //获取当前行单价
                 DanJia = Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["RetailPrice_J"].Value);
                 //获取数量
                 ShuLiang = Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["Number"].Value);
                 // 获取药品ID
                 int YaoPingID = Convert.ToInt32(dgMedicinalInformation.Rows[i].Cells["MedicineID"].Value);
                 //获取退药数量
                 TuYaoShuLiang = Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["TuYaoShuLiang"].Value);
                 //查询折扣率
                 DataTable dtZheKouLv = myFrm_ZhuYuanJiZhangClient.
                     Frm_ZhuYuanJiZhang_SelectZheKouLi(PulicStatic.YiLiaoFangShi, YaoPingID).Tables[0];
                 // 如果该药品对应查询到折扣率
                 if (dtZheKouLv.Rows.Count > 0)
                 {
                     //则单元格退款金额=单价*退药数量*折扣率
                     dgMedicinalInformation.Rows[i].Cells["退款金额"].Value =
                        (DanJia * TuYaoShuLiang * Convert.ToDecimal(dtZheKouLv.Rows[0][0])).ToString("0.00");
                 }
                 else
                 {//否则退款金额=单价*退款数量
                     dgMedicinalInformation.Rows[i].Cells["退款金额"].Value = (DanJia * TuYaoShuLiang).ToString("0.00");
                 }
                 dgMedicinalInformation.Rows[i].Cells["SumMoney"].Value = (DanJia * ShuLiang).ToString("0.00");
                 //计算总退款金额
                 tuikuang += Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["退款金额"].Value);
             }
             //赋值文本
             lblTuiKuang.Text = "-" + tuikuang.ToString("0.00");
         }

         #endregion

输入好退药数量无误后，进行退药保存

数据存储过程

if @Type='Frm_ZhuYuanTuiYao_TuiYaoUpDateKuFangSHuLiang'--退药修改库房数量
begin 
update   KC_StockList 
Set        StockNumber=StockNumber+@StockNumber
where   KC_StockList.StoreroomID=@StoreroomID and KC_StockList.MedicineID=@MedicineID
end
if @Type='Frm_ZhuYuanTuiYao_InsertKuCun'--如果没有就新增库房数据
begin 
insert     KC_StockList(  StockNumber,StoreroomID, MedicineID, StockUpperLimit, StockLowerLimit)
values      ( @StockNumber,@StoreroomID, @MedicineID, @StockUpperLimit, @StockLowerLimit)   
end

逻辑层代码

[OperationContract]
        public int Frm_ZhuYuanTuiYao_TuiYaoUpDateKuFangSHuLiang(decimal StockNumber, int StoreroomID, int MedicineID)
        {
            SqlParameter[] mySqlParameters = {
                                               new SqlParameter ("@Type",SqlDbType .Char),
                                               new SqlParameter ("@StockNumber",SqlDbType.Decimal ),
                                               new SqlParameter ("@StoreroomID",SqlDbType.Int),
                                               new SqlParameter ("@MedicineID",SqlDbType.Int),
                                           };
            mySqlParameters[0].Value = "Frm_ZhuYuanTuiYao_TuiYaoUpDateKuFangSHuLiang";
            mySqlParameters[1].Value = StockNumber;
            mySqlParameters[2].Value = StoreroomID;
            mySqlParameters[3].Value = MedicineID;
            return myDALMethod.UpdateData("住院登记_Frm_ZhuYuanTuiYao", mySqlParameters);

        }

 [OperationContract]
        public int Frm_ZhuYuanTuiYao_InsertKuCun(decimal StockNumber, int StoreroomID, int MedicineID,
            decimal StockUpperLimit,decimal StockLowerLimit
           )
        {
            SqlParameter[] mySqlParameters = {
                                               new SqlParameter ("@Type",SqlDbType .Char),
                                               new SqlParameter ("@StockNumber",SqlDbType.Decimal ),
                                               new SqlParameter ("@StoreroomID",SqlDbType.Int),
                                               new SqlParameter ("@MedicineID",SqlDbType.Int),
                                               new SqlParameter ("@StockUpperLimit",SqlDbType.Decimal),
                                               new SqlParameter ("@StockLowerLimit",SqlDbType.Decimal),
                                           };
            mySqlParameters[0].Value = "Frm_ZhuYuanTuiYao_InsertKuCun";
            mySqlParameters[1].Value = StockNumber;
            mySqlParameters[2].Value = StoreroomID;
            mySqlParameters[3].Value = MedicineID;
            mySqlParameters[4].Value = StockUpperLimit;
            mySqlParameters[5].Value = StockLowerLimit;
            return myDALMethod.UpdateData("住院登记_Frm_ZhuYuanTuiYao", mySqlParameters);

        }

界面层代码

#region 退药
        int intStoreroomIDMingXi;
        int inCount = 0;
        private void btnQuitMedicine_Click(object sender, EventArgs e)
        {
            int ChengGong = 0;
            int j = 0;
            intStoreroomIDMingXi = Convert.ToInt32(cboPharmacy.SelectedValue);
            DataTable dt = myFrm__ZhuYuanTuiYaoClient.Frm_ZhuYuanTuiYao_SelectKuFangID().Tables[0];

                foreach (DataGridViewRow dgv in dgMedicinalInformation.Rows)
                {
                    decimal TuiYaoShuLiang = Convert.ToDecimal(dgv.Cells["TuYaoShuLiang"].Value);
                    decimal ZongShu = Convert.ToDecimal(dgv.Cells["Number"].Value);
                    if (TuiYaoShuLiang > ZongShu)
                    {
                        MessageBox.Show("请注意当前有退要数比总数大，请检查后再退药！");
                        return;
                    }
                }
                for (int i = 0; i < dgMedicinalInformation.Rows.Count; i++)
                {
                    if (Convert.ToBoolean(dgMedicinalInformation.Rows[i].Cells["确认"].Value))
                    {  //对应获取
                        decimal TuiYaoShuLiang = Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["TuYaoShuLiang"].Value);
                        decimal YiTuiShuLiang = Convert.ToDecimal(dgMedicinalInformation.Rows[i].Cells["RetreatMedicineNumber"].Value);
                        int ChuFangDanID = Convert.ToInt32(dgMedicinalInformation.Rows[i].Cells["PrescriptionBillsMingXiID"].Value);
                        int YaoPingID = Convert.ToInt32(dgMedicinalInformation.Rows[i].Cells["MedicineID"].Value);
                        for (int k = 0; k < dt.Rows.Count; k++)
                        {
                            //获取药品Id
                            int intMedicineID = Convert.ToInt32(dt.Rows[k]["MedicineID"]);
                            //获取库房ID
                            int intStoreroomID = Convert.ToInt32(dt.Rows[k]["StoreroomID"]);
                            //如果库房药品ID=退药药品ID并且库房的库房ID=获取的库房ID
                            if (intMedicineID == YaoPingID && intStoreroomID == intStoreroomIDMingXi)
                            {//证明库房表里有该药品记录好
                                inCount++;
                            }
                        }
                        //记录>0
                        if (inCount > 0)
                        {
                            //如果存在则修改
                            myFrm__ZhuYuanTuiYaoClient.Frm_ZhuYuanTuiYao_TuiYaoUpDateKuFangSHuLiang(TuiYaoShuLiang, intStoreroomIDMingXi, YaoPingID);
                        }
                        else
                        {
                            //如果不存在则新增退药
                            myFrm__ZhuYuanTuiYaoClient.Frm_ZhuYuanTuiYao_InsertKuCun(TuiYaoShuLiang, intStoreroomIDMingXi, YaoPingID, 100000, 111);

                        }
                        ChengGong = myFrm__ZhuYuanTuiYaoClient.Frm_ZhuYuanTuiYao_UpdatePrescriptionBillsMingXiNumnber(TuiYaoShuLiang, ChuFangDanID);
                        j = myFrm__ZhuYuanTuiYaoClient.Frm_ZhuYuanTuiYao_UpdatePrescriptionBillsMingXiRetreatMedicineNumber(YiTuiShuLiang + TuiYaoShuLiang, ChuFangDanID);

                    }

                }

                if (ChengGong > 0 && j > 0)
                {
                    DataTable dtJIZhang = myFrm_ZhuYuanJiZhangClient.Frm_ZhuYuanJiZhang_insertJiZhangDan
                       (ZhuYuanID, 0, DateTime.Now).Tables[0];
                    //记录一条退药费用
                    int k = myFrm_ZhuYuanJiZhangClient.Frm_ZhuYuanJiZhang_insertJiZhangDanMingXi(0, Convert.ToInt32(dtJIZhang.Rows[0][0]),
                          0, 0, 0, Convert.ToDecimal(lblTuiKuang.Text), "退药费");
                    if (k > 0)
                    {
                        MessageBox.Show("退药成功！");
                        dgMedicinalInformation.DataSource = myFrm_ZhuYuanFaYaoClient.Frm_ZhuYuanFaYao_SelectYaoPing(ZhuYuanID, true).Tables[0];
                        JiSuJinE();
                    }

                }

            }
        
        #endregion


仅供学习，禁止商业用途






 








医院 HIS 系统技术文档撰写实际操作简易指南
AllenLV的博客
11-27 2180
医院 HIS 系统，即医院信息系统（Hospital Information System），是利用计算机软硬件技术和网络通信技术等现代化手段，对医院及其所属各部门的人流、物流、财流进行综合管理，对在医疗活动各阶段产生的数据进行采集、存储、处理、提取、传输、汇总，加工形成各种信息，从而为医院的整体运行提供全面的自动化管理及各种服务的信息系统。HIS 系统在医院中起着至关重要的作用。首先，它可以帮助医院实现信息化管理，将各个部门的信息整合在一起，方便信息查询和共享，提高医院整体运营效率。
BSHIS2.2医院管理系统源码详细设计说明书.药房
12-05
BSHIS2.2医院管理系统源码详细设计说明书聚焦于中西药房管理系统的开发与设计，旨在通过统一的软件平台，优化药房的各项业务流程，包括划价发药以及库房管理等核心功能。此系统特别注重病区药房的特殊发药流程，单独...
承志医疗管理系统技术解析住院管理（六）
孤狼
05-31 2279
下面是对医生工作站的一些主体的功能进行描述，和解析说明； 医师对分配好床位的病人进行医嘱录入和处方录入还有一些辅助的检查和对病人的信息修改查看等，功能如下图：   医师点击菜单栏——》护理——》体温单进行对病人的体温录入 录入完成点击保存，保存后可以编辑修改。 医师点击菜单栏——》护理——》过敏药品录入,进行对病人的过敏药品录入，如下图：这部尤为关键，如果病人对某种药
承志医院管理系统项目解析 门诊医生工作站—辅助检查项目（六）
任军的博客
06-02 1865
1.33辅助检查 在需要做辅助检查的时候，选择病人，然后选择相关信息的辅助检查项目，如图（1）、（2）所示：： 图（1） 图（2）   从界面上可以看到我们这里用到的控件有   控件名称 说明 日期控件（DateTimePicker） 控件可以在工具箱直接拖动至窗体，拖至窗体后右击属性可以修改控件的样式和各种属性，还可以编
承志医院管理系统项目解析 门诊医生工作站—处方录入（五）
任军的博客
05-31 1806
1.31录入处方 增加药品的时候，把鼠标放在项目名称处单击，如图（1）                                                                                     图（1） 会弹出一个窗体，如图（2）                                                    
承志医院管理系统项目解析 门诊登记（二）
任军的博客
05-28 2119
1.2门诊管理     1.21门诊登记 登录之后点击进入 首先病人来到医院登记，然后工作人员填写相关信息，并给病人门诊号。 如图（2） 从图中可以看出界面主要由文本框、日期控件、下拉框、和按钮组成   控件名称 说明 日期控件（DateTimePicker） 控件可以在工具箱直接拖动至窗体，拖至窗体后右击
承志医疗管理系统技术解析床位分配（五）
孤狼
05-30 2443
缴纳完押金后对病人按照不同的病人，根据不同的症状，分配到不同的病区，从而进行分配床位。如图2.3(图1)     2.3(图1) 查询未分配病床病人如2.3（图2） 从界面上可以看到所用到的控件有 控件名称 说明 文本（TextBox） 控件可以在工具箱直接拖动至窗体，拖至窗体后右击属性可以修改控件的样式和各种属
BSHIS2.2医院药房管理系统详细设计与功能解析
BSHIS2.2医院管理系统是一款专为中西药房设计的软件系统，旨在整合和优化药房的各项业务流程，包括库房管理、门诊发药和住院发药。此系统将中、西药房以及病区药房的业务操作统一在一个平台内，提高效率并减少错误。...
医院管理系统操作流程图.doc
09-22
本文档深入解析了医院管理系统的操作流程图，涵盖了包括收费室、门诊收费、住院管理、药房管理等关键业务模块的操作细节，为医院运营提供了清晰的流程指导。 首先，收费室作为医院管理的前哨，是处理所有医疗费用...
BSHIS2.22医院管理系统源码用户手册.病区
12-05
### BSHIS2.22医院管理系统源码用户手册知识点详解 ...通过上述详细解析，我们可以看出BSHIS2.22医院管理系统源码不仅具备强大的功能，还拥有丰富的扩展性和可定制性，能够满足不同类型医院的管理需求。
三甲医院管理系统HIS（C#版）
12-24
简单版医院管理系统HIS（C#版）
承志医院管理系统项目解析 门诊挂号（三）
任军的博客
05-30 2876
1.23门诊挂号 1：在主界面点击门诊挂号，如图（1） 图（1） 会进入这个界面，如图（2）                                                                 图（2） 然后查找病人，会出现这个界面，如图（3）   图（3） 最后出现这个效果，如图（4）                        
承志医疗管理系统技术解析服务端的配置（二）
孤狼
05-28 1177
第一步打开服务端，添加ServiceModel引用（图1）                                                                                  （图1） 第二步选择.NET中的ServiceModel（图2）                                            
承志医院管理系统项目解析 登录（一）
任军的博客
05-27 1623
1功能实现 1.1登录 在登录之前要输入用户名和密码，如图（1） 图（1） 从图中可以看出登录界面主要由两个文本框和登录按钮组成   控件名称 说明 文本（TextBox） 控件可以在工具箱直接拖动至窗体，拖至窗体后右击属性可以修改控件的样式和各种属性，还可以编辑事件。 图片按钮（PictureBox），登
承志医疗管理系统技术解析项目搭建（—）
孤狼
05-28 3322
新建界面层（客户端UIL） 第一步：点击新建项目 或者点击新建——》项目 第一步选择Windows，第二步：选择Window窗体应用程序，第三步编写项目名称， 第四步可以自选存储路径，第五步确定，完成。 新建逻辑层（服务端BLL） 第一步选择类库，第二步编写项目名称，第三步确定完成 新建数据层（DAL） 第一步在创建的BLL中右击
承志医疗管理系统技术解析住院登记（三）
孤狼
05-27 1880
从主界面进入住院登记，主界面如1.1（图1），然后对病人进行入院 登记，可以按门诊导入按钮导入门诊登记的病人，点击疾病编码选择对应的入院诊断和门诊诊断，如果以往病人再来登记，在输入姓名时会弹出相关的信息供选择，填写好相应的信息后点击保存，退出！功能如1.1 （图2） 1.1（图1）
承志医疗管理系统技术解析交押金（四）
孤狼
05-30 985
对新登记得病人进行缴纳押金，主要是对病人登记后的缴纳金额进行记录处理，可以根据病人信息在文本框内输入，会查找到对应的病人，然后对其缴纳的押金，押金会在后面出院结算时统一计算，根据病人的住院消费情况，病人可以重复缴纳押金。功能如下2.2(图1)：   2.2(图1) 从界面上可以看到所用到的控件有 控件名称 说明 文本（TextBox）
承志医疗管理系统技术解析出院步骤（八）
孤狼
06-04 3867
出院步骤分为住院退床和出院结算，此操作主要是对病人要出院结算前的退床操作，可以点击在院病人列表选择未退床的病人，并且载人。 也可以单击查找弹出床位图，根据病区选择病人，退床后，相应的病区的床位会更改为空床。退床后，病人可以办理出院结算，系统会自动列出病人在院的消费明细和计算出应缴纳的款项，看病人的押金是否足够，结算时系统会根据病人的医疗性质进行对其减免一部分的消费金额。程序如下图： 首
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值