예제 #1
0
파일: FrmDeptMed.cs 프로젝트: Wooyme/HIS-1
        private void butadd_Click(object sender, System.EventArgs e)
        {
            try
            {
                if (Convert.ToInt32(Convertor.IsNull(lblypmc.Tag, "0")) == 0)
                {
                    MessageBox.Show("没有选择药品");
                    return;
                }

                if (Convertor.IsNumeric(Convertor.IsNull(lblypmc.Tag, "0")) == false)
                {
                    MessageBox.Show("基数请输入数字");
                    return;
                }

                DataTable tb        = (DataTable)this.myDataGrid1.DataSource;
                DataRow   row       = tb.NewRow();
                int       _ggid     = Convert.ToInt32(Convertor.IsNull(lblypmc.Tag, "0"));
                DataRow[] selectrow = tb.Select("ggid='" + _ggid.ToString() + "'");
                if (selectrow.Length > 0)
                {
                    MessageBox.Show("当前药品已在列表添加了");
                    return;
                }

                Ypgg ydgg = new Ypgg(_ggid, InstanceForm.BDatabase);
                row["序号"]  = tb.Rows.Count + 1;
                row["品名"]  = ydgg.YPPM;
                row["商品名"] = ydgg.YPSPM;
                row["规格"]  = ydgg.YPGG;
                //row["零售价"]=ydcj.LSJ;
                row["基数"] = Convertor.IsNull(txtjs.Text, "0");
                row["单位"] = Yp.SeekYpdw(ydgg.YPDW, InstanceForm.BDatabase);
                //row["货号"]=ydcj.SHH;
                row["ggid"] = ydgg.GGID;
                row["启用日期"] = this.dtpqyrq.Value.ToShortDateString();
                tb.Rows.Add(row);
                lblypmc.Text = "";
                lblypmc.Tag  = "0";
                lblgg.Text   = "";
                //lblcj.Text="";
                lbldw.Text = "";
                //lbllsj.Text="";
                //lblhh.Text="";
                txtypdm.Text = "";
                txtjs.Text   = "";
                txtypdm.Focus();
            }
            catch (System.Exception err)
            {
                MessageBox.Show(err.Message);
            }
        }
예제 #2
0
파일: FrmDeptMed.cs 프로젝트: Wooyme/HIS-1
 //初始药品
 private void csyp(int ggid, int cjid)
 {
     try
     {
         Ypgg ydgg = new Ypgg(ggid, InstanceForm.BDatabase);
         this.lblypmc.Tag   = ydgg.GGID.ToString();
         this.lblypmc.Text  = ydgg.YPPM;
         this.lblypspm.Text = ydgg.YPSPM;
         this.lblgg.Text    = ydgg.YPGG;
         //this.lblcj.Text=ydcj.S_SCCJ;
         //this.lblhh.Text=ydcj.SHH;
         //this.lbllsj.Text=ydcj.LSJ.ToString() ;
         this.lbldw.Text = Yp.SeekYpdw(ydgg.YPDW, InstanceForm.BDatabase);
     }
     catch (System.Exception err)
     {
         MessageBox.Show("发生错误" + err.Message);
     }
 }
예제 #3
0
파일: Frmhb.cs 프로젝트: Wooyme/HIS-1
        private void butok_hb_Click(object sender, System.EventArgs e)
        {
            DataTable tb    = (DataTable)this.myDataGrid1.DataSource;
            DataTable tab   = (DataTable)this.myDataGrid2.DataSource;
            int       nrow1 = this.myDataGrid1.CurrentCell.RowNumber;
            int       nrow2 = this.myDataGrid2.CurrentCell.RowNumber;

            if (nrow1 > tb.Rows.Count - 1)
            {
                return;
            }
            if (nrow2 > tab.Rows.Count - 1)
            {
                return;
            }

            if (MessageBox.Show("您确定要将上面的厂家替换成下面的规格吗 ?", "询问窗", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) == DialogResult.No)
            {
                return;
            }

            //要替换成的规格ID
            int _gg_ggid = Convert.ToInt32(tab.Rows[nrow2]["ggid"]);


            try
            {
                Ypgg gg = new Ypgg(_gg_ggid, InstanceForm.BDatabase);
                if (gg.GGID == 0)
                {
                    MessageBox.Show("该规格可能已经不存在了"); return;
                }

                InstanceForm.BDatabase.BeginTransaction();

                //要被替换的厂家ID
                int _cj_cjid = Convert.ToInt32(tb.Rows[nrow1]["CJID"]);

                //厂家
                string ssql = "update yp_ypcjd set ggid=" + _gg_ggid + ",s_ypspm='" + gg.YPSPM + "',s_yppm='" + gg.YPPM +
                              "',s_ypspmbz='" + gg.YPSPMBZ + "',s_ypgg='" + gg.YPGG + "',s_ypdw='" + Yp.SeekYpdw(gg.YPDW, InstanceForm.BDatabase) + "' where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药房库存
                ssql = "update yf_kcmx set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药房批号
                ssql = "update yf_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药库库存
                ssql = "update yk_kcmx set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药库批号
                ssql = "update yk_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药房盘点表
                ssql = "update yf_pdtemp set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药库盘点表
                ssql = "update yk_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);
                //药品拆零表
                ssql = "update yp_ypcl set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                InstanceForm.BDatabase.DoCommand(ssql);


                //更新药品货号
                Ypcj   ypcj     = new Ypcj();
                int    _errcode = 0;
                string _errtext = "";
                ypcj.Update_shh(_gg_ggid, out _errcode, out _errtext, InstanceForm.BDatabase);
                if (_errcode != 0)
                {
                    throw new Exception(_errtext);
                }


                //三院数据处理_____保存日志
                Ypcj   cj       = new Ypcj(_cj_cjid, InstanceForm.BDatabase);
                string bz       = "取消药品合并:" + cj.S_YPPM + " CJID=" + cj.CJID + " ";
                Guid   log_djid = Guid.Empty;
                ts_HospData_Share.ts_update_log ts = new ts_HospData_Share.ts_update_log();
                ts.Save_log(ts_HospData_Share.czlx.yp_药品取消合并, bz, "YP_YPCJD", "CJID", _cj_cjid.ToString(), InstanceForm._menuTag.Jgbm, 0, "", out log_djid, InstanceForm.BDatabase);


                InstanceForm.BDatabase.CommitTransaction();


                //三院数据处理___执行同步操作
                string errtext = "";
                ts_HospData_Share.ts_update_type ty = new ts_HospData_Share.ts_update_type((int)ts_HospData_Share.czlx.yp_药品取消合并, InstanceForm.BDatabase);
                if (ty.Bzx == 1) //只有当立即执行标志为1时才执行
                {
                    ts.Pexec_log(log_djid, InstanceForm.BDatabase, out errtext);
                }
                if (errtext != "")
                {
                    MessageBox.Show("取消药品合并成功 " + errtext, "取消合并", MessageBoxButtons.OK, MessageBoxIcon.Error);
                }

                this.Close();
            }
            catch (System.Exception err)
            {
                UpdateRows = null;
                InstanceForm.BDatabase.RollbackTransaction();
                MessageBox.Show(err.Message, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
        }
예제 #4
0
파일: Frmhb.cs 프로젝트: Wooyme/HIS-1
        private void butok_Click(object sender, System.EventArgs e)
        {
            DataTable tb = (DataTable)this.myDataGrid1.DataSource;

            DataRow[] rows  = tb.Select("合并=1");
            DataRow[] hbrow = tb.Select("合并=0");
            if (rows.Length == 0)
            {
                MessageBox.Show("没有选择规格", "提示", MessageBoxButtons.OK, MessageBoxIcon.Warning);
                return;
            }

            if (hbrow.Length == 0)
            {
                MessageBox.Show("没有可匹配的药品,最少要选择两个药品", "提示", MessageBoxButtons.OK, MessageBoxIcon.Warning);
                return;
            }

            int _gg_ggid = Convert.ToInt32(rows[0]["ggid"]);

            try
            {
                Ypgg gg = new Ypgg(_gg_ggid, InstanceForm.BDatabase);
                if (gg.GGID == 0)
                {
                    MessageBox.Show("该规格可能已经不存在了"); return;
                }

                string[] ss = new string[hbrow.Length];

                InstanceForm.BDatabase.BeginTransaction();

                for (int i = 0; i <= hbrow.Length - 1; i++)
                {
                    int _cj_cjid = Convert.ToInt32(hbrow[i]["CJID"]);

                    //厂家
                    string ssql = "update yp_ypcjd set ggid=" + _gg_ggid + ",s_ypspm='" + gg.YPSPM + "',s_yppm='" + gg.YPPM +
                                  "',s_ypspmbz='" + gg.YPSPMBZ + "',s_ypgg='" + gg.YPGG + "',s_ypdw='" + Yp.SeekYpdw(gg.YPDW, InstanceForm.BDatabase) + "' where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);

                    //药房库存
                    ssql = "update yf_kcmx set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药房批号
                    ssql = "update yf_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药库库存
                    ssql = "update yk_kcmx set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药库批号
                    ssql = "update yk_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药房盘点表
                    ssql = "update yf_pdtemp set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药库盘点表
                    ssql = "update yk_kcph set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);
                    //药品拆零表
                    ssql = "update yp_ypcl set ggid=" + _gg_ggid + " where cjid=" + _cj_cjid + " ";
                    InstanceForm.BDatabase.DoCommand(ssql);

                    //三院数据处理_____保存日志
                    Ypcj   cj       = new Ypcj(_cj_cjid, InstanceForm.BDatabase);
                    string bz       = "将" + hbrow[i]["品名"].ToString() + " CJID=" + hbrow[i]["CJID"] + "的药品合并到新规格 ";
                    Guid   log_djid = Guid.Empty;
                    ts_HospData_Share.ts_update_log ts = new ts_HospData_Share.ts_update_log();
                    ts.Save_log(ts_HospData_Share.czlx.yp_药品合并, bz, "YP_YPCJD", "CJID", _cj_cjid.ToString(), InstanceForm._menuTag.Jgbm, 0, "", out log_djid, InstanceForm.BDatabase);
                    ss[i] = log_djid.ToString();
                }

                //更新药品货号
                Ypcj   ypcj     = new Ypcj();
                int    _errcode = 0;
                string _errtext = "";
                ypcj.Update_shh(_gg_ggid, out _errcode, out _errtext, InstanceForm.BDatabase);
                if (_errcode != 0)
                {
                    throw new Exception(_errtext);
                }

                InstanceForm.BDatabase.CommitTransaction();

                UpdateRows = hbrow;

                //三院数据处理___执行同步操作
                string msg = "";
                for (int i = 0; i <= ss.Length - 1; i++)
                {
                    string errtext = "";
                    ts_HospData_Share.ts_update_type ty = new ts_HospData_Share.ts_update_type((int)ts_HospData_Share.czlx.yp_药品合并, InstanceForm.BDatabase);
                    if (ty.Bzx == 1) //只有当立即执行标志为1时才执行
                    {
                        ts_HospData_Share.ts_update_log ts = new ts_HospData_Share.ts_update_log();
                        ts.Pexec_log(new Guid(ss[i]), InstanceForm.BDatabase, out errtext);
                    }
                    msg = msg + errtext;
                    if (msg != "")
                    {
                        MessageBox.Show("药品合并成功 " + errtext, "合并", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    }
                }

                this.Close();
            }
            catch (System.Exception err)
            {
                UpdateRows = null;
                InstanceForm.BDatabase.RollbackTransaction();
                MessageBox.Show(err.Message, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
        }